Machine-Independent MDL for TOPS-20 and VAX.

[pdp10-muddle.git] / mim / mim / mimlib / flags.msubr

diff --git a/mim/mim/mimlib/flags.msubr b/mim/mim/mimlib/flags.msubr
new file mode 100644 (file)
index 0000000..c3fa67c
--- /dev/null
+++ b/mim/mim/mimlib/flags.msubr
@@ -0,0 +1,9 @@
+<PACKAGE "FLAGS">
+<RENTRY FLAGS BIT>
+<USE "NEWSTRUC">
+
+<SETG \1aflags-IMSUBR #IMSUBR [|AAAACPBEAAB]GCB]H]AHEHCCE_BMH]AAAMACGCBMGNBGAOB]GCB]H]AHEHBMGNBKCDCKFZA`H`H`HIDHAECOFYABBYCKFZA`H`H`HIDHAECOFYABBYBQCVFRH]AAAAAAABDOAQBADMAAAUBABMAAAQBKDNH`H]COHYAAFOCOFYAAFUBADNAAAEBMGQBMHIAAAEBMH]AAAAAICCBMH]AAAAAAEOBMGNBCDNH`H]CKDJH`H]DNAEBCDJH`H]BMGJBMHIAAAIBMHIAAAMCLHOH`HYDQABDAAAAABEBMGABMGIDQACBADMAAA]COFYAAF[CVCVAGFNAAAAAAAQAAAEB\D]ACCHAAACDAAAH`D]CKFZA`H`H`HIDHAECOFYABBYCKFNAAAEDGAOBQD]AAABBAB]AAAAAACACOHYAAFOAMFNAAAAAABDAAAEDPA_COFYAAFUBMHMAABABMHMAABEBMGVBMHNAAAEDQACBADMAABMCOFYAAF[DABGAMFNAAAAAAA`AAAEDPA]COFYAAFUBMHMAABQBMHMAABUBMGVBMHNAAAEDQACBADMAABMCOFYAAF[D_ABBMBNAAAEDOAGCEEGHMFPDAACHNFPBACHBAB[H`EWCOHYAAFOAAAA| flags-IMSUBR T MSETG 
+BIT-NOT-20-COMPATIBLE!-ERRORS ERROR BIT-NOT-VAX-COMPATIBLE!-ERRORS ]>
+<SETG \1aFLAGS #MSUBR [flags-IMSUBR FLAGS ("VALUE" ATOM "TUPLE" ANY) 0]>
+<SETG \1aBIT #MSUBR [flags-IMSUBR BIT ("VALUE" FIX FIX) 176]>
+<ENDPACKAGE>