Type control

[Han]

(03-12-2015 09:59 AM)salvomic Wrote:  

(02-23-2015 07:18 PM)Han Wrote:  Just try this:

Code:

#cas
myexample(args):=
  local s;
  s:=SIZE(args);
  IF s==0 THEN RETURN("No args given"); END;
  RETURN(args(s));
END;
#end

...
This doesn't work for non-CAS programs because the Home environment doesn't parse comma-separated entries the same way. The non-CAS programs must either be programmed to take an explicit list of inputs or you must use a CAS program. That is, HOMEPROG(list) where list is an actual list would work for non-CAS programs. ...

Han,
in some CAS program of mine it works well...

now I've a non CAS program, and this code doesn't work:

Code:


EXPORT myprog(a);
BEGIN
local s;
s:= SIZE(a);
IF (s==0 OR TYPE(a)<>0) THEN RETURN("Input a real number"); END;
...

with myprog (not correct, I know) I get the error "Bad argument count" and with myprog() I get "Error: Bad argument value"

So, there isn't any way to control that input?

Thank you

Ensure there are no conflicts between the CAS version of myprog and the non-CAS version of myprog. In other words, name them differently to make sure that when you type myprog you aren't running the wrong program (since different programs can actually have the same name). As for the error (w/ respect to the second code block in your post), it is being generated much further inside your program. What you have posted there does not produce any errors.