Browse Source

Ajout gestion long

Arthur Brandao 6 năm trước cách đây
mục cha
commit
d7ffad5064
1 tập tin đã thay đổi với 4 bổ sung0 xóa
  1. 4 0
      src/migl/lisp/LispElement.java

+ 4 - 0
src/migl/lisp/LispElement.java

@@ -175,6 +175,10 @@ public class LispElement {
 		else if(elt.getClass() == Boolean.class) {
 			elt = LispBoolean.valueOf((boolean) elt);
 		}
+		else if(elt.getClass() == Long.class) {
+			Long l = (Long) elt;
+			elt = l.doubleValue();
+		}
 		else if(elt.getClass() != BigInteger.class && elt.getClass() != Double.class && elt.getClass() != LispBoolean.class && elt.getClass() != String.class) {
 			throw new IllegalArgumentException("Object class is not a Lisp element");
 		}