remove `b-func`

7 years ago · 4462141a41
parent 0ad47dd273
commit 4462141a41
2 changed files with 1 additions and 3 deletions
--- a/beautiful-racket-demo/basic-demo-2/expr.rkt
+++ b/beautiful-racket-demo/basic-demo-2/expr.rkt
@ -24,5 +24,3 @@

 (define-macro (b-def ID VAR EXPR)
  #'(set! ID (λ (VAR) EXPR)))
-
-(define (b-func id val) (id val))
--- a/beautiful-racket-demo/basic-demo-2/parser.rkt
+++ b/beautiful-racket-demo/basic-demo-2/parser.rkt
@ -29,7 +29,7 @@ b-product : [b-product ("*"|"/"|"%"|"^")] b-value

 ;; values
@b-value : b-id | b-number | /"(" b-expr /")" | b-not | b-func
-b-func : b-id /"(" b-expr /")"
+/b-func : b-id /"(" b-expr /")"
 b-not : /"!" b-value
@b-id : ID
@b-number : b-positive | b-negative