雉兔

src/compile/mod.rs

@@ -324,7 +324,37 @@ fn compile_name_multi_statement(mut env: &mut Env, idents: &[parse::Identifier])
 
 fn compile_statement(mut env: &mut Env, st: &parse::Statement) -> String {
     match st {
-        parse::Statement::Reference { data, ident } => unimplemented!("reference"),
+        parse::Statement::Reference { data, ident: None } => { /* not named */
+            env.ans_counter += 1;
+            let r = format!(
+                "{}let _ans{} = {};\n",
+                "    ".repeat(env.indent_level),
+                env.ans_counter,
+                compile_literal(&env, data)
+            );
+
+            env.variables_not_yet_named.push(format!("_ans{}", env.ans_counter));
+
+            return r;
+        },
+        parse::Statement::Reference { data, ident: Some(ident) } => {
+            env.ans_counter += 1;
+            let r = format!(
+                "{}let _ans{} = {};\n{}let {}{} = _ans{};\n",
+                "    ".repeat(env.indent_level),
+                env.ans_counter,
+                compile_literal(&env, data),
+                "    ".repeat(env.indent_level),
+                if env.ident_map.is_mutable(&ident) {
+                    "mut "
+                } else {
+                    ""
+                },
+                env.ident_map.translate_from_hanzi(&ident),
+                env.ans_counter,
+            );
+            return r;
+        },
         parse::Statement::NameMulti { idents } => {
             return compile_name_multi_statement(&mut env, &idents)
         }
@@ -352,7 +382,7 @@ fn compile_statement(mut env: &mut Env, st: &parse::Statement) -> String {
                 ));
                 new_zhi1.push(format!("_ans{}", env.ans_counter));
             }
-            env.variables_not_yet_named = new_zhi1;
+            env.variables_not_yet_named = new_zhi1; /* POSSIBLY FIXME */
             return r;
         }
         parse::Statement::Print => {

src/main.rs

@@ -223,6 +223,10 @@ mod tests {
     fn test043() {
         test("test043")
     }
+    #[test]
+    fn test044() {
+        test("test044")
+    }
 }
 
 use std::collections::HashMap;

test044.rs

@@ -0,0 +1,12 @@
+fn main() {
+    let TOU2 = 35.0;
+    let ZU2 = 94.0;
+    let _ans1 = ZU2 / 2.0;
+    let _ans2 = _ans1 - TOU2;
+    let TU4 = _ans2;
+    let _ans3 = TOU2 - TU4;
+    let ZHI4 = _ans3;
+    let _ans4 = ZHI4;
+    let _ans5 = TU4;
+    println!("{} {}", _ans4, _ans5);
+}

test044.wy

@@ -0,0 +1,4 @@
+吾有二數。曰三十五。曰九十四。名之曰「頭」曰「足」。
+除「足」以二。減其以「頭」。名之曰「兔」。
+減「頭」以「兔」。名之曰「雉」。
+夫「雉」夫「兔」。書之。