diff options
author | Teddy <ted.sybil@gmail.com> | 2013-08-11 15:20:27 +0800 |
---|---|---|
committer | Teddy <ted.sybil@gmail.com> | 2013-08-11 15:20:27 +0800 |
commit | 856267ebffee5506047fdb56d1b7b317566adaad (patch) | |
tree | e640784114011f618e097cd9ad31371d6c44f949 /model.cpp | |
parent | 48b6bcbcc7973129b2d2c024919aed80ce3fe349 (diff) |
added more comments
Diffstat (limited to 'model.cpp')
-rw-r--r-- | model.cpp | 17 |
1 files changed, 0 insertions, 17 deletions
@@ -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; -} - |