duseful.ctl 362 B

1234567891011121314151617181920
  1. @cd pu:
  2. @psl:rlisp
  3. load useful;
  4. off redefmsg,usermode,macro!-displace;
  5. on defmacro!-displaces;
  6. faslout "pl:duseful";
  7. in "backquote.sl"$
  8. in "read-macros.sl"$
  9. in "destructure.sl"$
  10. in "cond-macros.sl"$
  11. in "bind-macros.sl"$
  12. in "set-macros.sl"$
  13. in "iter-macros.sl"$
  14. in "for-macro.sl"$
  15. in "misc-macros.sl"$
  16. in "macroexpand.sl"$
  17. push('useful,options!*)$
  18. faslend;
  19. quit;