diff options
Diffstat (limited to 'src/interp/cparse.boot')
| -rw-r--r-- | src/interp/cparse.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/cparse.boot b/src/interp/cparse.boot index 07640279..1ae46824 100644 --- a/src/interp/cparse.boot +++ b/src/interp/cparse.boot @@ -379,12 +379,12 @@ npQuantified f == -- peek for keyword s, no advance of token stream npEqPeek s == - $stok.first.first = "key" and EQ(s,$ttok) + $stok.first.first = "key" and sameObject?(s,$ttok) -- test for keyword s, if found advance token stream npEqKey s == - $stok.first.first = "key" and EQ(s,$ttok) and npNext() + $stok.first.first = "key" and sameObject?(s,$ttok) and npNext() $npTokToNames == ["~","#","[]","{}", "[||]","{||}"] |