diff options
| author | Rose Hogenson <rhogenson@posteo.net> | 2022-08-07 15:55:13 -0700 |
|---|---|---|
| committer | Rose Hogenson <rhogenson@posteo.net> | 2022-08-07 15:55:47 -0700 |
| commit | 35d375807bd84f9c7ca82e28042d20ded7b65498 (patch) | |
| tree | ba0f34d009cff54ae69adc07eca4cd066f2f5cb7 /lib/csc | |
| parent | 72294a6a1a690d396d13a7e3861f4b720e78cdb3 (diff) | |
| download | chromatopelma-35d375807bd84f9c7ca82e28042d20ded7b65498.tar.zst | |
Add int<? and eq?.
Diffstat (limited to 'lib/csc')
| -rw-r--r-- | lib/csc/encoding.csc | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lib/csc/encoding.csc b/lib/csc/encoding.csc index 9afa40f..83258c8 100644 --- a/lib/csc/encoding.csc +++ b/lib/csc/encoding.csc @@ -175,6 +175,11 @@ (make-opcode w 15 (is-const? x) #f) (arg->le-bytes w dest) (arg->le-bytes w x)) + (('int<? dest x y) + (make-opcode w 16 (is-const? x) (is-const? y)) + (arg->le-bytes w dest) + (arg->le-bytes w x) + (arg->le-bytes w y)) (_ (error "invalid opcode" opcode)))) |