From 24194fbe5ea73f7df8b7afaea327e726ec51bfb4 Mon Sep 17 00:00:00 2001 From: Andreas Baumann Date: Tue, 27 Jul 2021 18:41:06 +0000 Subject: printing line lumbers --- miniany/c4.c | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) (limited to 'miniany/c4.c') diff --git a/miniany/c4.c b/miniany/c4.c index 692ed1f..4f00e30 100644 --- a/miniany/c4.c +++ b/miniany/c4.c @@ -37,7 +37,7 @@ enum { // opcodes enum { LEA ,IMM ,JMP ,JSR ,BZ ,BNZ ,ENT ,ADJ ,LEV ,LI ,LC ,SI ,SC ,PSH , OR ,XOR ,AND ,EQ ,NE ,LT ,GT ,LE ,GE ,SHL ,SHR ,ADD ,SUB ,MUL ,DIV ,MOD , - OPEN,READ,CLOS,PRTF,PUTS,GETC,PUTC,MALC,FREE,MSET,MCMP,EXIT }; + OPEN,READ,CLOS,PRTF,PUTS,GETC,PUTC,PUTI,PUTN,MALC,FREE,MSET,MCMP,EXIT }; // types enum { CHAR, INT, PTR }; @@ -58,7 +58,7 @@ void next() while (le < e) { printf("%8.4s", &"LEA ,IMM ,JMP ,JSR ,BZ ,BNZ ,ENT ,ADJ ,LEV ,LI ,LC ,SI ,SC ,PSH ," "OR ,XOR ,AND ,EQ ,NE ,LT ,GT ,LE ,GE ,SHL ,SHR ,ADD ,SUB ,MUL ,DIV ,MOD ," - "OPEN,READ,CLOS,PRTF,PUTS,GETC,PUTC,MALC,FREE,MSET,MCMP,EXIT,"[*++le * 5]); + "OPEN,READ,CLOS,PRTF,PUTS,GETC,PUTC,PUTI,PUTN,MALC,FREE,MSET,MCMP,EXIT,"[*++le * 5]); if (*le <= ADJ) printf(" %d\n", *++le); else printf("\n"); } } @@ -375,7 +375,7 @@ int main(int argc, char **argv) p = "char else enum if int void return sizeof while " "EOF EXIT_SUCCESS " - "open read close printf puts getchar putchar malloc free memset memcmp exit void main"; + "open read close printf putstring getchar putchar putint putnl malloc free memset memcmp exit void main"; i = Char; while (i <= While) { next(); id[Tk] = i++; } // add keywords to symbol table // add library constants next(); id[Class] = Num; id[Type] = INT; id[Val] = -1; @@ -543,9 +543,11 @@ int main(int argc, char **argv) else if (i == READ) a = read(sp[2], (char *)sp[1], *sp); else if (i == CLOS) a = close(*sp); else if (i == PRTF) { t = sp + pc[1]; a = printf((char *)t[-1], t[-2], t[-3], t[-4], t[-5], t[-6]); } - else if (i == PUTS) { t = sp + pc[1]; a = printf("%s\n", (char *)t[-1]); } + else if (i == PUTS) { t = sp + pc[1]; a = printf("%s", (char *)t[-1]); } else if (i == GETC) a = getchar(); - else if (i == PUTC) putchar(*sp); + else if (i == PUTC) a = putchar(*sp); + else if (i == PUTI) a = printf("%d", (int)t[-1]); + else if (i == PUTN) a = puts(""); else if (i == MALC) a = (int)malloc(*sp); else if (i == FREE) free((void *)*sp); else if (i == MSET) a = (int)memset((char *)sp[2], sp[1], *sp); -- cgit v1.2.3-54-g00ecf