home *** CD-ROM | disk | FTP | other *** search
/ The Developer Connection…ice Driver Kit for OS/2 3 / DEV3-D1.ISO / editors / epm / sampmacs / e.e < prev    next >
Encoding:
Text File  |  1993-12-02  |  7.9 KB  |  248 lines
  1. const SMALL = 0            -- SMALL says to assume no host support.
  2. include    'stdconst.e'
  3.  
  4. include    'colors.e'      -- Mnemonic color names & default colors defined here.
  5.  
  6. define INCLUDING_FILE = 'E.E'  -- Specify, in case any MY*.E or SITE file cares
  7.  
  8. const                      -- (added because many users omit from MYCNF.)
  9. tryinclude 'mycnf.e'       -- User configuration goes here.
  10.  
  11. compile if not defined(SITE_CONFIG)  -- Did user's MYCNF.E set a SITE_CONFIG file?
  12.    const SITE_CONFIG = 'SITECNF.E'   -- If not, use the default
  13. compile endif
  14. compile if SITE_CONFIG               -- If SITE_CONFIG file was not set to null,
  15.    tryinclude SITE_CONFIG            -- include the site configuration file.
  16. compile endif
  17.  
  18. include    'stdcnf.e'      -- Standard configuration; shouldn't be modified.
  19.  
  20. compile if EPM
  21. include 'menuhelp.H'
  22. compile endif
  23.  
  24. compile if WANT_DBCS_SUPPORT
  25. include    'epmdbcs.e'
  26. compile endif
  27.  
  28. include    'main.e'        -- This contains the DEFMAIN for the main .ex file
  29. compile if not VANILLA
  30.  compile if defined(SITE_MAIN)
  31.   compile if SITE_MAIN
  32.    include SITE_MAIN
  33.   compile endif
  34.  compile endif
  35. tryinclude 'mymain.e'      -- Optional user additions to DEFMAIN.
  36. compile endif
  37.  
  38. compile if EVERSION >= '4.12'
  39. include    'load.e'        -- Default defload must come before other defloads.
  40. compile endif
  41.  
  42. include    'select.e'
  43. compile if EVERSION >= '4.12'
  44.  compile if not VANILLA
  45.   compile if defined(SITE_SELECT)
  46.    compile if SITE_SELECT
  47.    include SITE_SELECT
  48.    compile endif
  49.   compile endif
  50. tryinclude 'myselect.e'    -- For user's defselects.  This doesn't have to come
  51.                            -- immediately after select.e now.
  52.  compile endif
  53. include    'modify.e'      -- New defmodify event processor.
  54. compile else
  55.    compile if ALTERNATE_KEYSETS
  56.       compile if C_SYNTAX_ASSIST
  57.          tryinclude 'ckeysel.e'  -- All of these must follow SELECT.E.
  58.       compile endif
  59.       compile if E_SYNTAX_ASSIST
  60.          tryinclude 'ekeysel.e'
  61.       compile endif
  62.       compile if REXX_SYNTAX_ASSIST
  63.          tryinclude 'rkeysel.e'
  64.       compile endif
  65.       compile if P_SYNTAX_ASSIST
  66.          tryinclude 'pkeysel.e'
  67.       compile endif
  68.  
  69.  compile if not VANILLA
  70.   compile if defined(SITE_SELECT)
  71.    compile if SITE_SELECT
  72.       include SITE_SELECT
  73.    compile endif
  74.   compile endif
  75.       tryinclude 'myselect.e' -- For other user mods to select_edit_keys.
  76.  compile endif
  77.    compile endif
  78. compile endif
  79.  
  80. include    'stdkeys.e'     -- Standard key definitions.
  81. compile if not E3 and WANT_BRACKET_MATCHING & not EXTRA_EX
  82. include 'assist.e'
  83. compile endif
  84. compile if WANT_EBOOKIE = 1 & not EXTRA_EX
  85.   include 'bkeys.e'
  86. compile endif
  87.  
  88. compile if EVERSION < 5
  89. include    'window.e'      -- Windowing for non-PM versions of E.
  90. compile elseif MOUSE_SUPPORT = 1 & not EXTRA_EX
  91. include    'mouse.e'       -- Mouse definition, only for EPM.
  92. compile else
  93. defc processmouse = sayerror 'Mouse support missing.'
  94. compile endif
  95.  
  96. include    'stdprocs.e'    -- Standard functions and procedures.
  97. compile if not EXTRA_EX
  98. include    'markfilt.e'    -- Procedures for filtering a block, line or char. mark.
  99. include    'charops.e'     -- Mark operations for character marks.
  100. compile endif
  101.  
  102. compile if not LINK_HOST_SUPPORT
  103.  compile if HOST_SUPPORT = 'STD'
  104. include    'saveload.e'    -- Save/load routines with host support
  105.  compile elseif HOST_SUPPORT = 'EMUL' | HOST_SUPPORT = 'E3EMUL'
  106. include    'E3emul.e'      -- ... with extended host support
  107.  compile elseif HOST_SUPPORT = 'PDQ'
  108. include    'slPDQ.e'       -- ... with host support via PDQ.e
  109. include    'pdq.e'
  110. include    'PDQdos.e'      -- pdq.e uses some DOS functions
  111.  compile elseif HOST_SUPPORT = 'SRPI'
  112. include    'slSRPI.e'      -- ... with host support via SRPI interface
  113.  compile else
  114. include    'slnohost.e'    -- ... without host support
  115.  compile endif
  116. compile endif
  117.  
  118. include    'stdcmds.e'     -- Standard commands (DEFC's).
  119.                            -- (Edit cmd uses variables defined in host routines.)
  120. compile if EVERSION >= '6.00c'
  121. include 'get.e'
  122. compile endif
  123.  
  124. compile if WANT_DRAW
  125.  compile if EVERSION < '4.02' -- With linking, DRAW is an external module.
  126.    include 'draw.e'
  127.  compile else
  128.   compile if (WANT_DRAW='F6' | WANT_DRAW=F6)
  129.    include 'drawkey.e'        -- If you still want F6=Draw in linking version.
  130.   compile endif
  131.  compile endif
  132. compile endif
  133.  
  134. compile if WANT_ALL & not EXTRA_EX
  135.    include 'ALL.E'         -- Shows all occurrences of a string.
  136. compile endif
  137.  
  138. compile if WANT_RETRIEVE & EVERSION < 5
  139.    include 'RETRIEVE.E'    -- Provides a window for selecting previously-entered cmds.
  140. compile endif
  141.  
  142. compile if EVERSION >='4.02'
  143.    tryinclude 'linkcmds.e' -- Useful new commands for the linking version.
  144. compile endif
  145. compile if EVERSION >=5
  146. include    'stdctrl.e'     -- PM controls for EPM.
  147.  compile if not EXTRA_EX
  148.   compile if INCLUDE_MENU_SUPPORT & INCLUDE_STD_MENUS
  149. include    'stdmenu.e'     -- Action bar menus for EPM.
  150.   compile endif
  151. tryinclude 'clipbrd.e'     -- Clipboard interface and mark <--> buffer routines
  152.  compile endif  -- not EXTRA_EX
  153.  compile if WANT_BOOKMARKS = 1 & not EXTRA_EX
  154.    include 'BOOKMARK.E'
  155.  compile endif
  156.  compile if WANT_TAGS = 1 & not EXTRA_EX
  157.    include 'TAGS.E'
  158.  compile endif
  159. compile endif
  160.  
  161. -- Put all new includes after this line (preferably in MYSTUFF.E). -------------
  162. compile if not VANILLA
  163.  compile if defined(SITE_KEYS)
  164.   compile if SITE_KEYS
  165.    include SITE_KEYS
  166.   compile endif
  167.  compile endif
  168. tryinclude 'mykeys.e'      -- User stuff containing key DEFs.
  169.  compile if defined(SITE_STUFF)
  170.   compile if SITE_STUFF
  171.    include SITE_STUFF
  172.   compile endif
  173.  compile endif
  174. tryinclude 'mystuff.e'     -- Other user stuff.
  175. compile endif
  176.  
  177.  compile if (USE_APPEND | Host_Support='EMUL' | Host_Support='E3EMUL' | WANT_DOSUTIL=1) & not EXTRA_EX
  178.    include  'dosutil.e'    -- DOSUTIL is required for the above (EMUL uses Exist() )
  179.  compile elseif WANT_DOSUTIL = '?' & not EXTRA_EX
  180.    tryinclude 'dosutil.e'  -- otherwise, optional.
  181.  compile endif
  182.  
  183. compile if WANT_MATH = '?' & not EXTRA_EX      -- Try to include it.
  184.    tryinclude 'math.e'
  185. compile elseif WANT_MATH = 1 & not EXTRA_EX    -- Definitely include it.
  186.    include 'math.e'
  187. compile endif
  188.  
  189. compile if SORT_TYPE & not EXTRA_EX
  190. include 'sort'SORT_TYPE'.e' -- SORTE, SORTG, SORTF, SORTGW, SORTDLL, SORTDOS.E.
  191. compile endif
  192.  
  193. compile if EVERSION >= '4.11' and EVERSION < 5  -- 4.11 added SHELL command
  194.  compile if SHELL_USAGE
  195.   include 'shell.e'
  196.  compile endif
  197. compile endif
  198.  
  199. compile if WANT_EPM_SHELL & not EXTRA_EX
  200.   include 'epmshell.e'
  201. compile endif
  202.  
  203. compile if WANT_KEYWORD_HELP & not EXTRA_EX
  204.   include 'KWhelp.e'
  205. compile endif
  206.  
  207. compile if EVERSION >= '5.50' & not EXTRA_EX
  208.   include 'callrexx.e'
  209. compile endif
  210.  
  211. -- Put all new includes above this line. --------------------------------------
  212.  
  213. compile if SPELL_SUPPORT = 1 and IBM_IUO
  214.  compile if EPM
  215.   include 'EPMLEX.e'
  216.  compile elseif EOS2
  217.   include 'EOS2LEX.e'
  218.  compile else
  219.   include 'E3SPELL.e'
  220.  compile endif
  221. compile endif
  222.  
  223. -- Put the programming keys last.  Any keys redefined above will stay in
  224. -- effect regardless of filetype.  These redefine only space and enter.
  225. compile if ALTERNATE_KEYSETS
  226.    compile if C_SYNTAX_ASSIST
  227.       tryinclude 'ckeys.e' -- Syntax-assist for C programmers.
  228.    compile endif
  229.    compile if E_SYNTAX_ASSIST
  230.       tryinclude 'ekeys.e' -- Syntax-assist for E programmers.
  231.    compile endif
  232.    compile if REXX_SYNTAX_ASSIST
  233.       tryinclude 'rexxkeys.e' -- Syntax-assist for Rexx programmers.
  234.    compile endif
  235.    compile if P_SYNTAX_ASSIST
  236.       tryinclude 'pkeys.e' -- Syntax-assist for Pascal programmers.
  237.    compile endif
  238.  
  239.  compile if not VANILLA
  240.   compile if defined(SITE_KEYSET)
  241.    compile if SITE_KEYSET
  242.    include SITE_KEYSET
  243.    compile endif
  244.   compile endif
  245.    tryinclude 'mykeyset.e' -- For entirely new keysets defined by power users.
  246.  compile endif
  247. compile endif
  248.