diff src/variables.cc @ 2404:68c5868dbe83

[project @ 1996-10-13 18:39:19 by jwe]
author jwe
date Sun, 13 Oct 1996 18:42:18 +0000
parents c2c1482c34c8
children adde4cb6b15d
line wrap: on
line diff
--- a/src/variables.cc	Sun Oct 13 16:52:12 1996 +0000
+++ b/src/variables.cc	Sun Oct 13 18:42:18 1996 +0000
@@ -1026,13 +1026,20 @@
   os << (s.hides_fcn () ? "f" : (s.hides_builtin () ? "F" : "-"));
 #endif
   os.form ("  %-16s", s.type_name ().c_str ());
-  if (s.is_function ())
-    os << "      -      -";
+
+  int nr = s.rows ();
+  int nc = s.columns ();
+
+  if (nr < 0)
+    os << "      -";
   else
-    {
-      os.form ("%7d", s.rows ());
-      os.form ("%7d", s.columns ());
-    }
+    os.form ("%7d", nr);
+
+  if (nc < 0)
+    os << "      -";
+  else
+    os.form ("%7d", nc);
+
   os << "  " << s.name () << "\n";
 }