~ chicken-core (chicken-5) bed0ad7f2cc7a3c65c4bbe3cf3bf9456a5a33309

commit bed0ad7f2cc7a3c65c4bbe3cf3bf9456a5a33309
Author:     felix <felix@call-with-current-continuation.org>
AuthorDate: Fri Nov 10 12:03:48 2017 +0100
Commit:     felix <felix@call-with-current-continuation.org>
CommitDate: Fri Nov 10 12:03:48 2017 +0100

    random-bytes: invalid use of inline C function

diff --git a/extras.scm b/extras.scm
index 0eaacd32..ff814761 100644
--- a/extras.scm
+++ b/extras.scm
@@ -679,7 +679,7 @@
         (when (< size 0) 
           (##sys#error 'random-bytes "invalid size" size)))
       (let* ((dest (cond (buf
-                         (when (or (##core#inline "C_immediatep" buf)
+                         (when (or (##sys#immediate? buf)
                                    (not (##core#inline "C_byteblockp" buf)))
                            (##sys#error 'random-bytes
                                         "invalid buffer type" buf))