diff --git a/collects/compiler/private/xform.ss b/collects/compiler/private/xform.ss
index b60aee757a..af7867d7e2 100644
--- a/collects/compiler/private/xform.ss
+++ b/collects/compiler/private/xform.ss
@@ -853,7 +853,7 @@
           ;; The following don't need wrappers, but we need to check for
           ;;  nested function calls because it takes more than one argument:
           (append
-           '(memcpy memmove
+           '(memcpy memmove memcmp
                     strcmp strcoll strcpy _mzstrcpy strcat memset
                     printf sprintf vsprintf vprintf
                     strncmp