diff --git a/collects/honu/doc.txt b/collects/honu/doc.txt index 9ceca33440..cddf3fcdf8 100644 --- a/collects/honu/doc.txt +++ b/collects/honu/doc.txt @@ -255,9 +255,9 @@ NOTE: Here's the precedence and associativity of things above. LEFT | RIGHT | NONASSOC ----------+----------+----------- . | | - | : isa | - | | #n (tuple selector) | | ( (function application) + | | #n (tuple selector) + | : isa | | | !, - (un) * / % | | + - | | diff --git a/collects/honu/parsers/parse.ss b/collects/honu/parsers/parse.ss index e90628effe..129ee61de3 100644 --- a/collects/honu/parsers/parse.ss +++ b/collects/honu/parsers/parse.ss @@ -68,9 +68,9 @@ (left PLUS MINUS) (left TIMES DIV MOD) (nonassoc NOT UMINUS) ;; unary operators - (left O_PAREN) ;; this gives application a precedence - (nonassoc selector) (right COLON isa) + (nonassoc selector) + (left O_PAREN) ;; this gives application a precedence (left DOT)) (tokens keywords separators operators val-tokens lex-errors EOF for-prec) (error (lambda (a b stx start end)