"(docol)",
"(docon)",
"(dovar)",
"(douser)",
"(dodefer)",
"(dofield)",
"(dodoes)",
"(does-handler)",
GROUPADD(8)
GROUP( control, 8)
"noop",
"call",
"execute",
"perform",
";s",
"unloop",
"lit-perform",
"does-exec",
GROUPADD(8)
#ifdef HAS_GLOCALS
"branch-lp+!#",
GROUPADD(1)
#endif
"branch",
"?branch",
GROUPADD(2)
#ifdef HAS_GLOCALS
"?branch-lp+!#",
GROUPADD(1)
#endif
GROUPADD(0)
#ifdef HAS_XCONDS
"?dup-?branch",
"?dup-0=-?branch",
GROUPADD(2)
#endif
"(next)",
GROUPADD(1)
#ifdef HAS_GLOCALS
"(next)-lp+!#",
GROUPADD(1)
#endif
"(loop)",
GROUPADD(1)
#ifdef HAS_GLOCALS
"(loop)-lp+!#",
GROUPADD(1)
#endif
"(+loop)",
GROUPADD(1)
#ifdef HAS_GLOCALS
"(+loop)-lp+!#",
GROUPADD(1)
#endif
GROUPADD(0)
#ifdef HAS_XCONDS
"(-loop)",
GROUPADD(1)
#ifdef HAS_GLOCALS
"(-loop)-lp+!#",
GROUPADD(1)
#endif
"(s+loop)",
GROUPADD(1)
#ifdef HAS_GLOCALS
"(s+loop)-lp+!#",
GROUPADD(1)
#endif
GROUPADD(0)
#endif
"(for)",
"(do)",
"(?do)",
GROUPADD(3)
#ifdef HAS_XCONDS
"(+do)",
"(u+do)",
"(-do)",
"(u-do)",
GROUPADD(4)
#endif
"i",
"i'",
"j",
"k",
GROUPADD(4)
GROUP( strings, 43)
"move",
"cmove",
"cmove>",
"fill",
"compare",
"toupper",
"/string",
GROUPADD(7)
GROUP( arith, 50)
"lit",
"+",
"lit+",
"under+",
"-",
"negate",
"1+",
"1-",
"max",
"min",
"abs",
"*",
"/",
"mod",
"/mod",
"2*",
"2/",
"fm/mod",
"sm/rem",
"m*",
"um*",
"um/mod",
"m+",
"d+",
"d-",
"dnegate",
"d2*",
"d2/",
"and",
"or",
"xor",
"invert",
"rshift",
"lshift",
GROUPADD(34)
GROUP( compare, 84)
"0=",
"0<>",
"0<",
"0>",
"0<=",
"0>=",
"=",
"<>",
"<",
">",
"<=",
">=",
"u=",
"u<>",
"u<",
"u>",
"u<=",
"u>=",
GROUPADD(18)
#ifdef HAS_DCOMPS
"d=",
"d<>",
"d<",
"d>",
"d<=",
"d>=",
"d0=",
"d0<>",
"d0<",
"d0>",
"d0<=",
"d0>=",
"du=",
"du<>",
"du<",
"du>",
"du<=",
"du>=",
GROUPADD(18)
#endif
"within",
GROUPADD(1)
GROUP( stack, 121)
"useraddr",
"up!",
"sp@",
"sp!",
"rp@",
"rp!",
GROUPADD(6)
#ifdef HAS_FLOATING
"fp@",
"fp!",
GROUPADD(2)
#endif
">r",
"r>",
"rdrop",
"2>r",
"2r>",
"2r@",
"2rdrop",
"over",
"drop",
"swap",
"dup",
"rot",
"-rot",
"nip",
"tuck",
"?dup",
"pick",
"2drop",
"2dup",
"2over",
"2swap",
"2rot",
"2nip",
"2tuck",
GROUPADD(24)
GROUP( memory, 153)
"@",
"lit@",
"!",
"+!",
"c@",
"c!",
"2!",
"2@",
"cell+",
"cells",
"char+",
"(chars)",
"count",
GROUPADD(13)
GROUP( compiler, 166)
GROUPADD(0)
#ifdef HAS_F83HEADERSTRING
"(f83find)",
GROUPADD(1)
#else /* 167 */
"(listlfind)",
GROUPADD(1)
#ifdef HAS_HASH
"(hashlfind)",
"(tablelfind)",
"(hashkey1)",
GROUPADD(3)
#endif
GROUPADD(0)
#endif
"(parse-white)",
"aligned",
"faligned",
"threading-method",
GROUPADD(4)
GROUP( hostos, 175)
"key-file",
"key?-file",
GROUPADD(2)
#ifdef HAS_OS
"stdin",
"stdout",
"stderr",
"form",
"flush-icache",
"(bye)",
"(system)",
"getenv",
"open-pipe",
"close-pipe",
"time&date",
"ms",
"allocate",
"free",
"resize",
"strerror",
"strsignal",
"call-c",
GROUPADD(18)
#endif
GROUPADD(0)
#ifdef HAS_FILE
"close-file",
"open-file",
"create-file",
"delete-file",
"rename-file",
"file-position",
"reposition-file",
"file-size",
"resize-file",
"read-file",
"(read-line)",
GROUPADD(11)
#endif
"write-file",
"emit-file",
GROUPADD(2)
#ifdef HAS_FILE
"flush-file",
"file-status",
"file-eof?",
"open-dir",
"read-dir",
"close-dir",
"filename-match",
GROUPADD(7)
#endif
"newline",
GROUPADD(1)
#ifdef HAS_OS
"utime",
"cputime",
GROUPADD(2)
#endif
GROUPADD(0)
#ifdef HAS_FLOATING
GROUPADD(0)
GROUP( floating, 218)
"f=",
"f<>",
"f<",
"f>",
"f<=",
"f>=",
"f0=",
"f0<>",
"f0<",
"f0>",
"f0<=",
"f0>=",
"d>f",
"f>d",
"f!",
"f@",
"df@",
"df!",
"sf@",
"sf!",
"f+",
"f-",
"f*",
"f/",
"f**",
"fnegate",
"fdrop",
"fdup",
"fswap",
"fover",
"frot",
"fnip",
"ftuck",
"float+",
"floats",
"floor",
"fround",
"fmax",
"fmin",
"represent",
">float",
"fabs",
"facos",
"fasin",
"fatan",
"fatan2",
"fcos",
"fexp",
"fexpm1",
"fln",
"flnp1",
"flog",
"falog",
"fsin",
"fsincos",
"fsqrt",
"ftan",
"fsinh",
"fcosh",
"ftanh",
"fasinh",
"facosh",
"fatanh",
"sfloats",
"dfloats",
"sfaligned",
"dfaligned",
"v*",
"faxpy",
GROUPADD(69)
#endif
GROUPADD(0)
#ifdef HAS_GLOCALS
GROUPADD(0)
GROUP( locals, 287)
"@local#",
"@local0",
"@local1",
"@local2",
"@local3",
GROUPADD(5)
#ifdef HAS_FLOATING
"f@local#",
"f@local0",
"f@local1",
GROUPADD(3)
#endif
"laddr#",
"lp+!#",
"lp-",
"lp+",
"lp+2",
"lp!",
">l",
GROUPADD(7)
#ifdef HAS_FLOATING
"f>l",
"fpick",
GROUPADD(2)
#endif
GROUPADD(0)
#endif
GROUPADD(0)
#ifdef HAS_OS
GROUPADD(0)
GROUP( syslib, 304)
"open-lib",
"lib-sym",
"wcall",
GROUPADD(3)
#ifdef HAS_FFCALL
"av-start-void",
"av-start-int",
"av-start-float",
"av-start-double",
"av-start-longlong",
"av-start-ptr",
"av-int",
"av-float",
"av-double",
"av-longlong",
"av-ptr",
"av-int-r",
"av-float-r",
"av-double-r",
"av-longlong-r",
"av-ptr-r",
"av-call-void",
"av-call-int",
"av-call-float",
"av-call-double",
"av-call-longlong",
"av-call-ptr",
"alloc-callback",
"va-start-void",
"va-start-int",
"va-start-longlong",
"va-start-ptr",
"va-start-float",
"va-start-double",
"va-arg-int",
"va-arg-longlong",
"va-arg-ptr",
"va-arg-float",
"va-arg-double",
"va-return-void",
"va-return-int",
"va-return-ptr",
"va-return-longlong",
"va-return-float",
"va-return-double",
GROUPADD(40)
#endif
GROUPADD(0)
#ifdef HAS_OLDCALL
"icall0",
"icall1",
"icall2",
"icall3",
"icall4",
"icall5",
"icall6",
"icall20",
"fcall0",
"fcall1",
"fcall2",
"fcall3",
"fcall4",
"fcall5",
"fcall6",
"fcall20",
GROUPADD(16)
#endif
GROUPADD(0)
#endif
GROUPADD(0)
GROUP( peephole, 363)
GROUPADD(0)
#ifdef HAS_PEEPHOLE
"compile-prim1",
"finish-code",
"forget-dyncode",
"decompile-prim",
"set-next-code",
"call2",
"tag-offsets",
GROUPADD(7)
#endif
GROUPADD(0)
GROUP( static_super, 370)
 #if !defined(GFORTH_DEBUGGING) && !defined(INDIRECT_THREADED) && !defined(DOUBLY_INDIRECT) && !defined(VM_PROFILING)
"super1",
"super2",
"super3",
"super4",
"super5",
"super6",
"super7",
"super8",
"super9",
"super10",
"super11",
"super12",
"super13",
"super14",
"super15",
"super16",
"super17",
"super18",
"super19",
"super20",
"super21",
"super22",
"super23",
"super24",
"super25",
"super26",
"super27",
 #endif
GROUPADD(27)
GROUP( end, 397)
