Introducing ARSHIFT (Arithmetic Shift Right) to fix heart game.

2022-06-04 20:38:36 -07:00
parent ab2b73f2ff
commit e6ca85f4f6
6 changed files with 16 additions and 9 deletions
--- a/common/base_tests.fs
+++ b/common/base_tests.fs
@ -138,3 +138,8 @@ e: test-rshift
  $1234 4 rshift $123 =assert
  -1 cell 8 * 1- rshift 1 =assert
 ;e
+
+e: test-arshift
+  $1234 4 arshift $123 =assert
+  -1 cell 8 * 1- arshift -1 =assert
+;e