Commits

O01eg committed db399ce

GP: Make optimization less strong.

  • Participants
  • Parent commits 6d24e8f

Comments (0)

Files changed (1)

src/functions.cpp

 	FuncData(func_01_cons, "CONS", 2, GP::OPT_NONE, GP::OPT_REQ_INT, true),
 	FuncData(func_02_car, "CAR", 1, GP::OPT_REQ_LIST, GP::OPT_NONE, false),
 	FuncData(func_03_cdr, "CDR", 1, GP::OPT_REQ_LIST, GP::OPT_NONE, false),
-	FuncData(func_04_is_nil, "NULL?", 1, GP::OPT_BOOL, GP::OPT_BOOL, false),
-	FuncData(func_05_is_int, "INT?", 1, GP::OPT_NONE, GP::OPT_BOOL, false),
-	FuncData(func_06_is_func, "FUNC?", 1, GP::OPT_NONE, GP::OPT_BOOL, false),
-	FuncData(func_07_is_adf, "ADF?", 1, GP::OPT_NONE, GP::OPT_BOOL, false),
-	FuncData(func_08_is_param, "PARAM?", 1, GP::OPT_NONE, GP::OPT_BOOL, false),
-	FuncData(func_09_is_quote, "QUOTE?", 1, GP::OPT_NONE, GP::OPT_BOOL, false),
-	FuncData(func_10_is_list, "LIST?", 1, GP::OPT_NONE, GP::OPT_BOOL, false),
+	FuncData(func_04_is_nil, "NULL?", 1, GP::OPT_BOOL, GP::OPT_REQ_LIST, false),
+	FuncData(func_05_is_int, "INT?", 1, GP::OPT_NONE, GP::OPT_REQ_LIST, false),
+	FuncData(func_06_is_func, "FUNC?", 1, GP::OPT_NONE, GP::OPT_REQ_LIST, false),
+	FuncData(func_07_is_adf, "ADF?", 1, GP::OPT_NONE, GP::OPT_REQ_LIST, false),
+	FuncData(func_08_is_param, "PARAM?", 1, GP::OPT_NONE, GP::OPT_REQ_LIST, false),
+	FuncData(func_09_is_quote, "QUOTE?", 1, GP::OPT_NONE, GP::OPT_REQ_LIST, false),
+	FuncData(func_10_is_list, "LIST?", 1, GP::OPT_NONE, GP::OPT_REQ_LIST, false),
 	FuncData(func_11_int_plus, "+", 2, GP::OPT_REQ_INT, GP::OPT_REQ_LIST, true),
 	FuncData(func_12_int_minus, "-", 2, GP::OPT_REQ_INT, GP::OPT_REQ_LIST, true),
 	FuncData(func_13_int_mult, "*", 2, GP::OPT_REQ_INT, GP::OPT_REQ_LIST, true),
 	FuncData(func_14_int_div, "DIV", 2, GP::OPT_REQ_INT, GP::OPT_REQ_LIST, true),
 	FuncData(func_15_int_mod, "MOD", 2, GP::OPT_REQ_INT, GP::OPT_REQ_LIST, true),
-	FuncData(func_16_equal, "EQ", 2, GP::OPT_NONE, GP::OPT_BOOL, false),
-	FuncData(func_17_and, "AND", 2, GP::OPT_BOOL, GP::OPT_BOOL, false),
-	FuncData(func_18_or, "OR", 2, GP::OPT_BOOL, GP::OPT_BOOL, false),
-	FuncData(func_19_int_less, "<", 2, GP::OPT_REQ_INT, GP::OPT_BOOL, false),
-	FuncData(func_20_int_greater, ">", 2, GP::OPT_REQ_INT, GP::OPT_BOOL, false),
-	FuncData(func_21_int_equal, "==", 2, GP::OPT_REQ_INT, GP::OPT_BOOL, false),
+	FuncData(func_16_equal, "EQ", 2, GP::OPT_NONE, GP::OPT_REQ_LIST, false),
+	FuncData(func_17_and, "AND", 2, GP::OPT_BOOL, GP::OPT_REQ_LIST, false),
+	FuncData(func_18_or, "OR", 2, GP::OPT_BOOL, GP::OPT_REQ_LIST, false),
+	FuncData(func_19_int_less, "<", 2, GP::OPT_REQ_INT, GP::OPT_REQ_LIST, false),
+	FuncData(func_20_int_greater, ">", 2, GP::OPT_REQ_INT, GP::OPT_REQ_LIST, false),
+	FuncData(func_21_int_equal, "==", 2, GP::OPT_REQ_INT, GP::OPT_REQ_LIST, false),
 	FuncData()
 };