diff --git a/src/docode.c b/src/docode.c
index ebe6046da8ab0d7eb09ecf031ba41e9b878222af..db13058a192ad472f643614d54fc38635b032f79 100644
--- a/src/docode.c
+++ b/src/docode.c
@@ -5,7 +5,7 @@
 \*/
 /**/
 #include "global.h"
-RCSID("$Id: docode.c,v 1.54 1999/11/11 13:55:58 grubba Exp $");
+RCSID("$Id: docode.c,v 1.55 1999/11/18 16:40:52 grubba Exp $");
 #include "las.h"
 #include "program.h"
 #include "language.h"
@@ -683,6 +683,12 @@ static int do_docode2(node *n,int flags)
     return 0;
   }
 
+  case F_POP_VALUE:
+    {
+      DO_CODE_BLOCK(CAR(n));
+      return 0;
+    }
+
   case F_CAST:
     if(n->type==void_type_string)
     {