diff --git a/module/language/cps/utils.scm b/module/language/cps/utils.scm
index b04c35dc3..ec8c2b3af 100644
--- a/module/language/cps/utils.scm
+++ b/module/language/cps/utils.scm
@@ -399,7 +399,8 @@ by a label, respectively."
       word-ref word-ref/immediate
       untag-char
       vector-length vtable-size bv-length
-      string-length string-ref)
+      string-length string-ref
+      symbol-hash)
      '(u64))
     ((untag-fixnum
       assume-s64