diff --git a/remix/stx0.rkt b/remix/stx0.rkt index 531dcf9..2d72677 100644 --- a/remix/stx0.rkt +++ b/remix/stx0.rkt @@ -80,7 +80,7 @@ '+ 40 '- 40 '< 60 '<= 60 '> 60 '>= 60 - '= 70)) + '= 70 '≙ 70 '≙* 70)) (define (shunting-yard:precendence op) (define v (syntax-local-value op (λ () #f))) (or (and v (binary-operator? v) (binary-operator-precedence v)) @@ -194,7 +194,6 @@ (remix-cond . more))))])) (provide def def* - ;; xxx add these into the default precedence system (rename-out [def ≙] [def* ≙*]) (rename-out [remix-λ λ]