mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-19 19:20:23 +02:00
Code Activity

Add compiler support for s64 comparisons.

Browse source 
* module/language/cps/compile-bytecode.scm (compile-function): Add
  emitters for s64 comparisons.
* module/language/cps/effects-analysis.scm: Add entries.
* module/language/cps/primitives.scm (*comparisons*):
* module/language/cps/type-fold.scm (s64-<, s64-<=, s64-=, s64->=)
  (s64->): Add folders.
* module/language/cps/types.scm (s64-<, s64-<=, s64-=, s64->=, s64->):
  Add type checkers and inferrers.
This commit is contained in:
Andy Wingo 2017-10-29 19:33:00 +01:00
parent 73d1502630
commit 79a2748f83
5 changed files with 58 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

5
module/language/cps/primitives.scm
View file

@ -134,6 +134,9 @@ before it is lowered to CPS?"
u64-<
u64-<=
u64-=
s64-<
s64-<=
s64-=
f64-=
f64-<
f64-<=
@ -149,6 +152,8 @@ before it is lowered to CPS?"
>=
u64->
u64->=
s64->
s64->=
u64->=-scm
u64->-scm
f64->