diff options
Diffstat (limited to 'src/cljcc/analyzer.clj')
| -rw-r--r-- | src/cljcc/analyzer.clj | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/cljcc/analyzer.clj b/src/cljcc/analyzer.clj index 5eb03ee..504e8ab 100644 --- a/src/cljcc/analyzer.clj +++ b/src/cljcc/analyzer.clj @@ -68,7 +68,7 @@ {:body [] :variable-map {}} (:body f))] - (assoc f :body updated-body))) + (assoc f :body (:body updated-body)))) (defn validate [ast] (map validate-function ast)) @@ -90,7 +90,7 @@ return 0; }")) (pp/pprint - (p/parse-from-src + (validate-from-src "int main (void) { int x; int a = -1; |