Welcome to the CHICKEN Scheme pasting service

Import/rename added by jnb 2 days ago

;;; main-test.scm
(module
 main-test
 (func)
 (import (scheme base))
 (define (func . args)
   'ok))

;;; test.scm
(import (rename main-test (func func1)))
(print func1)

(define (foo)
  (func1 'dont-use-me))

(define (func . args)
  'this-shouldnt-be-called)

(define (main args)
  (print (foo)))
[ permalink | raw ]

Your annotation:

Enter a new annotation:

Your nick:
The title of your paste:
Your paste (mandatory) :
What does `(string? 42)' produce?
Visually impaired? Let me spell it for you (wav file) download WAV