Welcome to the CHICKEN Scheme pasting service

no title added by anonymous on Sat Mar 16 19:19:01 2013

Egg:
-----
(define the-db-ctx (make-parameter #f)) ; '(<handle> . <alist>)

(define (initialise #!key db-ctx)
  (if db-ctx     (set! the-db-ctx db-ctx)))
-----

App:

-----
(use egg)

(define db-ctx (make-parameter))

(initialise db-ctx: db-ctx)

(db-ctx (open-database ...))

...

<(calls to the egg)>
-----


Your annotation:

Enter a new annotation:

Your nick:
The title of your paste:
Your paste (mandatory) :
Which module provides `load-relative'?
Visually impaired? Let me spell it for you (wav file) download WAV