diff options
Diffstat (limited to 'full-parse.rkt')
-rw-r--r-- | full-parse.rkt | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/full-parse.rkt b/full-parse.rkt index cec14e2..cb1d38b 100644 --- a/full-parse.rkt +++ b/full-parse.rkt @@ -31,9 +31,9 @@ [(null? remaining-expression) (reverse (add-operation-to-list current-term other-terms))] [(eqv? (car remaining-expression) operator) - (inner '() (add-operation-to-list current-term other-terms) (cdr remaining-expression))] + (reverse (inner '() (add-operation-to-list current-term other-terms) (cdr remaining-expression)))] [else - (inner (cons (car remaining-expression) current-term) other-terms (cdr remaining-expression))])) + (reverse (inner (cons (car remaining-expression) current-term) other-terms (cdr remaining-expression)))])) (if (not (contains operator expr)) (next-operation expr) |