home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-387-Vol-3of3.iso / e / epmmac2.zip / E.E < prev    next >
Text File  |  1992-12-18  |  8KB  |  238 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 WANT_DBCS_SUPPORT
  21. include    'epmdbcs.e'
  22. compile endif
  23.  
  24. include    'main.e'        -- This contains the DEFMAIN for the main .ex file
  25. compile if not VANILLA
  26.  compile if defined(SITE_MAIN)
  27.   compile if SITE_MAIN
  28.    include SITE_MAIN
  29.   compile endif
  30.  compile endif
  31. tryinclude 'mymain.e'      -- Optional user additions to DEFMAIN.
  32. compile endif
  33.  
  34. compile if EVERSION >= '4.12'
  35. include    'load.e'        -- Default defload must come before other defloads.
  36. compile endif
  37.  
  38. include    'select.e'
  39. compile if EVERSION >= '4.12'
  40.  compile if not VANILLA
  41.   compile if defined(SITE_SELECT)
  42.    compile if SITE_SELECT
  43.    include SITE_SELECT
  44.    compile endif
  45.   compile endif
  46. tryinclude 'myselect.e'    -- For user's defselects.  This doesn't have to come
  47.                            -- immediately after select.e now.
  48.  compile endif
  49. include    'modify.e'      -- New defmodify event processor.
  50. compile else
  51.    compile if ALTERNATE_KEYSETS
  52.       compile if C_SYNTAX_ASSIST
  53.          tryinclude 'ckeysel.e'  -- All of these must follow SELECT.E.
  54.       compile endif
  55.       compile if E_SYNTAX_ASSIST
  56.          tryinclude 'ekeysel.e'
  57.       compile endif
  58.       compile if REXX_SYNTAX_ASSIST
  59.          tryinclude 'rkeysel.e'
  60.       compile endif
  61.       compile if P_SYNTAX_ASSIST
  62.          tryinclude 'pkeysel.e'
  63.       compile endif
  64.  
  65.  compile if not VANILLA
  66.   compile if defined(SITE_SELECT)
  67.    compile if SITE_SELECT
  68.       include SITE_SELECT
  69.    compile endif
  70.   compile endif
  71.       tryinclude 'myselect.e' -- For other user mods to select_edit_keys.
  72.  compile endif
  73.    compile endif
  74. compile endif
  75.  
  76. include    'stdkeys.e'     -- Standard key definitions.
  77. compile if not E3 and WANT_BRACKET_MATCHING & not EXTRA_EX
  78. include 'assist.e'
  79. compile endif
  80. compile if WANT_EBOOKIE = 1 & not EXTRA_EX
  81.   include 'bkeys.e'
  82. compile endif
  83.  
  84. compile if EVERSION < 5
  85. include    'window.e'      -- Windowing for non-PM versions of E.
  86. compile elseif MOUSE_SUPPORT = 1 & not EXTRA_EX
  87. include    'mouse.e'       -- Mouse definition, only for EPM.
  88. compile else
  89. defc processmouse = sayerror 'Mouse support missing.'
  90. compile endif
  91.  
  92. compile if SPELL_SUPPORT = 1 and IBM_IUO
  93.  compile if EPM
  94.   include 'EPMLEX.e'
  95.  compile elseif EOS2
  96.   include 'EOS2LEX.e'
  97.  compile else
  98.   include 'E3SPELL.e'
  99.  compile endif
  100. compile endif
  101.  
  102. include    'stdprocs.e'    -- Standard functions and procedures.
  103. compile if not EXTRA_EX
  104. include    'markfilt.e'    -- Procedures for filtering a block, line or char. mark.
  105. include    'charops.e'     -- Mark operations for character marks.
  106. compile endif
  107.  
  108. compile if not LINK_HOST_SUPPORT
  109.  compile if HOST_SUPPORT = 'STD'
  110. include    'saveload.e'    -- Save/load routines with host support
  111.  compile elseif HOST_SUPPORT = 'EMUL' | HOST_SUPPORT = 'E3EMUL'
  112. include    'E3emul.e'      -- ... with extended host support
  113.  compile elseif HOST_SUPPORT = 'PDQ'
  114. include    'slPDQ.e'       -- ... with host support via PDQ.e
  115. include    'pdq.e'
  116. include    'PDQdos.e'      -- pdq.e uses some DOS functions
  117.  compile elseif HOST_SUPPORT = 'SRPI'
  118. include    'slSRPI.e'      -- ... with host support via SRPI interface
  119.  compile else
  120. include    'slnohost.e'    -- ... without host support
  121.  compile endif
  122. compile endif
  123.  
  124. include    'stdcmds.e'     -- Standard commands (DEFC's).
  125.                            -- (Edit cmd uses variables defined in host routines.)
  126.  
  127. compile if WANT_DRAW
  128.  compile if EVERSION < '4.02' -- With linking, DRAW is an external module.
  129.    include 'draw.e'
  130.  compile else
  131.   compile if (WANT_DRAW='F6' | WANT_DRAW=F6)
  132.    include 'drawkey.e'        -- If you still want F6=Draw in linking version.
  133.   compile endif
  134.  compile endif
  135. compile endif
  136.  
  137. compile if WANT_ALL & not EXTRA_EX
  138.    include 'ALL.E'         -- Shows all occurrences of a string.
  139. compile endif
  140.  
  141. compile if WANT_RETRIEVE & EVERSION < 5
  142.    include 'RETRIEVE.E'    -- Provides a window for selecting previously-entered cmds.
  143. compile endif
  144.  
  145. compile if EVERSION >='4.02'
  146.    tryinclude 'linkcmds.e' -- Useful new commands for the linking version.
  147. compile endif
  148. compile if EVERSION >=5
  149. include    'stdctrl.e'     -- PM controls for EPM.
  150.  compile if not EXTRA_EX
  151.   compile if INCLUDE_MENU_SUPPORT
  152. include    'stdmenu.e'     -- Action bar menus for EPM.
  153.   compile endif
  154. tryinclude 'clipbrd.e'     -- Clipboard interface and mark <--> buffer routines
  155.  compile endif
  156.  compile if WANT_BOOKMARKS = 1 & not EXTRA_EX
  157.    include 'BOOKMARK.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. -- Put the programming keys last.  Any keys redefined above will stay in
  214. -- effect regardless of filetype.  These redefine only space and enter.
  215. compile if ALTERNATE_KEYSETS
  216.    compile if C_SYNTAX_ASSIST
  217.       tryinclude 'ckeys.e' -- Syntax-assist for C programmers.
  218.    compile endif
  219.    compile if E_SYNTAX_ASSIST
  220.       tryinclude 'ekeys.e' -- Syntax-assist for E programmers.
  221.    compile endif
  222.    compile if REXX_SYNTAX_ASSIST
  223.       tryinclude 'rexxkeys.e' -- Syntax-assist for Rexx programmers.
  224.    compile endif
  225.    compile if P_SYNTAX_ASSIST
  226.       tryinclude 'pkeys.e' -- Syntax-assist for Pascal programmers.
  227.    compile endif
  228.  
  229.  compile if not VANILLA
  230.   compile if defined(SITE_KEYSET)
  231.    compile if SITE_KEYSET
  232.    include SITE_KEYSET
  233.    compile endif
  234.   compile endif
  235.    tryinclude 'mykeyset.e' -- For entirely new keysets defined by power users.
  236.  compile endif
  237. compile endif
  238.