Changeset 13798 in project
 Timestamp:
 03/17/09 04:07:01 (11 years ago)
 Location:
 release/4/stack
 Files:

 2 edited
Legend:
 Unmodified
 Added
 Removed

release/4/stack/tags/2.0.0/chickenprimitiveobjectinlines.scm
r13760 r13798 979 979 (defineinline (%even? n) (##core#inline "C_i_evenp" n)) 980 980 981 (defineinline (%+ x y) ((##core#primitive "C_plus") x y)) 981 982 (defineinline (% x y) ((##core#primitive "C_minus") x y)) 982 983 (defineinline (%* x y) ((##core#primitive "C_times") x y)) 983 984 (defineinline (%/ x y) ((##core#primitive "C_divide") x y)) 984 (defineinline (%+ x y) ((##core#primitive "C_plus") x y)) 985 986 (defineinline (%add1 x) (%+ x 1)) 987 (defineinline (%sub1 x) (% x 1)) 985 988 986 989 (defineinline (%quotient x y) ((##core#primitive "C_quotient") x y)) 
release/4/stack/trunk/chickenprimitiveobjectinlines.scm
r13760 r13798 979 979 (defineinline (%even? n) (##core#inline "C_i_evenp" n)) 980 980 981 (defineinline (%+ x y) ((##core#primitive "C_plus") x y)) 981 982 (defineinline (% x y) ((##core#primitive "C_minus") x y)) 982 983 (defineinline (%* x y) ((##core#primitive "C_times") x y)) 983 984 (defineinline (%/ x y) ((##core#primitive "C_divide") x y)) 984 (defineinline (%+ x y) ((##core#primitive "C_plus") x y)) 985 986 (defineinline (%add1 x) (%+ x 1)) 987 (defineinline (%sub1 x) (% x 1)) 985 988 986 989 (defineinline (%quotient x y) ((##core#primitive "C_quotient") x y))
Note: See TracChangeset
for help on using the changeset viewer.