Remove math.ratios dependencyfrom alien.compiler

release
Marie-Pascal 2007-10-31 21:51:38 -04:00
parent a01a7e4383
commit 06519ea482
1 changed files with 1 additions and 1 deletions

View File

@ -79,7 +79,7 @@ M: int-regs inc-reg-class
M: float-regs inc-reg-class
dup (inc-reg-class)
fp-shadows-int? [ reg-size 4 / int-regs +@ ] [ drop ] if ;
fp-shadows-int? [ reg-size cell /i int-regs +@ ] [ drop ] if ;
: reg-class-full? ( class -- ? )
dup class get swap param-regs length >= ;