X-Git-Url: https://jxself.org/git/?p=pdp10-muddle.git;a=blobdiff_plain;f=mim%2Fdevelopment%2Fmim%2Fvax%2Fmimlib%2Fdfldefs.mud;fp=mim%2Fdevelopment%2Fmim%2Fvax%2Fmimlib%2Fdfldefs.mud;h=8b4ad9ee68f75e85d6e2ef59e1d6211c42b5bb87;hp=0000000000000000000000000000000000000000;hb=d73ace3f3292e320b461b8fcd2e9f5dc5d9684d7;hpb=d530283ea60fb0ddcc28e9c5bd072456afe06e07

diff --git a/mim/development/mim/vax/mimlib/dfldefs.mud b/mim/development/mim/vax/mimlib/dfldefs.mud
new file mode 100644
index 0000000..8b4ad9e
--- /dev/null
+++ b/mim/development/mim/vax/mimlib/dfldefs.mud
@@ -0,0 +1,26 @@
+<DEFINITIONS "DFLDEFS">
+
+<USE "NEWSTRUC">
+
+<GDECL (TDFL-BUF DFL-BUF DFL-ZERO-STR)
+       STRING
+       (DFL-FILNAM)
+       <OR ATOM STRING>
+       (DFL-FUNC-NAM)
+       <OR STRUCTURED ATOM>
+       (DFL-STRUC)
+       <VECTOR [REST <OR STRING FALSE>]>>
+
+<MSETG FILPTR-SAVE-BEG 1>
+<MSETG FILPTR-SAVE-END 2>
+<MSETG FILNAM-SAVE 3>
+<MSETG OBLIST-SAVE 4>
+
+<NEWSTRUC UNTUPLE (VECTOR)
+	  BEGPTR FIX
+	  ENDPTR FIX
+	  NAMPTR ATOM
+	  FILPTR <VECTOR [4 STRING]>
+	  ASSOCI <VECTOR FIX FIX VECTOR>
+	  OBLPTR LIST>
+<END-DEFINITIONS>