1 21 22 package org.armedbear.lisp; 23 24 public final class WrongNumberOfArgumentsException extends ProgramError 25 { 26 private final LispObject object; 27 private final String name; 28 29 public WrongNumberOfArgumentsException(LispObject obj) 30 { 31 this.object = obj; 32 name = null; 33 } 34 35 public WrongNumberOfArgumentsException(String name) 36 { 37 object = null; 38 this.name = name; 39 } 40 41 public String getMessage() 42 { 43 StringBuffer sb = new StringBuffer ("Wrong number of arguments"); 44 if (name != null) { 45 sb.append(" for "); 46 sb.append(name); 47 } else if (object != null && object.getName() != null) { 48 sb.append(" for "); 49 sb.append(object.getName()); 50 } 51 sb.append('.'); 52 return sb.toString(); 53 } 54 } 55 | Popular Tags |