[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Guile-commits] 01/02: Fix mistype in specialize-numbers
From: |
Andy Wingo |
Subject: |
[Guile-commits] 01/02: Fix mistype in specialize-numbers |
Date: |
Mon, 20 Nov 2023 10:51:55 -0500 (EST) |
wingo pushed a commit to branch main
in repository guile.
commit 89501a83ceec5ac4d3449e92ba2109fb77448b31
Author: Andy Wingo <wingo@pobox.com>
AuthorDate: Mon Nov 20 15:11:08 2023 +0100
Fix mistype in specialize-numbers
*
module/language/cps/specialize-numbers.scm (compute-specializable-u64-vars):
We were failing to match scm->u64/truncate.
---
module/language/cps/specialize-numbers.scm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/module/language/cps/specialize-numbers.scm
b/module/language/cps/specialize-numbers.scm
index c7bb334bc..12c9deecc 100644
--- a/module/language/cps/specialize-numbers.scm
+++ b/module/language/cps/specialize-numbers.scm
@@ -846,7 +846,7 @@ BITS indicating the significant bits needed for a variable.
BITS may be
(_ #f)))
(compute-specializable-vars cps body preds defs exp-result-u64?
- '(scm->u64 'scm->u64/truncate)))
+ '(scm->u64 scm->u64/truncate)))
;; Compute vars whose definitions are all exact integers in the fixnum
;; range and whose uses include an untag operation.