commit 079d1f2bbb5d40ede69c0067357d43587bd6c967 parent 4f81c120167983a3cfc997e011c163b1b9010d89 Author: Suzanne Soy <ligo@suzanne.soy> Date: Sun, 21 Mar 2021 16:13:34 +0000 hyper-literate ignored #; comments it seems Diffstat:
| M | demo2-rkt.hl.rkt | | | 14 | +++++++------- |
1 file changed, 7 insertions(+), 7 deletions(-)
diff --git a/demo2-rkt.hl.rkt b/demo2-rkt.hl.rkt @@ -22,19 +22,19 @@ Changing the order of execution: ꩜chunk[<use-case-order> (if condition if-true if-false) ;; can be expressed as: - ;;(force (if condition - ;; (λ () if-true) - ;; (λ () if-false))) + (force (if condition + (λ () if-true) + (λ () if-false))) (match v ([null if-null] [(cons a b) if-cons])) ;; can be expressed as: - ;;(force (if (null? v) - ;; (λ () if-null) - ;; (λ () (let ([a (car v)] [b (cdr v)]) if-cons)))) + (force (if (null? v) + (λ () if-null) + (λ () (let ([a (car v)] [b (cdr v)]) if-cons)))) (for/list ([x (in-list l)]) body) ;; can be expressed as - ;;(map (λ (x) body) l) + (map (λ (x) body) l) ] ꩜subsection{Syntactic sugar}