Changeset 5241


Ignore:
Timestamp:
12/21/03 15:55:22 (17 years ago)
Author:
piso
Message:

getMessage()

File:
1 edited

Legend:

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

    r5153 r5241  
    33 *
    44 * Copyright (C) 2002-2003 Peter Graves
    5  * $Id: UndefinedFunction.java,v 1.6 2003-12-15 17:35:05 piso Exp $
     5 * $Id: UndefinedFunction.java,v 1.7 2003-12-21 15:55:22 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    5151    public String getMessage()
    5252    {
    53         StringBuffer sb = new StringBuffer("undefined function");
    54         sb.append(' ');
    55         sb.append(String.valueOf(getCellName()));
    56         return sb.toString();
     53        LispObject cellName = getCellName();
     54        if (cellName instanceof Symbol)
     55            return "The symbol " + cellName.toString() + " does not have a function definition.";
     56        else
     57            return "Undefined function " + cellName;
    5758    }
    5859}
Note: See TracChangeset for help on using the changeset viewer.