diff --git a/src/interpret.c b/src/interpret.c
index e616ae8d19e3b4156c93b72caa094f3955cfa02a..8633eaeb29a0728862ef1d2444052be737764f25 100644
--- a/src/interpret.c
+++ b/src/interpret.c
@@ -4,7 +4,7 @@
 ||| See the files COPYING and DISCLAIMER for more information.
 \*/
 #include "global.h"
-RCSID("$Id: interpret.c,v 1.59 1998/01/23 01:20:05 hubbe Exp $");
+RCSID("$Id: interpret.c,v 1.60 1998/01/24 18:36:44 per Exp $");
 #include "interpret.h"
 #include "object.h"
 #include "program.h"
@@ -343,6 +343,7 @@ void print_return_value(void)
 
 void pop_n_elems(INT32 x)
 {
+  if(!x) return;
 #ifdef DEBUG
   if(sp - evaluator_stack < x)
     fatal("Popping out of stack.\n");