From: Taylor R Campbell Date: Fri, 19 Nov 2010 18:54:11 +0000 (+0000) Subject: Fix comment about euclidean division -- r may be zero. X-Git-Tag: 20101212-Gtk~12 X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=28b296de1d961be5ccd053552aa26645c399d8f8;p=mit-scheme.git Fix comment about euclidean division -- r may be zero. --- diff --git a/src/runtime/division.scm b/src/runtime/division.scm index dbea87910..ef4080bd6 100644 --- a/src/runtime/division.scm +++ b/src/runtime/division.scm @@ -78,7 +78,7 @@ USA. ;;;; Euclidean Division -;;; 0 < r < |d| +;;; 0 <= r < |d| (define (euclidean/ n d) (if (and (exact-integer? n) (exact-integer? d))