diff options
Diffstat (limited to 'ps/reader.ps')
| -rw-r--r-- | ps/reader.ps | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/ps/reader.ps b/ps/reader.ps index e524d4c..dba2a4a 100644 --- a/ps/reader.ps +++ b/ps/reader.ps @@ -184,9 +184,13 @@ (unexpected '[') throw }{ ch 93 eq { %elseif ']' (unexpected ']') throw + }{ ch 123 eq { %elseif '{' + (unexpected '{') throw + }{ ch 125 eq { %elseif '}' + (unexpected '}') throw }{ % else str idx read_atom - } ifelse } ifelse } ifelse } ifelse } ifelse } ifelse } ifelse + } ifelse } ifelse } ifelse } ifelse } ifelse } ifelse } ifelse } ifelse } ifelse % return: ast string new_idx end } def |