Welcome to the CHICKEN Scheme pasting service

load-and-import added by gahr on Mon Jan 23 18:06:53 2023

(import-for-syntax (chicken format))

(define-syntax load-and-import
  (er-macro-transformer
    (lambda (expr rename compare)
      (let ((mods (cdr expr)))
        (map (lambda (mod)
               (load (sprintf "~A.scm" mod))
               `(import ,mod)
               )
             mods)
        ""))))

(load-and-import foo bar)
[ permalink | raw ]

Your annotation:

Enter a new annotation:

Your nick:
The title of your paste:
Your paste (mandatory) :
Type in the text below: 
 _               _             _ 
| | ____ _  __ _| | __ _  ___ | |
| |/ / _` |/ _` | |/ _` |/ _ \| |
|   < (_| | (_| | | (_| | (_) | |
|_|\_\__, |\__, |_|\__,_|\___/|_|
        |_||___/
Visually impaired? Let me spell it for you (wav file) download WAV