aboutsummaryrefslogtreecommitdiff
path: root/model.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'model.cpp')
-rw-r--r--model.cpp17
1 files changed, 0 insertions, 17 deletions
diff --git a/model.cpp b/model.cpp
index 2d3a46b..53b5541 100644
--- a/model.cpp
+++ b/model.cpp
@@ -125,20 +125,3 @@ string EvalObj::ext_repr() {
res = "(" + res + ")";
return res;
}
-
-
-
-bool make_exec(Pair *ptr) {
- if (ptr == empty_list) return true;
- EvalObj *nptr;
- for (;;)
- if ((nptr = ptr->cdr)->is_pair_obj())
- {
- ptr->next = TO_PAIR(nptr);
- ptr = ptr->next;
- }
- else break;
- ptr->next = NULL;
- return ptr->cdr == empty_list;
-}
-