andrius
/
stage0
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Now weird strings are collected properly

This commit is contained in:
Jeremiah Orians 2018-08-25 12:57:33 -04:00
parent ae667843b3
commit ba91a45fac
No known key found for this signature in database
GPG Key ID: 7457821534D2ACCD
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
stage2/cc.s
View File

@ -555,19 +555,20 @@
LOADU8 R0 R2 0 ; STRING[0]
JUMP.Z R0 @collect_weird_string_done ; Stop if NULL
CMPSKIPI.E R0 92 ; IF STRING[0] != '\\'
JUMP @collect_weird_string_iter ; Just loop
JUMP @collect_weird_string_check ; Deal with iteration
LOADU8 R0 R2 1 ; STRING[1]
CMPSKIPI.NE R0 120 ; If STRING[1] == 'x'
ADDUI R2 R2 2 ; STRING = STRING + 2
ADDUI R2 R2 1 ; STRING = STRING + 1
JUMP @collect_weird_string_iter
:collect_weird_string_check
LOADU8 R0 R2 1 ; STRING[1]
JUMP.NZ R0 @collect_weird_string_iter
:collect_weird_string_done
LOADUI R0 32 ; Insert ' '
PUSH8 R0 R3 ; HOLD[0] = ' ' && HOLD = HOLD + 1
LOADUI R0 48 ; Insert '0'
PUSH8 R0 R3 ; HOLD[0] = '0' && HOLD = HOLD + 1
LOADUI R0 48 ; Insert '0'
PUSH8 R0 R3 ; HOLD[0] = '0' && HOLD = HOLD + 1
LOADUI R0 39 ; Insert '\''
PUSH8 R0 R3 ; HOLD[0] = '\'' && HOLD = HOLD + 1