diff --git a/lang/m2/comp/options.c b/lang/m2/comp/options.c
index f0e15df6..4a44db9d 100644
--- a/lang/m2/comp/options.c
+++ b/lang/m2/comp/options.c
@@ -41,7 +41,6 @@ DoOption(text)
 
 	case 'L':	/* no fil/lin */
 	case 'R':	/* no range checks */
-	case 'p':	/* call procentry/procexit */
 	case 'n':	/* no register messages */
 	case 'x':	/* every name global */
 	case 's':	/* symmetric: MIN(INTEGER) = -MAX(INTEGER) */