summary refs log tree commit diff
path: root/lisc
diff options
context:
space:
mode:
authorQuentin Carbonneaux <quentin.carbonneaux@yale.edu>2015-07-31 10:31:15 -0400
committerQuentin Carbonneaux <quentin.carbonneaux@yale.edu>2015-09-15 23:01:29 -0400
commita2a2231027d2e60777b92a52701ac33c56dd362f (patch)
treed4217910e627f51d3f1d3b622da4b2f3e0f754ba /lisc
parentd8d17705c4f525314471f5526ef3328dd41625cd (diff)
downloadroux-a2a2231027d2e60777b92a52701ac33c56dd362f.tar.gz
cosmetic modifications to parse.c
Diffstat (limited to 'lisc')
-rw-r--r--lisc/parse.c13
1 files changed, 5 insertions, 8 deletions
diff --git a/lisc/parse.c b/lisc/parse.c
index e303561..befc418 100644
--- a/lisc/parse.c
+++ b/lisc/parse.c
@@ -1,9 +1,7 @@
 /* really crude parser
  */
-#include <ctype.h>
-#include <string.h>
-
 #include "lisc.h"
+#include <ctype.h>
 
 enum {
 	NSym = 256,
@@ -546,12 +544,11 @@ printref(Ref r, Fn *fn, FILE *f)
 		switch (fn->cst[r.val].type) {
 		case CAddr:
 			fprintf(f, "$%s", fn->cst[r.val].label);
-			if (!fn->cst[r.val].val)
-				break;
-			if (fn->cst[r.val].val > 0)
-				fprintf(f, "+");
+			if (fn->cst[r.val].val)
+				fprintf(f, "%+"PRIi64, fn->cst[r.val].val);
+			break;
 		case CNum:
-			fprintf(f, "%"PRId64, fn->cst[r.val].val);
+			fprintf(f, "%"PRIi64, fn->cst[r.val].val);
 			break;
 		case CUndef:
 			diag("printref: invalid constant");