Changeset 3786

Timestamp:

09/15/03 03:52:12 (20 years ago)

Author:

piso

Message:

toString()

File:

• trunk/j/src/org/armedbear/lisp/Symbol.java (modified) (2 diffs)

trunk/j/src/org/armedbear/lisp/Symbol.java

@@ -3 +3 @@
  *
  * Copyright (C) 2002-2003 Peter Graves
- * $Id: Symbol.java,v 1.71 2003-09-14 17:36:12 piso Exp $
+ * $Id: Symbol.java,v 1.72 2003-09-15 03:52:12 piso Exp $
  *
  * This program is free software; you can redistribute it and/or
@@ -366 +366 @@
         boolean escape = false;
         for (int i = name.length(); i-- > 0;) {
-            if (Character.isLowerCase(name.charAt(i))) {
+            char c = name.charAt(i);
+            if (c == '(' || c == ')') {
+                escape = true;
+                break;
+            }
+            if (Character.isWhitespace(c)) {
+                escape = true;
+                break;
+            }
+            if (Character.isLowerCase(c)) {
                 escape = true;
                 break;