GoLisp now provides basic, and optional, type checking for the arguments and return values of user defined functions. Additionally, primtive functions also have type checking on arguments, as appropriate. For example:
[code lang=text] > (+ 'a 3) Error in evaluation: Evaling (+ 'a 3). Wrong argument type for argument 0; expected Integer or Float but got the Symbol: a [/code]
(typedef fname arg-type... [-> return-type])
This is similar to defining a function: fname is the name of a
function that will be defined later (typically the next form) and each
arg-type corresponds to an argument). But with
typedef these are
argument type specifications, not argument names.
These type specifications can take two forms: type which can be a string or symbol, or a set of types separated by a pipe (E.g. "integer|string") with no spaces. The latter must be a string.
When a function is passed a value that does not match its specified type(s) an error is raised, similar to what is shown here:
> (typedef less-than number number) > (define (less-than x y) (< x y)) > (less-than 1 4.3) ==> \#t > (less-than 1 'a) Error in evaluation: Evaling (less-than 1 'a). less-than argument 1 has the wrong type, expected number but was given symbol
The argument number in the error starts numbering from 0.
A type specification can also include a type specification of the result
of the function. Note that the
-> is required:
> (typedef less-than number number -> boolean) > (define (less-than x y) (if (< x y) 'yes 'no)) > (less-than 1 4.3) Error in evaluation: Evaling (less-than 1 4.3). less-than returns the wrong type, expected boolean but returned symbol
The following types are supported:
- sequence (equivalent to list|vector)
- number (equivalent to integer|float)
- stringy (equivalent to string|symbol)
- procedure (equivalent to function|primitive)
Note that the list type just requires a ConsCell; if a proper list or other specific type is required, then either pre-conditions or explicit tests will be needed.
This capability is completely optional and if not used, adds no performance penalty.
This returns the type signature of func.
(type less-than) ==> (number number -> boolean)