Fixed various spelling errors.
original commit: c9519fd11300b07292df8619e86f48533eff6e4d
This commit is contained in:
parent
ef64dab201
commit
61f9f1203b
|
@ -128,7 +128,7 @@
|
||||||
[else (ormap (lambda (k) (and (assq k rests) #t)) ; suggested?
|
[else (ormap (lambda (k) (and (assq k rests) #t)) ; suggested?
|
||||||
(car (cddddr processed-spec)))])))
|
(car (cddddr processed-spec)))])))
|
||||||
(define (make-keyword-get-expr key rest default known-vars)
|
(define (make-keyword-get-expr key rest default known-vars)
|
||||||
;; expand (for id macros) and check if its a simple expression, because if
|
;; expand (for id macros) and check if it's a simple expression, because if
|
||||||
;; it is, evaluation cannot have side-effects and we can use keyword-get*
|
;; it is, evaluation cannot have side-effects and we can use keyword-get*
|
||||||
(define default*
|
(define default*
|
||||||
(local-expand default 'expression (cons #'#%app known-vars)))
|
(local-expand default 'expression (cons #'#%app known-vars)))
|
||||||
|
|
|
@ -7,7 +7,7 @@
|
||||||
|
|
||||||
#|
|
#|
|
||||||
t accepts a function, f, and creates a thread. It returns the thread and a
|
t accepts a function, f, and creates a thread. It returns the thread and a
|
||||||
function, g. When g is applied it passes it's argument to f, and evaluates
|
function, g. When g is applied it passes its argument to f, and evaluates
|
||||||
the call of f in the time of the thread that was created. Calls to g do not
|
the call of f in the time of the thread that was created. Calls to g do not
|
||||||
block.
|
block.
|
||||||
|#
|
|#
|
||||||
|
|
Loading…
Reference in New Issue
Block a user