Nominal-General/nominal_permeq.ML
changeset 2127 fc42d4a06c06
parent 2080 0532006ec7ec
child 2150 6297629f024c
--- a/Nominal-General/nominal_permeq.ML	Thu May 13 15:58:36 2010 +0100
+++ b/Nominal-General/nominal_permeq.ML	Thu May 13 16:09:34 2010 +0100
@@ -155,7 +155,7 @@
 
 
 (** methods **)
-
+val _ = OuterKeyword.keyword "exclude"
 val add_thms_parser = Scan.optional (Scan.lift (Args.add -- Args.colon) |-- Attrib.thms) [];
 val exclude_consts_parser = Scan.optional (Scan.lift ((Args.$$$ "exclude") -- Args.colon) |-- 
   (Scan.repeat (Args.const true))) []