do not accept p flag

diff --git a/lang/m2/comp/options.c b/lang/m2/comp/options.c
index f0e15df..4a44db9 100644 (file)
--- 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) */