Merge pull request #87 from Chia-Network/20240305-add-assign-support-and-upgrade-clvm-tools-rs

Add assign support (complex bindings) and upgrade clvm_tools_rs to current

Author: prozacchiwawa

test/collatz.cl

@@ -7,15 +7,20 @@
   ;; Determine if number is odd
   ;; test.
   (defun-inline odd (X) (logand X 1))
+
   ;; Actual collatz function
   ;; determines number of step til 1
   (defun collatz (N X)
     (if (= X 1) ; We got 1
       N ; Return the number of steps
       (let ((incN (+ N 1))) ; Next N
-        (if (odd X) ; Is it odd?
-          (collatz incN (+ 1 (* 3 X))) ; Odd? 3 X + 1
-          (collatz incN (/ X 2)) ; Even? X / 2
+        (assign
+          (two three) (list 2 3)
+
+          (if (odd X) ; Is it odd?
+            (collatz incN (+ 1 (* three X))) ; Odd? 3 X + 1
+            (collatz incN (/ X two)) ; Even? X / 2
+            )
           )
         )
       )

test/test/test.js

@@ -384,13 +384,12 @@ describe("Basic element tests", function() {
 
         // Pgup right 7 space QQEX C-f defun-inline C-f logand right 6 Q
         // find a monaco-list-rows with a descendant that contains QQEX.
-        await sendPgUp();
-        await sendRight(7);
+        await findString(driver, 'two three');
+        await sendRight(1);
         await sendString(" QQEX");
 
-        await findString(driver, 'defun-inline');
-        await findString(driver, 'logand');
-        await sendRight(5);
+        await findString(driver, '(odd X');
+        await sendRight(1);
         await sendString(" Q");
 
         let monacoLists = await driver.findElements(By.css(".monaco-list"));