diff --git a/src/new-cmp/cmploc.lsp b/src/new-cmp/cmploc.lsp
index be76dd09e..dc5c8d450 100644
--- a/src/new-cmp/cmploc.lsp
+++ b/src/new-cmp/cmploc.lsp
@@ -242,7 +242,7 @@
 
 (defun set-trash-loc (loc)
   (when (loc-has-side-effects loc)
-    (wt-nl "(void)(" loc ");")))
+    (wt-nl loc ";")))
 
 (defun set-the-loc (value type loc)
   (set-loc value loc))