diff --git a/module/language/c99/compiler.mes b/module/language/c99/compiler.mes
index 26d37eb6..7af6c89f 100644
--- a/module/language/c99/compiler.mes
+++ b/module/language/c99/compiler.mes
@@ -2517,7 +2517,7 @@
 
 (define* (info->object o)
   (stderr "compiling: object\n")
-  `((functions . ,(filter (compose function:text cdr) (.functions o)))
+  `((functions . ,(filter (compose pair? function:text cdr) (.functions o)))
     (globals . ,(.globals o))))
 
 (define* (c99-input->elf #:key (defines '()) (includes '()))