diff --git a/foreign/c/pointer.scm b/foreign/c/pointer.scm
index 454724c..569c417 100644
--- a/foreign/c/pointer.scm
+++ b/foreign/c/pointer.scm
@@ -29,9 +29,7 @@
   (else (define-c-procedure c-memset-pointer->address libc 'memset 'uint64 '(pointer uint8 int))))
 ;(define-c-procedure c-memset-address libc 'memset 'pointer '(uint64 uint8 int))
 ;(define-c-procedure c-printf libc 'printf 'int '(pointer pointer))
-(cond-expand
-  (racket (define-c-procedure c-malloc libc 'malloc 'pointer '(int)))
-  (else (define (c-malloc size) (malloc size 'raw))))
+(define-c-procedure c-malloc libc 'malloc 'pointer '(int))
 (define-c-procedure c-strlen libc 'strlen 'int '(pointer))
 
 (define make-c-bytevector