Fix hashcode* on parsers
parent
d002e02948
commit
a23e0ce15c
|
@ -12,6 +12,8 @@ TUPLE: parse-result remaining ast ;
|
|||
|
||||
TUPLE: parser id compiled ;
|
||||
M: parser equal? [ id>> ] 2apply = ;
|
||||
M: parser hashcode* ( depth obj -- code )
|
||||
id>> hashcode* ;
|
||||
C: <parser> parser
|
||||
|
||||
SYMBOL: ignore
|
||||
|
|
Loading…
Reference in New Issue