|
@@ -18,19 +18,14 @@ public class ConsOperator implements LispOperator {
|
|
|
//Recup + evaluation de la liste
|
|
|
cl = this.parseList(LispElement.getElement(lisp.cdr().car()).toString());
|
|
|
//Ajoute la valeur de gauche devant
|
|
|
- if(lisp.car() instanceof ConsList) {
|
|
|
- //Si la valeur gauche est aussi une liste on evalue sa valaue
|
|
|
- cl = cl.prepend(LispElement.getElement(lisp.car()).value);
|
|
|
- } else {
|
|
|
- cl = cl.prepend(lisp.car());
|
|
|
- }
|
|
|
+ cl = cl.prepend(LispElement.getElement(lisp.car()).value);
|
|
|
} else {
|
|
|
LispElement le;
|
|
|
if(lisp.car() instanceof ConsList) {
|
|
|
//Si l'element est une liste on evalue sa valeur
|
|
|
le = LispElement.getElement(lisp.car());
|
|
|
} else {
|
|
|
- le = LispElement.generate(lisp.car());
|
|
|
+ le = LispElement.getElement(lisp.car());
|
|
|
}
|
|
|
cl = ConsListFactory.asList(le + " . " + lisp.cdr().car());
|
|
|
}
|