arith. expression crashes Kawa

[Sven dot Hartrumpf at fernuni-hagen dot de]

Hi all.

With current CVS version of kawa, I get the following strange behavior:

#|kawa:4|# (quotient (+ (quotient (* 95 1000 10) 100) 5) 10)
950                  ; fine

#|kawa:5|# (define quotient-fix (lambda (a b x) (quotient (+ (quotient (* a x 10) b) 5) 10)))     ; let's use a generalized expression as a function definition

#|kawa:6|# (quotient-fix 95 100 1000)
Argument #0 to 'quotient' has wrong type
        at gnu.mapping.WrongType.make(WrongType.java:56)
        at atInteractiveLevel.lambda1(Unknown Source)
        at atInteractiveLevel.apply3(Unknown Source)
        at gnu.expr.ModuleBody.applyN(ModuleBody.java:175)
        at gnu.expr.ModuleMethod.applyN(ModuleMethod.java:106)
        at gnu.mapping.Procedure.apply(Procedure.java:115)
        at gnu.mapping.CallContext.runUntilDone(CallContext.java:289)
        at gnu.expr.ModuleExp.evalModule(ModuleExp.java:188)
        at kawa.Shell.run(Shell.java:232)
        at kawa.Shell.run(Shell.java:180)
        at kawa.Shell.run(Shell.java:167)
        at kawa.Shell.run(Shell.java:154)
        at kawa.repl.main(repl.java:650)
Caused by: java.lang.ClassCastException
        ... 12 more   

                    ; but now it crashes

> java -version
java version "1.4.2"
Java(TM) 2 Runtime Environment, Standard Edition (build 1.4.2-b28)
Java HotSpot(TM) Client VM (build 1.4.2-b28, mixed mode)

Greetings
Sven

Attachment: pgp00000.pgp
Description: PGP signature