home *** CD-ROM | disk | FTP | other *** search
/ Power GUI Programming with VisualAge C++ / powergui.iso / trialva / ibmcppw / macros / c.lxl < prev    next >
Encoding:
Text File  |  1996-02-22  |  4.2 KB  |  126 lines
  1. /* C.LXL - IBM LPEX editor profile for VisualAge for C++ for Windows. */
  2. TRACE OFF
  3.  
  4. /* C/C++ document */
  5. 'SET DOCTYPE C'
  6.  
  7. /* C/C++ classes - DO NOT MODIFY!! */
  8. 'SET CLASSES CODE SPACE ',
  9. 'FWDLINK BWDLINK SEMICOLON FUNCTION BRACE ERROR COMMENT CONTROL CXXCLASS'
  10.  
  11. /* create our own menu items */
  12. MENU.1  = "~Options.Automatic_~indenting..."
  13. MENU.2  = "~Options.~Language_editing."
  14. MENU.3  = "~Options.~Language_editing.~Token_highlighting"
  15. MENU.4  = "~Options.~Language_editing.Automatic_~indenting"
  16. MENU.12 = "~View." || 'SEPARATOR'
  17. MENU.13 = "~View.F~unctions\tCtrl+G"
  18. MENU.14 = "~View.~Outline_logic"
  19. MENU.15 = "~View.~Errors"
  20. MENU.16 = "~Help.C/C++_~help"
  21. MENU.17 = "~Options.~Language_editing.~Lexical_errors"
  22. MENU.18 = "~Guides."
  23. MENU.19 = "~Guides.~Collections"
  24. MENUITEMS = 19
  25.  
  26. MENUCMD.   = ''
  27. MENUCMD.1  = '2 EVFEC370 AIDLG'
  28. MENUCMD.2  = '5'
  29. MENUCMD.3  = 'EVFEC370 TOKOPT'
  30. MENUCMD.4  = 'EVFEC370 AIOPT'
  31. MENUCMD.12 = '2'
  32. MENUCMD.13 = '3 ;SET INCLUDE FUNCTION;SET EXCLUDE;SET VIEWNAME Functions'
  33. MENUCMD.14 = '4 ;SET INCLUDE FUNCTION BRACE CONTROL;SET EXCLUDE'
  34. MENUCMD.15 = '5 ;SET INCLUDE ERROR;SET EXCLUDE'
  35. MENUCMD.16 = '6 EVFEC370 LANGHELP'
  36. MENUCMD.17 = 'EVFEC370 LEOPT'
  37. MENUCMD.18 = '5'
  38. MENUCMD.19 = 'GUIDE'
  39.  
  40. HELPID.   = 0
  41. HELPID.1  = 16093
  42. HELPID.2  = 16099
  43. HELPID.3  = 16100
  44. HELPID.4  = 16101
  45. HELPID.13 = 16057
  46. HELPID.14 = 16057
  47. HELPID.15 = 16057
  48. HELPID.16 = 16137
  49. HELPID.17 = 16109
  50.  
  51. GROUPS. = ''
  52. GROUPS.13 = 'FUNCTION PARSED'
  53. GROUPS.14 = 'FUNCTION BRACE CONTROL PARSED'
  54. GROUPS.15 = 'ERROR PARSED'
  55.  
  56. DO I = 1 TO MENUITEMS
  57.    IF MENUCMD.I <> '' THEN DO
  58.       'SET ACTIONBAR.' || MENU.I MENUCMD.I
  59.       IF HELPID.I > 0 THEN
  60.          'SET HELP.' HELPID.I
  61.       IF GROUPS.I <> '' THEN
  62.          'SET GROUP.' GROUPS.I
  63.    END
  64. END
  65.  
  66. MENUIDSTR = ' ACTIONBARID.' || MENU.3  'INTO ID3',    /* menu IDs for options */
  67.             ' ACTIONBARID.' || MENU.4  'INTO ID4',
  68.             ' ACTIONBARID.' || MENU.16 'INTO ID16',
  69.             ' ACTIONBARID.' || MENU.17 'INTO ID17'
  70. 'EXTRACT' MENUIDSTR
  71. MENUIDSTR = ID3 ID4 ID16 ID17
  72.  
  73. DROP MENU. MENUCMD. HELPID. MENUITEMS I GROUPS.         /* free excess memory */
  74. DROP ID3 ID4 ID16 ID17
  75.  
  76. /* set up full & incremental parse */
  77. 'SET FULLPARSE EVFEC370 ALL'
  78. 'SET PARSER    EVFEC370 PARSE'
  79.  
  80. /* auto-indent */
  81. 'SET SYNONYM.NEWLINE EVFEC370 AIEXIST'
  82. 'SET SYNONYM.SPLITLINE MULT ;SPLITJOIN SPLIT;PRIMITIVE NEWLINE;EVFEC370 AINEW'
  83. 'SET SYNONYM.OPENLINE MULT ;INSERT;EVFEC370 AINEW'
  84.  
  85. /* bracket matching */
  86. 'SET ACTION.C-M MATCH'
  87.  
  88. /* template insertion (first character = new line) */
  89. 'SET GLOBAL.PROTO.C.if /if (?) {//   }/else {//   }'
  90. 'SET GLOBAL.PROTO.C.for _for (?; ?; ?) {__   }'
  91. 'SET GLOBAL.PROTO.C.while /while (?) {//   }'
  92. 'SET GLOBAL.PROTO.C.do /do {/   ?/   } while (?);'
  93. 'SET GLOBAL.PROTO.C.switch /switch (?) {/   case ?://      break;/   default://   }'
  94. 'SET GLOBAL.PROTO.C.case /case ?://   break;'
  95. 'SET GLOBAL.PROTO.C.main /main(int argc, char *argv[], char *envp[])/{/   ? /}'
  96. 'SET ACTION.C-R PROTO PROTO.C.'
  97.  
  98. /* initial fonts settings */
  99. 'SET FONT.!  BLACK/WHITE                  "Default style"'
  100. 'SET FONT._  BLACK/WHITE                  "Layout blanks"'
  101. 'SET FONT.K  BRIGHT BLUE/WHITE            "Keyword"'
  102. 'SET FONT.X  BRIGHT BLUE/WHITE            "Extension keyword"'
  103. 'SET FONT.I  BLACK/WHITE                  "Identifier"'
  104. 'SET FONT.N  RED/WHITE                    "Constant"'
  105. 'SET FONT.Q  PINK/WHITE                   "String literal"'
  106. 'SET FONT.O  BLACK/WHITE                  "Operator"'
  107. 'SET FONT.P  BLACK/WHITE                  "Punctuator"'
  108. 'SET FONT.M  BLACK/WHITE                  "Continuation character"'
  109. 'SET FONT.C  CYAN/WHITE                   "Comment"'
  110. 'SET FONT.F  BLUE/WHITE                   "C library function"'
  111. 'SET FONT.B  BLACK/WHITE                  "Brace"'
  112. 'SET FONT.H  UNDERLINE BRIGHT BLUE/WHITE  "CPP directive"'
  113. 'SET FONT.E  REVERSE BRIGHT RED/WHITE     "Lexical error"'
  114. 'SET BASEFONT !'                          /* default style */
  115.  
  116. 'SET TABS 4 7 10 13 16 19 42 EVERY 3'
  117.  
  118. /* init LS component: INIT NDX <dft / C help INF> <NDX API> <LSX> <menu ids> */
  119. 'EVFEC370 INIT NDX CPPLNG IWFWWT35 CWIN.LSX' MENUIDSTR
  120.  
  121. 'SET ACTION.F1 EVFEC370 HELP'
  122. 'SET KEY.C-H F1'
  123.  
  124. /* do a full parse */
  125. 'TRIGGER FULLPARSE'
  126.