Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-07-07 05:06:37 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

removing comments

Browse source
This commit is contained in:
Alex Shinn 2010-09-24 22:02:33 +09:00
parent 0c91c437c0
commit 2144164793
1 changed files with 0 additions and 17 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
lib/srfi/39.module
View file

@ -1,21 +1,4 @@
;; (param) => get-cell + cdr
;; (param value) => get-cell + [convert] + set-cdr!
;; need 3 opcodes: param cell
;; context params
;; context-params-set!
;; analyze needs to translate param calls to proper usages of the
;; first two opcodes
;; (parameterize ((param value)) body ...)
;; => (let* ((old-params (thread-parameters))
;; (new-params (cons (cons param (param-convert value)) old-params)))
;; (dynamic-wind (lambda () (thread-set-parameters! new-params))
;; (lambda () body ...)
;; (lambda () (thread-set-parameters! old-params))))
(define-module (srfi 39) (define-module (srfi 39)
(export make-parameter parameterize) (export make-parameter parameterize)
(import-immutable (scheme)) (import-immutable (scheme))