diff --git a/beautiful-racket-demo/basic-demo/expander.rkt b/beautiful-racket-demo/basic-demo/expander.rkt index 6391b8c..82ff395 100644 --- a/beautiful-racket-demo/basic-demo/expander.rkt +++ b/beautiful-racket-demo/basic-demo/expander.rkt @@ -22,7 +22,7 @@ (struct change-line-signal (val)) (define (b-end) (raise (end-program-signal))) -(define (b-goto num-expr) (raise (change-line-signal num-expr))) +(define (b-goto expr) (raise (change-line-signal expr))) (define (run line-table) (define line-vec