diff --git a/module/mescc/compile.scm b/module/mescc/compile.scm
index ba6900a8..326dbbf9 100644
--- a/module/mescc/compile.scm
+++ b/module/mescc/compile.scm
@@ -327,11 +327,6 @@
   (let ((field (field-field info struct field)))
     (field:pointer field)))
 
-(define (field-size info struct field)
-  (if (eq? (type:type struct) 'union) 0
-      (let ((field (field-field info struct field)))
-        (field:size field info))))
-
 (define (field-size info struct field)
   (let ((field (field-field info struct field)))
     (field:size field info)))