| /dports/lang/slib/slib-3b6/ |
| H A D | mzscheme.init | 117 (define with-load-pathname
126 ;(slib:load-source "filename")
128 ;(slib:load-compiled "filename")
302 (slib:eval-load <pathname> defmacro:eval))
385 (define (slib:load-source f)
391 (define (slib:load-compiled f)
396 (slib:error 'slib:load-compiled 'bad 'argument f)))
399 (define slib:load slib:load-source)
403 (define macro:load slib:load-source)
407 (define syncase:load slib:load-source)
[all …]
|
| H A D | pscheme.init | 32 (define *load-pathname* #f)
55 (if *load-pathname*
57 (slib:error 'program-vicinity " called; use slib:load to load")))
79 (define with-load-pathname
213 (define slib:warn
263 (define (slib:load-source f)
266 (load f))
271 (define slib:load-compiled load)
274 (define slib:load slib:load-source)
279 (define defmacro:load slib:load-source)
[all …]
|
| H A D | STk.init | 62 (define *load-pathname* #f)
85 (if *load-pathname*
87 (slib:error 'program-vicinity " called; use slib:load to load")))
109 (define with-load-pathname
285 (slib:eval-load <pathname> defmacro:eval))
324 (define slib:load-source load)
329 (define slib:load-compiled load)
333 ;;(define macro:load slib:load-source)
337 ;;(define syncase:load slib:load-source)
346 (define slib:load slib:load-source)
[all …]
|
| H A D | scheme48.init | 7 ,load-package floatnums
9 ,load =scheme48/misc/packages.scm
173 (if *load-pathname*
175 (slib:error 'program-vicinity " called; use slib:load to load")))
464 (define (slib:load-source f) (load (string-append f (scheme-file-suffix))))
470 (define slib:load-compiled s48-use!)
473 (define slib:load slib:load-source)
477 (define macro:load slib:load-source)
481 (define defmacro:load macro:load)
485 ;;(define syncase:load slib:load-source)
[all …]
|
| H A D | macscheme.init | 71 (slib:error 'program-vicinity " called; use slib:load to load")))
308 (slib:eval-load <pathname> defmacro:eval))
310 (define slib:warn
318 (define slib:error
351 ;(define slib:load-source load)
352 (define (slib:load-source f) (load (string-append f (scheme-file-suffix))))
357 (define slib:load-compiled load)
361 ;;(define macro:load slib:load-source)
365 ;;(define syncase:load slib:load-source)
368 (define slib:load slib:load-source)
[all …]
|
| H A D | manifest.txi | 71 slib:load slib:load-source macro:load defmacro:load syncase:load
72 synclo:load macwork:load) by @var{file} or any of the files it loads.
78 "/usr/local/lib/slib/scaglob.scm"
79 "/usr/local/lib/slib/scaoutp.scm")
83 @defun load->path exp
152 (feature->export-alist 'r5rs slib:catalog))
155 ("/usr/local/lib/slib/mbe.scm"
157 macro:load macro:eval)
158 ("/usr/local/lib/slib/eval.scm"
167 ("/usr/local/lib/slib/stdio.scm"
[all …]
|
| H A D | scsh.init | 80 (slib:error 'program-vicinity " called; use slib:load to load")))
117 (define slib:features
314 (slib:eval-load pathname defmacro:eval))
316 (define slib:warn
324 (define slib:error
360 (define (slib:load-source f) (load (string-append f ".scm")))
365 (define slib:load-compiled load)
368 (define slib:load slib:load-source)
372 (define macro:load slib:load-source)
376 ;;(define syncase:load slib:load-source)
[all …]
|
| H A D | s7.init | 78 (define *load-pathname* #f) ; *load-path* is a list of dirs in s7
104 (slib:error 'program-vicinity " called; use slib:load to load")))
323 (slib:eval-load <pathname> defmacro:eval))
325 (define slib:warn
334 (define slib:error
399 (define (slib:load-source f) (load (string-append f ".scm")))
404 (define slib:load-compiled load)
407 (define slib:load slib:load-source)
411 (define macro:load slib:load-source)
415 ;;(define syncase:load slib:load-source)
[all …]
|
| H A D | RScheme.init | 106 (slib:error 'program-vicinity " called; use slib:load to load")))
142 (define slib:features
326 (slib:eval-load <pathname> defmacro:eval))
328 (define slib:warn
336 (define slib:error
371 (define (slib:load-source f) (load (string-append f ".scm")))
376 (define slib:load-compiled load)
379 (define slib:load slib:load-source)
383 ;;(define macro:load load)
387 ;;(define syncase:load slib:load-source)
[all …]
|
| H A D | bigloo.init | 98 (if *load-pathname*
100 (slib:error 'program-vicinity " called; use slib:load to load")))
398 (define (slib:load-source f) (loadq (string-append f (scheme-file-suffix))))
403 (define slib:load-compiled loadq)
406 (define (slib:load file)
408 (slib:load-source file)
409 (slib:load-compiled file)))
411 (define defmacro:load slib:load-source)
415 ;;(define macro:load slib:load-source)
419 ;;(define syncase:load slib:load-source)
[all …]
|
| H A D | jscheme.init | 101 (define *load-pathname* #f)
124 (if *load-pathname*
126 (slib:error 'program-vicinity " called; use slib:load to load")))
148 (define with-load-pathname
427 (slib:eval-load <pathname> defmacro:eval))
500 (define (slib:load-source f) (load (string-append f ".scm")))
505 (define slib:load-compiled load)
508 (define slib:load slib:load-source)
512 ;;(define macro:load slib:load-source)
516 ;;(define syncase:load slib:load-source)
[all …]
|
| H A D | gambit.init | 124 (if *load-pathname*
126 (slib:error 'program-vicinity " called; use slib:load to load")))
387 (slib:eval-load <pathname> defmacro:eval))
391 (define slib:warn
399 (define slib:error
433 (define slib:load-source load)
438 (define slib:load-compiled load)
441 (define slib:load slib:load-source)
445 ;;(define macro:load slib:load-source)
449 ;;(define syncase:load slib:load-source)
[all …]
|
| H A D | sisc.init | 23 (or (getenv "sisc.slib")
101 (define slib:features
255 (define slib:eval eval)
258 (define slib:warn
333 (define (slib:load-source f) (load (string-append f (scheme-file-suffix))))
338 (define slib:load-compiled load)
341 (define slib:load slib:load-source)
345 (define macro:load slib:load-source)
349 (define syncase:load slib:load-source)
355 (define defmacro:load slib:load-source)
[all …]
|
| H A D | kawa.init | 98 (if *load-pathname*
100 (slib:error 'program-vicinity " called; use slib:load to load")))
137 (define slib:features
266 ;(define macro:load load)
307 (slib:eval-load <pathname> defmacro:eval))
309 (define slib:warn
318 (define slib:error
383 (define (slib:load-source f) (load (string-append f ".scm")))
388 (define slib:load-compiled load)
391 (define slib:load slib:load-source)
[all …]
|
| H A D | mitscheme.init | 104 (if *load-pathname*
106 (slib:error 'program-vicinity " called; use slib:load to load")))
237 (set! slib:features (cons 'macro slib:features)))
239 (set! slib:features (cons 'defmacro slib:features)))
244 (set! slib:features (cons 'sicp slib:features)))
420 (define defmacro:load load)
424 (environment-define (the-environment) 'macro:load load)))
462 (define slib:load-source load)
467 (define slib:load-compiled load)
470 (define slib:load slib:load-source)
[all …]
|
| H A D | scheme2c.init | 95 (if *load-pathname*
97 (slib:error 'program-vicinity " called; use slib:load to load")))
133 (define slib:features
345 (define defmacro:load load)
348 ;(define macro:load load)
350 (define slib:warn
358 (define slib:error
413 (define (slib:load-source f) (load (string-append f (scheme-file-suffix))))
418 (define slib:load-compiled load)
421 (define slib:load slib:load-source)
[all …]
|
| H A D | elk.init | 110 (slib:error 'program-vicinity " called; use slib:load to load")))
358 (define defmacro:load load)
360 (define slib:warn
417 (define slib:load-source
418 (let ((primitive-load load))
427 (define slib:load-compiled
428 (let ((primitive-load load))
433 (define slib:load slib:load-source) ;WARNING: redefining LOAD
437 ;;(define macro:load slib:load-source)
441 ;;(define syncase:load slib:load-source)
[all …]
|
| H A D | umbscheme.init | 90 (if *load-pathname*
92 (slib:error 'program-vicinity " called; use slib:load to load")))
128 (define slib:features
301 (define slib:eval eval)
311 (define defmacro:load slib:load-source)
313 (define slib:warn
321 (define slib:error
356 (define (slib:load-source f) (load (string-append f ".scm")))
361 (define slib:load-compiled load)
364 (define slib:load slib:load-source)
[all …]
|
| H A D | vscm.init | 16 ;2. (load "vscm.init")
124 (if *load-pathname*
126 (slib:error 'program-vicinity " called; use slib:load to load")))
429 (slib:eval-load <pathname> defmacro:eval))
431 (define slib:warn
478 (define (slib:load-source f) (load (string-append f (scheme-file-suffix))))
483 (define slib:load-compiled load)
486 (define slib:load slib:load-source)
490 (define macro:load slib:load-source)
494 ;;(define syncase:load slib:load-source)
[all …]
|
| H A D | chez.init | 95 (if *load-pathname*
97 (slib:error 'program-vicinity " called; use slib:load to load")))
351 (define slib:exit
370 (define (slib:load-source f) (load (string-append f ".scm")))
375 (define slib:load-compiled load)
378 (define slib:load slib:load-source)
383 (define macro:load slib:load-source)
387 ;;(define syncase:load slib:load-source)
477 (slib:eval-load <pathname> defmacro:eval))
479 (define slib:warn
[all …]
|
| H A D | guile.init | 144 slib:eval-load
148 slib:load
150 slib:load-source
278 (slib:error 'program-vicinity " called; use slib:load to load")))
591 (define slib:load
593 (slib:load-helper load)
597 ;;(define slib:load-from-path (slib:load-helper load-from-path))
601 (define slib:load-source slib:load)
606 (define slib:load-compiled slib:load)
609 (define defmacro:load slib:load)
[all …]
|
| H A D | guile-2.init | 121 macro:load
143 slib:eval-load
147 slib:load
148 slib:load-compiled
149 slib:load-source
441 (define (slib:load <pathname>)
446 (define slib:load-source slib:load)
451 (define slib:load-compiled slib:load)
454 (define defmacro:load slib:load)
470 (define macro:load slib:load-source)
[all …]
|
| H A D | FAQ | 42 [] What are slib.texi and slib.info?
71 [] When I load an SLIB initialization file for my Scheme
79 [] When I load an SLIB initialization file for my Scheme
99 You need to arrange to have your Scheme implementation load the
102 can have it load the SLIB initialization file automatically. For
103 example (load "/usr/local/lib/slib/foo.init").
105 [] Why do I get a string-ref (or other) error when I try to load
125 [] Why doesn't SLIB just load all the functions so I don't have
129 implementations take unacceptably long to load 1 Megabyte of source;
191 The way to load the struct macro package is (REQUIRE 'YASOS).
[all …]
|
| H A D | t3.init | 88 (slib:error 'program-vicinity " called; use slib:load to load")))
124 (define slib:features
352 (slib:eval-load <pathname> defmacro:eval))
354 (define slib:warn
362 (define slib:error
369 (define slib:tab #\tab)
529 (let ((t:load (*value standard-env 'load)))
535 (define slib:load-source load)
540 (define slib:load-compiled load)
543 (define slib:load slib:load-source)
[all …]
|
| /dports/lang/elk/elk-3.99.8/scm/ |
| H A D | slib.scm.in | 73 ;(slib:load-source "filename")
75 ;(slib:load-compiled "filename")
168 (define slib:eval eval)
206 (define (slib:eval-load <pathname> evl)
219 (define slib:error error)
222 (define slib:tab #\tab)
236 (define slib:exit
259 (define slib:load-source
269 (define slib:load-compiled
276 (define slib:load slib:load-source) ;WARNING: redefining LOAD
[all …]
|