Index: src/Pugs/AST/Internals/Instances.hs
===================================================================
--- src/Pugs/AST/Internals/Instances.hs	(Revision 9727)
+++ src/Pugs/AST/Internals/Instances.hs	(Arbeitskopie)
@@ -704,6 +704,7 @@
     showPerl5 (VStr aa) = showP5ArrayObj "VStr" [showPerl5 aa]
     showPerl5 (VList aa) = showP5ArrayObj "VList" [showPerl5 aa]
     showPerl5 (VType aa) = showP5ArrayObj "VType" [showPerl5 aa]
+    showPerl5 (VCode aa) = showP5Class "VUndef"  -- hack
 
 instance JSON Val where
     showJSON (VUndef) = showJSScalar "VUndef"