home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / VSCPPv7.zip / VACPP / IBMCPP / macros / CL.LXL < prev    next >
Text File  |  1995-05-11  |  3KB  |  72 lines
  1. /********************************************************
  2. * CL.LXL - LOAD MACRO FOR CL FILES                      *
  3. *                                                       *
  4. * THIS MACRO IS INVOKED BY LPEX WHEN A FILE WITH        *
  5. * SOURCE TYPE CL IS EDITED (UNLESS THE /ASIS OR /NOPRO  *
  6. * OPTIONS ARE USED. IT SETS UP THE CL EMPHASIS PARSER   *
  7. * AND FONTS FOR A COLOUR DISPLAY.                       *
  8. *                                                       *
  9. *          COPYRIGHT I B M CORPORATION 1989             *
  10. *                                                       *
  11. * SAH/04.12.89/CUSTOMIZED FOR ECD TESTING               *
  12. *                                                       *
  13. ********************************************************/
  14.  
  15. /* SET FONTS FOR CL PARSER */
  16.                                
  17. 'SET FONT.A  BLACK/WHITE                 "Alphanumerics"'
  18. 'SET FONT.B  BRIGHT GREEN/WHITE          "Built-ins"'            
  19. 'SET FONT.C  CYAN/WHITE                  "Comments"'
  20. 'SET FONT.E  WHITE/BRIGHT RED            "Errors"'               
  21. 'SET FONT.G  UNDERLINE BRIGHT BLUE/WHITE "Language construct"'   
  22. 'SET FONT.I  GREEN/WHITE                 "Literals"'             
  23. 'SET FONT.K  CYAN/WHITE                  "Keywords"'             
  24. 'SET FONT.L  BRIGHT GRAY/WHITE           "Labels"'               
  25. 'SET FONT.M  BRIGHT BLUE/WHITE           "Commands"'             
  26. 'SET FONT.N  RED/WHITE                   "Numerials"'            
  27. 'SET FONT.P  BROWN/WHITE                 "Parameters"'           
  28. 'SET FONT.S  BLUE/WHITE                  "Special symbols"'      
  29. 'SET FONT.V  MAGENTA/WHITE               "Special values"'       
  30. 'SET FONT._  BLACK/WHITE                 "Layout space"'         
  31.   
  32. 'SET DOCTYPE CL'
  33. 'SET CLASSES SPACE MESSAGE ERROR COMMENT CODE CONTROL CONTINUATION'
  34. 'PARSER EVFLCL'      /* SET UP THE PARSER FOR FUTURE CHANGES */
  35. 'SET FULLPARSE SUBMIT READ STOP "Parsing file" EVFLCL ALL'
  36.  
  37. 'SET ACTION.F4  EVFLCL PROMPT'  
  38. 'SET ACTION.F1  EVFLCL COMMANDHELP'  
  39.  
  40. 'SET ACTIONBAR.~Edit.SEPARATOR 6 ;'
  41. 'SET ACTIONBAR.~Edit.Pro~mpt\tF4 7 EVFLCL PROMPT'
  42. 'SET GROUP. WRITEABLE'
  43. 'SET HELP. 16036'
  44.  
  45. 'SET ACTIONBAR.~Options.~Language_editing. 7'
  46. 'SET HELP. 16099'
  47. 'SET ACTIONBAR.~Options.~Language_editing.~Token_highlighting EVFLCL TOKEN'
  48. 'SET HELP. 16100'
  49.  
  50. 'SET ACTIONBAR.~View.~Control 2 ;INCLUDE CONTROL;SET EXCLUDE'
  51. 'SET GROUP. CONTROL'
  52. 'SET HELP. 16056'
  53. 'SET ACTIONBAR.~View.C~omments 3 ;INCLUDE COMMENT;SET EXCLUDE'
  54. 'SET GROUP. COMMENT'
  55. 'SET HELP. 16056'
  56. 'SET ACTIONBAR.~Help.C~L/400_help 6 START VIEW EVFCLMST.INF'
  57. 'SET HELP. 16137'
  58.  
  59. 'EXTRACT ACTIONBARID.~Options.~Language_editing.~Token_highlighting INTO ID_TH'
  60. 'SET GLOBAL.CL_TOK_MENU_ID' ID_TH
  61. 'SET GLOBAL.CL_SYN_MENU_ID 0'
  62.  
  63. 'SET TABS 12 14 EVERY 8'
  64.  
  65. 'SET GLOBAL.CL_TOKEN_HILITE 1'
  66.  
  67. 'EVFLCL INIT'
  68. 'TRIGGER FULLPARSE'
  69.  
  70. /* set language specific prefix commands */
  71. 'SET ACTIONPREFIX.P ;SET PREFIXENTRY;EVFLCL PROMPT'
  72.