picolisp/func.l

   1 (class +Func)
   2 # env ast params fn
   3 (dm T (Env Ast Params Fn)
   4    (=: type 'func) # HACK
   5    (=: env Env)
   6    (=: ast Ast)
   7    (=: params Params)
   8    (=: fn Fn) )
   9
  10 (de MAL-func (Env Ast Params Fn)
  11    (new '(+Func) Env Ast Params Fn) )