diff --git a/src/cmp/cmpbackend-cxx/cmppass2-cont.lsp b/src/cmp/cmpbackend-cxx/cmppass2-cont.lsp
index 9f76b69d4..4aa709087 100644
--- a/src/cmp/cmpbackend-cxx/cmppass2-cont.lsp
+++ b/src/cmp/cmpbackend-cxx/cmppass2-cont.lsp
@@ -146,7 +146,7 @@
 (defun c2catch (c1form tag body)
   (declare (ignore c1form))
   (let* ((new-destination (tmp-destination *destination*))
-         (code (incf *last-label*)))
+         (code (gensym "CATCH")))
     (let ((*destination* 'VALUE0))
       (c2expr* tag))
     (let* ((*destination* new-destination)