~ chicken-core (chicken-5) 904986f29cebaaf962cd1493f60e7d3b87f24bea

commit 904986f29cebaaf962cd1493f60e7d3b87f24bea
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Sat Aug 28 12:59:59 2010 +0200
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Sat Aug 28 13:00:30 2010 +0200

    removed broken rewerite rule for cpu-time (thanks to Kon Lovett)

diff --git a/c-platform.scm b/c-platform.scm
index dcaaaf8f..7c4fe8dc 100644
--- a/c-platform.scm
+++ b/c-platform.scm
@@ -133,7 +133,7 @@
     fpfloor fpceiling fptruncate fpround fpsin fpcos fptan fpasin fpacos fpatan
     fpatan2 fpexp fpexpt fplog fpsqrt fpabs fpinteger?
     arithmetic-shift void flush-output thread-specific thread-specific-set!
-    not-pair? atom? null-list? print print* error cpu-time proper-list? call/cc
+    not-pair? atom? null-list? print print* error proper-list? call/cc
     blob-size u8vector->blob/shared s8vector->blob/shared u16vector->blob/shared
     s16vector->blob/shared u32vector->blob/shared s32vector->blob/shared
     f32vector->blob/shared f64vector->blob/shared
@@ -196,7 +196,7 @@
     f32vector-set! f64vector-set!
     u8vector-ref s8vector-ref u16vector-ref s16vector-ref u32vector-ref s32vector-ref
     u8vector-set! s8vector-set! u16vector-set! s16vector-set! u32vector-set! s32vector-set!
-    ##sys#intern-symbol ##sys#make-symbol make-record-instance error cpu-time ##sys#block-set!) )
+    ##sys#intern-symbol ##sys#make-symbol make-record-instance error ##sys#block-set!) )
 
 (define foldable-bindings
   (lset-difference 
@@ -536,7 +536,6 @@
 (rewrite 'call-with-values 13 "C_call_with_values" #t)
 (rewrite '##sys#call-with-values 13 "C_u_call_with_values" #f)
 (rewrite '##sys#call-with-values 13 "C_call_with_values" #t)
-(rewrite 'cpu-time 13 "C_cpu_time" #t)
 (rewrite 'locative-ref 13 "C_locative_ref" #t)
 (rewrite '##sys#continuation-graft 13 "C_continuation_graft" #t)
 
diff --git a/manual/faq b/manual/faq
index 9e066755..9acb81fe 100644
--- a/manual/faq
+++ b/manual/faq
@@ -472,7 +472,7 @@ The following extended bindings are handled specially:
 {{pointer-u32-set!}} {{pointer-s32-set!}} {{pointer-f32-set!}} {{pointer-f64-set!}} 
 {{make-record-instance}}
 {{locative-ref}} {{locative-set!}} {{locative?}} {{locative->object}} {{identity}}
-{{cpu-time}} {{error}} {{call/cc}} {{any?}}
+{{error}} {{call/cc}} {{any?}}
 {{substring=?}} {{substring-ci=?}} {{substring-index}} {{substring-index-ci}}
 {{printf}} {{sprintf}} {{fprintf}} {{format}} {{o}}