(1+, 1-): Moved to numbers.c.

diff --git a/ice-9/boot-9.scm b/ice-9/boot-9.scm
index 5b9ee3e..6cb9abc 100644 (file)
--- a/ice-9/boot-9.scm
+++ b/ice-9/boot-9.scm
@@ -239,8 +239,6 @@
 ;;;
 
 (define (identity x) x)
-(define (1+ n) (+ n 1))
-(define (1- n) (+ n -1))
 (define (and=> value procedure) (and value (procedure value)))
 (define call/cc call-with-current-continuation)