[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