diff --git a/src/peep.in b/src/peep.in
index 8d9ef2a71ab4c81dc8b8acdc0d9a4f5394d414e9..a6e0b8015dbf1a0b6b73c7f8e3311ad9cfcd0b2a 100644
--- a/src/peep.in
+++ b/src/peep.in
@@ -1,5 +1,5 @@
 //
-// $Id: peep.in,v 1.15 1998/05/12 23:51:26 hubbe Exp $
+// $Id: peep.in,v 1.16 1998/05/13 07:42:50 hubbe Exp $
 //
 
 NOP :
@@ -70,6 +70,9 @@ RETURN !LABEL : RETURN
 RETURN_0 !LABEL : RETURN_0
 RETURN_1 !LABEL : RETURN_1
 RETURN_LOCAL !LABEL : RETURN_LOCAL($1a)
+APPLY_AND_RETURN !LABEL : APPLY_AND_RETURN($1a)
+CALL_FUNCTION_AND_RETURN !LABEL : CALL_FUNCTION_AND_RETURN($1a)
+CALL_LFUN_AND_RETURN !LABEL : CALL_LFUN_AND_RETURN($1a)
 BRANCH LABEL ($1a) : LABEL ($1a)
 
 LOCAL_LVALUE INC : INC_LOCAL ($1a)
@@ -238,3 +241,6 @@ SIZEOF CONST1 BRANCH_WHEN_LT : SIZEOF BRANCH_WHEN_ZERO ($3a)
 SIZEOF_LOCAL CONST1 BRANCH_WHEN_LT : SIZEOF BRANCH_WHEN_ZERO ($3a)
 SIZEOF CONST0 BRANCH_WHEN_LE : SIZEOF BRANCH_WHEN_ZERO ($3a)
 SIZEOF_LOCAL CONST0 BRANCH_WHEN_LE : SIZEOF BRANCH_WHEN_ZERO ($3a)
+
+CLEAR_LOCAL DEC_LOCAL_AND_POP($1a) : CONST_1 ASSIGN_LOCAL_AND_POP($1a)
+CLEAR_LOCAL INC_LOCAL_AND_POP($1a) : CONST1 ASSIGN_LOCAL_AND_POP($1a)