X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=regex-src%2Fmkh;h=92d2bfa9b5a4d8b5e2a935419f3d8523410ed5c7;hb=cdbbeef9cde260e429854dd313bc0bf7560e1e24;hp=252b246c7bd2538dda8890409c73e7a90e487064;hpb=6663e25ecad46c729d9be4f8585c51b523ac9044;p=debian%2Famanda

diff --git a/regex-src/mkh b/regex-src/mkh
index 252b246..92d2bfa 100644
--- a/regex-src/mkh
+++ b/regex-src/mkh
@@ -25,6 +25,11 @@ do
 			"'/^\([^#\/][^\/]*[a-zA-Z0-9_)]\)(\(.*\))/s;;\1(/*\2*/);'
 		shift
 		;;
+	-A)	# funny Amanda P macro
+		peel="$peel
+			"'/^\([^#\/][^\/]*[a-zA-Z0-9_)]\)(\(.*\))/s;;\1 P((\2));'
+		shift
+		;;
 	-b)	# funny Berkeley __P macro
 		peel="$peel
 			"'/^\([^#\/][^\/]*[a-zA-Z0-9_)]\)(\(.*\))/s;;\1 __P((\2));'