Changeset 4229


Ignore:
Timestamp:
10/06/03 17:13:28 (19 years ago)
Author:
piso
Message:

Added support for describing constants.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/j/src/org/armedbear/lisp/describe.java

    r3883 r4229  
    33 *
    44 * Copyright (C) 2003 Peter Graves
    5  * $Id: describe.java,v 1.6 2003-09-19 01:46:42 piso Exp $
     5 * $Id: describe.java,v 1.7 2003-10-06 17:13:28 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    5151                sb.append(".\n");
    5252                if (symbol.isSpecialVariable()) {
    53                     sb.append("It is a special variable; ");
     53                    sb.append("It is a ");
     54                    sb.append(symbol.isConstant() ? "constant" : "special variable");
     55                    sb.append("; ");
    5456                    LispObject value = symbol.getSymbolValue();
    5557                    if (value != null) {
Note: See TracChangeset for help on using the changeset viewer.