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