B compiler update
More progress
This commit is contained in:
+1
-1
@@ -78,7 +78,7 @@ getc: 0
|
||||
dac cibufp
|
||||
jmp getc+1
|
||||
1:
|
||||
lac 0o4
|
||||
lac o4
|
||||
jmp getc i
|
||||
|
||||
putc: 0
|
||||
|
||||
+1
-1
@@ -7,7 +7,7 @@ loop:
|
||||
loop1:
|
||||
c = read();
|
||||
if(c==4) return;
|
||||
if(c==';' & state==0) state = 2;
|
||||
if(c==':' & state==0) state = 2;
|
||||
if((c<'0' ^ c>'9'&c<'a' ^ c>'z') & state==0) state = 1;
|
||||
line[i] = c;
|
||||
i = i+1;
|
||||
|
||||
Reference in New Issue
Block a user