From 950e3c765e30648de34cfc4f65fffdce06f0727f Mon Sep 17 00:00:00 2001 From: Joel Martin Date: Tue, 1 Apr 2014 21:50:24 -0500 Subject: PS: add stepA_more. Sync other steps. In particular, self reference in function definition and putting readline into _readline function. --- ps/reader.ps | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'ps/reader.ps') 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 -- cgit v1.2.3