From dc8a480c65fabf35b99398120aeccca8f2874c6d Mon Sep 17 00:00:00 2001
From: Rose Hogenson <rhogenson@posteo.net>
Date: Mon, 22 Aug 2022 20:07:06 -0700
Subject: Add a few primitive list operations.

---
 bytecode/src/encoding.rs | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'bytecode/src/encoding.rs')

diff --git a/bytecode/src/encoding.rs b/bytecode/src/encoding.rs
index 8fccc1a..44fff51 100644
--- a/bytecode/src/encoding.rs
+++ b/bytecode/src/encoding.rs
@@ -113,6 +113,12 @@ fn op_decoding<T: Read>(prog: &mut T) -> Result<Option<Op>, String> {
             read_arg(prog, arg1_const)?,
             read_arg(prog, arg2_const)?,
         ),
+        18 => Op::Cons(
+            read_local(prog)?,
+            read_arg(prog, arg1_const)?,
+            read_arg(prog, arg2_const)?,
+        ),
+        19 => Op::Len(read_local(prog)?, read_arg(prog, arg1_const)?),
         _ => {
             return Err(String::from("invalid opcode"));
         }
-- 
cgit v1.3.1