[Ecls-list] require/provide extensions

Julian Stecklina der_julian at web.de
Wed Feb 16 14:02:22 UTC 2005


On Wed, 16 Feb 2005 16:23:25 -0500
Marco Antoniotti <marcoxa at cs.nyu.edu> wrote:

> This is good.   I'll add support for MK:DEFSYSTEM and ECL ASAP.

The latter would be something like:

(defun ecl-module-provider (module)
   (let ((path (merge-pathnames (make-pathname :name (string module))
                                #P"SYS:")))
      (if (probe-file path) (load path))))

(pushnew 'ecl-module-provider *module-provider-functions*)

This is untested, but should allow (require :sockets) to work. :)

Regards,
-- 
                    ____________________________
 Julian Stecklina  /  _________________________/
  ________________/  /
  \_________________/  LISP - truly beautiful




More information about the ecl-devel mailing list