summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorjonsykkel <jonrevold@gmail.com>2021-09-07 16:19:18 +0200
committerjonsykkel <jonrevold@gmail.com>2021-09-07 16:19:18 +0200
commiteccf62b57ce13bb0d19afcd5e2e76686f756d442 (patch)
treeaf1421ca088ec5fe6624f4c3d8b0ac428e312ac2
parent66b457dd318b39645cebafdf68ec82e1b1145c35 (diff)
downloadokeffa-eccf62b57ce13bb0d19afcd5e2e76686f756d442.tar.gz
im gues it soud vork like this
-rw-r--r--calc/main.c9
-rw-r--r--src/io.c1
2 files changed, 2 insertions, 8 deletions
diff --git a/calc/main.c b/calc/main.c
index 6db49ae..0910967 100644
--- a/calc/main.c
+++ b/calc/main.c
@@ -76,11 +76,6 @@ static word_t char_getnib(char c){
else return c-'a'+0xA;
}
-static void puts_stack(size_t p){
- printf("%3zu ",p);dump_fz(&STACK(p),fl);
- write_nl();
-}
-
static void op_normal(char c){
switch(c){
wbool_t p;
@@ -216,7 +211,7 @@ static void op_normal(char c){
case '#':
want(1);
- puts_stack(sp);
+ dump_fz(&STACK(p),fl);
drop();
break;
@@ -226,7 +221,7 @@ static void op_normal(char c){
case 'Q':
for(size_t x = sp;x != STACK_INIT;x--){
- puts_stack(x);
+ dump_fz(&STACK(p),fl);
}
exit(0);
break;
diff --git a/src/io.c b/src/io.c
index 7b08cfa..1f207d4 100644
--- a/src/io.c
+++ b/src/io.c
@@ -26,7 +26,6 @@ void dump_b(wbool_t a){
void dump_fz(word_t *a,size_t len){
for(size_t x = len-1;x < (size_t)-1;x--){
dump_w(a[x]);
- fputc(' ',stdout);
}
}