Debug DefineOperator

src/migl/lisp/operator/DefineOperator.java

@@ -54,7 +54,7 @@ public class DefineOperator implements LispOperator {
 		try {
 			key = lelt.toStr();
 		} catch(IllegalStateException ex) {
-			throw new LispError(lelt.toString() + LispError.ERR_UNKNOW);
+			throw new LispError(lelt.toString() + LispError.ERR_UNKNOW, ex);
 		}
 		//Recup la valeur dans la map
 		ConsList<Object> cl = define.get(key);
@@ -66,7 +66,7 @@ public class DefineOperator implements LispOperator {
 		return LispElement.generate(cl.car());
 	}
 	
-	public static LispElement eval(ConsList<Object> lisp) throws LispError {
+	public static LispElement eval(ConsList<Object> lisp) {
 		if(lisp.car() instanceof ConsList) {
 			String res = lisp.car().toString();
 			return LispElement.generate(res.substring(1, res.length() - 1));