[Ecls-list] require/provide extensions

Julian Stecklina der_julian at web.de
Wed Feb 16 15:21:59 UTC 2005


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

> 
> On Feb 16, 2005, at 5:02 PM, Julian Stecklina wrote:
> 
> > 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. :)
> 
> Assumed the logical pathname "SYS:" is where you want to keep things, 
> it should work fine.

It's the place where sockets.fas goes at the moment. ;) The advantage
here is that we can change this location at will, without any user code
breaking.

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




More information about the ecl-devel mailing list