1

2023-03-02 22:24:23 +08:00 · 2023-03-02 22:24:23 +08:00 · 7bd1467401
commit 7bd1467401
parent 6bf47d6566
1 changed files with 10 additions and 1 deletions
--- a/a8/lisp.h
+++ b/a8/lisp.h
@ -6,11 +6,19 @@
  列表: list
  原子: atom
 */
+
 namespace a8
 {

    namespace lisp
    {
+        enum class ValueType : int
+        {
+            kAtom = 1,
+            kList = 2,
+            kSymbol = 3,
+            kCProc = 4,
+        };

        struct List
        {
@ -29,7 +37,8 @@ namespace a8

        struct Value
        {
-            int value_type = 0;
+            ValueType type;
+            std::shared_ptr<Symbol> symbol;
            std::shared_ptr<Atom> atom;
            std::shared_ptr<List> list;
        }