1

2023-03-31 17:33:44 +08:00 · 2023-03-31 17:33:44 +08:00 · 369587606d
commit 369587606d
parent b6c896a7c5
1 changed files with 7 additions and 1 deletions
--- a/a8/lisp.cc
+++ b/a8/lisp.cc
@ -119,9 +119,15 @@ namespace a8
                 [] (const List& params) -> std::shared_ptr<Value>
                 {
                     double result = 0;
+                     int i = 0;
                     for (auto param : *params) {
                         Atom&& atom = std::any_cast<Atom>(param->value);
-                         result -= atom.val;
+                         if (i <= 0) {
+                             result = atom.val;
+                         } else {
+                             result -= atom.val;
+                         }
+                         ++i;
                     }
                     return std::make_shared<Value>(Atom(result));
                 });