www

Unnamed repository; edit this file 'description' to name the repository.
Log | Files | Refs | LICENSE

commit 4f81c120167983a3cfc997e011c163b1b9010d89
parent 7a010b3d60b5aa9ea231a64ffec59198b738fc90
Author: Suzanne Soy <ligo@suzanne.soy>
Date:   Sun, 21 Mar 2021 16:11:15 +0000

hyper-literate ignored #; comments it seems

Diffstat:
Mdemo2-rkt.hl.rkt | 19++++++++++---------
1 file changed, 10 insertions(+), 9 deletions(-)

diff --git a/demo2-rkt.hl.rkt b/demo2-rkt.hl.rkt @@ -22,20 +22,20 @@ 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} ꩜chunk[<use-case-syntactic-sugar> @@ -241,4 +241,5 @@ These environment manipulations can be modeled with row types: <program>)] ꩜chunk[<*> - #;<env+program>] + ;;<env+program> + ]