(import s11n)


(define x 5)
(call-with-output-file "testfile.s11n"
                       (lambda (output-port)
                         (serialize x output-port)))

(call-with-input-file "testfile.s11n" deserialize)


(define my-big-alist (procedure-that-generates-massive-alist))
(call-with-output-file "bigalist.s11n"
                       (lambda (output-port)
                         (serialize my-big-alist output-port)))

(call-with-input-file "bigalist.s11n" deserialize)