From f8681e482e10d4fcb6e53faf0bf658652457928f Mon Sep 17 00:00:00 2001
From: John Wiegley <johnw@newartisans.com>
Date: Mon, 16 Feb 2009 01:11:31 -0400
Subject: Print <POINTER> if value_t::is_pointer()

---
 src/value.cc | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'src')

diff --git a/src/value.cc b/src/value.cc
index 9a7647e1..03984fd8 100644
--- a/src/value.cc
+++ b/src/value.cc
@@ -1314,6 +1314,10 @@ void value_t::print(std::ostream&           out,
     as_balance().print(out, first_width, latter_width);
     break;
 
+  case POINTER:
+    out << "<POINTER>";
+    break;
+
   default:
     throw_(value_error, "Cannot print " << label());
   }
-- 
cgit v1.2.3