hyper-literate ignored #; comments it seems
This commit is contained in:
parent
7a010b3d60
commit
4f81c12016
|
@ -22,20 +22,20 @@ Changing the order of execution:
|
||||||
꩜chunk[<use-case-order>
|
꩜chunk[<use-case-order>
|
||||||
(if condition if-true if-false)
|
(if condition if-true if-false)
|
||||||
;; can be expressed as:
|
;; can be expressed as:
|
||||||
#;(force (if condition
|
;;(force (if condition
|
||||||
(λ () if-true)
|
;; (λ () if-true)
|
||||||
(λ () if-false)))
|
;; (λ () if-false)))
|
||||||
|
|
||||||
(match v ([null if-null] [(cons a b) if-cons]))
|
(match v ([null if-null] [(cons a b) if-cons]))
|
||||||
;; can be expressed as:
|
;; can be expressed as:
|
||||||
#;(force (if (null? v)
|
;;(force (if (null? v)
|
||||||
(λ () if-null)
|
;; (λ () if-null)
|
||||||
(λ () (let ([a (car v)] [b (cdr v)]) if-cons))))
|
;; (λ () (let ([a (car v)] [b (cdr v)]) if-cons))))
|
||||||
|
|
||||||
(for/list ([x (in-list l)]) body)
|
(for/list ([x (in-list l)]) body)
|
||||||
;; can be expressed as
|
;; can be expressed as
|
||||||
#;(map (λ (x) body) l)]
|
;;(map (λ (x) body) l)
|
||||||
|
]
|
||||||
꩜subsection{Syntactic sugar}
|
꩜subsection{Syntactic sugar}
|
||||||
|
|
||||||
꩜chunk[<use-case-syntactic-sugar>
|
꩜chunk[<use-case-syntactic-sugar>
|
||||||
|
@ -241,4 +241,5 @@ These environment manipulations can be modeled with row types:
|
||||||
<program>)]
|
<program>)]
|
||||||
|
|
||||||
꩜chunk[<*>
|
꩜chunk[<*>
|
||||||
#;<env+program>]
|
;;<env+program>
|
||||||
|
]
|
||||||
|
|
Loading…
Reference in New Issue
Block a user