~ chicken-core (chicken-5) 1948e0047cc8fc908ecbd0c7de46812f8844c1a9
commit 1948e0047cc8fc908ecbd0c7de46812f8844c1a9 Author: felix <felix@call-with-current-continuation.org> AuthorDate: Thu Dec 15 07:46:42 2011 +0100 Commit: felix <felix@call-with-current-continuation.org> CommitDate: Thu Dec 15 07:46:42 2011 +0100 removed obsolete comment diff --git a/optimizer.scm b/optimizer.scm index aa5f7fd8..3d917ff4 100644 --- a/optimizer.scm +++ b/optimizer.scm @@ -1111,8 +1111,6 @@ ;; number of arguments plus 1. ;; - if <counted> is given and true and <argc> is between 1-8, append "<count>" ;; to the name of the inline routine. - ;; - if <safe> is 'specialized and `unsafe-specialized-arithmetic' is declared, - ;; then assume it is safe (let ((argc (first classargs)) (rargc (length callargs)) (safe (third classargs))Trap