Changeset 8634


Ignore:
Timestamp:
02/24/05 18:51:07 (16 years ago)
Author:
piso
Message:

getDescription()

File:
1 edited

Legend:

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

    r8543 r8634  
    33 *
    44 * Copyright (C) 2002-2005 Peter Graves
    5  * $Id: Symbol.java,v 1.171 2005-02-12 03:24:26 piso Exp $
     5 * $Id: Symbol.java,v 1.172 2005-02-24 18:51:07 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    266266    public LispObject getDescription() throws ConditionThrowable
    267267    {
    268         StringBuffer sb = new StringBuffer("The symbol ");
    269         sb.append(name.writeToString());
    270         return new SimpleString(sb);
     268        final LispThread thread = LispThread.currentThread();
     269        Binding lastSpecialBinding = thread.lastSpecialBinding;
     270        thread.bindSpecial(_PRINT_ESCAPE_, NIL);
     271        try {
     272            StringBuffer sb = new StringBuffer("The symbol ");
     273            sb.append(name.writeToString());
     274            return new SimpleString(sb);
     275        }
     276        finally {
     277            thread.lastSpecialBinding = lastSpecialBinding;
     278        }
    271279    }
    272280
Note: See TracChangeset for help on using the changeset viewer.