~ chicken-core (chicken-5) b0ce140766b3929a9c7354336c1832370b8fc54e

commit b0ce140766b3929a9c7354336c1832370b8fc54e
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Fri Aug 19 21:25:05 2011 +0200
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Fri Aug 19 21:25:05 2011 +0200

    typo fix

diff --git a/runtime.c b/runtime.c
index 22ec794f..7a166830 100644
--- a/runtime.c
+++ b/runtime.c
@@ -6389,7 +6389,7 @@ void C_ccall C_divide(C_word c, C_word closure, C_word k, C_word n1, ...)
 	if((n2 = C_unfix(n1)) == 0)
 	  barf(C_DIVISION_BY_ZERO_ERROR, "/");
 
-	if((fresult = (double)iresult / (double)n2) != (iresult /= n2))
+	if((fresult = (double)iresult / (double)n2) != (iresult / n2))
 	  fflag = 1;
       }
     }