From 30f47d6ec1e45d1ee551e96e30893dadea3a9008 Mon Sep 17 00:00:00 2001
From: Quentin Carbonneaux <quentin.carbonneaux@yale.edu>
Date: Tue, 20 Oct 2015 18:01:03 -0400
Subject: [PATCH] fix bug in pretty printer

---
 lisc/parse.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisc/parse.c b/lisc/parse.c
index feb11a0..b5adca3 100644
--- a/lisc/parse.c
+++ b/lisc/parse.c
@@ -797,7 +797,7 @@ parse(FILE *f, void data(Dat *), void func(Fn *))
 static void
 printref(Ref r, Fn *fn, FILE *f)
 {
-	switch (r.type) {
+	switch (rtype(r)) {
 	case RTmp:
 		if (r.val < Tmp0)
 			fprintf(f, "R%d", r.val);