From a4b2187729f7c9f3da0f0e28dd590758e9065a5d Mon Sep 17 00:00:00 2001
From: rsc <devnull@localhost>
Date: Tue, 14 Feb 2006 19:38:04 +0000
Subject: [PATCH] better symbols

---
 acid/port | 12 ++++++++----
 1 file changed, 8 insertions(+), 4 deletions(-)

diff --git a/acid/port b/acid/port
index c6bf9056..c8e195fc 100644
--- a/acid/port
+++ b/acid/port
@@ -603,13 +603,17 @@ defn mem(addr, fmt)
 
 defn symbols(pattern)
 {
-	local l, s;
-
+	local l, s, name;
+	
 	l = symbols;
 	while l do {
 		s = head l;
-		if regexp(pattern, s[0]) then
-			print(s[0], "\t", s[1], "\t", s[2], "\t", s[3], "\n");
+		if regexp(pattern, s[0]) then {
+			name = s[4];
+			if name == {} then
+				name = "";
+			print(s[0], "\t", s[1], "\t", s[2], "\t", s[3], "\t", name, "\n");
+		}
 		l = tail l;
 	}
 }