summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2023-09-05 11:54:31 +0200
committerAndy Wingo <wingo@pobox.com>2023-09-05 11:54:31 +0200
commita80ccec2078d36405472137f11104020e5832bf4 (patch)
treed9b82d18a35555546d23ebd4f996e122ac7021ec
parentf31819b6b179429a617c8bd881dbb61219823e39 (diff)
downloadguile-a80ccec2078d36405472137f11104020e5832bf4.tar.gz
Add reprs for more s64 macro-instructions
* module/language/cps/utils.scm (primcall-raw-representations): Add sadd, ssub, etc; these are lowered to uadd, usub, etc later for the guile-vm target, but it is still useful to record their reprs for pre-lowering analysis.
-rw-r--r--module/language/cps/utils.scm3
1 files changed, 3 insertions, 0 deletions
diff --git a/module/language/cps/utils.scm b/module/language/cps/utils.scm
index 7a9f3b34e..b04c35dc3 100644
--- a/module/language/cps/utils.scm
+++ b/module/language/cps/utils.scm
@@ -404,6 +404,9 @@ by a label, respectively."
((untag-fixnum
assume-s64
scm->s64 load-s64 u64->s64
+ sadd ssub smul
+ sadd/immediate ssub/immediate smul/immediate
+ slsh slsh/immediate
srsh srsh/immediate
s8-ref s16-ref s32-ref s64-ref)
'(s64))