commit c5367a836a3e6e432d467559a1d91744ccb28b49 parent cb9e396b6c51ed00690512a4dc5b87f6295ebb8b Author: Alexander Burger <abu@software-lab.de> Date: Tue, 17 Jul 2012 11:38:28 +0200 Minor flow change Diffstat:
| M | src64/io.l | | | 19 | +++++++++---------- |
1 file changed, 9 insertions(+), 10 deletions(-)
diff --git a/src64/io.l b/src64/io.l @@ -1,4 +1,4 @@ -# 11jul12abu +# 17jul12abu # (c) Software Lab. Alexander Burger # Close file descriptor @@ -2137,16 +2137,15 @@ ld C 4 # Build new name lea X (L I) # Safe ld (X) ZERO - call (Get_A) # Get next char - continue T - end - memb Delim "(DelimEnd-Delim)" # Delimiter? - break eq # Yes - cmp B (char "\\") # Backslash? - if eq # Yes - call (Get_A) # Get next char + else + memb Delim "(DelimEnd-Delim)" # Delimiter? + break eq # Yes + cmp B (char "\\") # Backslash? + if eq # Yes + call (Get_A) # Get next char + end + call byteSymBCX_CX # Pack char end - call byteSymBCX_CX # Pack char call (Get_A) # Get next loop ld X (L I) # Get name