home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 5 Edit / 05-Edit.zip / alphal.zip / ALPHA.PRF < prev    next >
Text File  |  1997-05-06  |  14KB  |  436 lines
  1. ;;==================================================================;;
  2. ;; This is a sample profile, ALPHA.PRF, for the ALPHA V3.0 package. ;;
  3. ;;==================================================================;;
  4. ;;
  5. ;; The case is significant. Invalid records are ignored.  
  6. ;; Note - The format has changed from V2.7 !
  7. ;;
  8. ;; Lionel de Lambert, 26 Feb. 1996, IBM - Hursley
  9. ;;
  10. ;; The colours are :-
  11. ;; BLUE,DARKCYAN,BLACK,DARKBLUE,DARKPINK,DARKGRAY,DARKRED,DARKGREEN,
  12. ;; BROWN,CYAN,RED,GREEN,PINK,YELLOW,PALEGRAY,DEFAULT,WHITE
  13. ;; for XGA, SVGA etc. screens with Alpha V2.x the following 
  14. ;; colours may also be used :-
  15. ;; ORANGE,PURPLE,PALEGREEN,PALEBLUE,PALEYELLOW,PALERED,COLOUR1,..,COLOUR8 
  16. ;;
  17. ;;
  18. ;; Extension specifies the File types to be recognized.
  19. ;; The string must be <=128 characters and terminated by a comma.
  20. ;;
  21. ;; The default is :- "A37,ASM,PAS,PLS,C,FOR,IPF,PRF,"         
  22. ;; The positions 1-5 have significance for some of the analysis functions.
  23. Extension="A37,ASM,PAS,(PLS,PLX,PLI),(C,CPP,H),FOR,IPF,PRF,ADA,CMD,COB,JAVA,"
  24. ;;
  25. ;; Blocks of language definitions follow in the following format :-
  26. ;;
  27. ;; [C]                       ;; The file extension  
  28. ;; Case=Yes                  ;; The language is case sensitive   
  29. ;; CommentPos=0              ;; 0, 1-n
  30. ;; Language=default          ;; FORTRAN, A37, ASM, C, None, default
  31. ;; Comment="/*//*/  "        ;; start and end character pairs
  32. ;; String="" ' " ' ",\       ;; start and end character pairs, escape character 
  33. ;; Tab=10,16,36,72           ;; Up to eight tab positions 
  34. ;; Keywords                  ;; The following is a list of keywords
  35. ;; if,DARKCYAN               ;; keyword,colour e.g. for,(GREEN,YELLOW,UNDERLINE)
  36. ;; .END                      ;; End of list of keywords     
  37. ;;                           ;; Keywords longer than 1 character are assumed to 
  38. ;;                           ;; be delimited by non-alphanumeric characters. 
  39. ;;                           ;; Imbedded blanks are significant. If the language 
  40. ;;                           ;; is not case sensitive then the keywords should be
  41. ;;                           ;; specified in upper case ! Only the text part
  42. ;;                           ;; (not comments or strings) of the record 
  43. ;;                           ;; is scanned for keywords.
  44. ;;
  45. [A37]
  46. Case=Yes                     ;; The language is case sensitive    
  47. Language=A37                 ;; The language structure is 370 assembler
  48. Comment="* .*    "           ;; start and end character pairs    
  49. CommentPos=1                 ;; The comment is fixed in column one
  50. String="'   '   "            ;; start and end character pairs     
  51. Keywords                     ;; The following is a list of keywords
  52. DFHSTACK,(COLOUR3,COLOUR7,UNDERLINE)
  53. USING,(RED,CYAN,UNDERLINE)
  54. DROP,(,RED)
  55. SPACE,(PALEGRAY,COLOUR1)
  56. (,(BLACK,DEFAULT,)
  57. ),(BLACK,DEFAULT,)
  58. LTORG ,(,,UNDERLINE)
  59. POP ,GREEN    
  60. .END
  61. ;;
  62. [C]                            
  63. Case=Yes                     ;; The language is case sensitive    
  64. Language=C                   ;; The language structure is the C language 
  65. CommentPos=0                 ;; No specific comment column
  66. Comment="/*//*/  "           ;; start and end character pairs
  67. String="" ' " ' ",\          ;; start and end character pairs     
  68. Tab=8,16,24,36,42,72         ;; four tab positions
  69. Keywords                     ;; The following is a list of keywords
  70. else,(DARKPINK,,UNDERLINE)   ;; c language keywords 
  71. if,(DARKPINK,,UNDERLINE)
  72. while,(CYAN,DARKBLUE,UNDERLINE)
  73. for,(CYAN,DARKBLUE,UNDERLINE)
  74. do,(CYAN,DARKBLUE,UNDERLINE)
  75. switch,(CYAN,DARKBLUE,UNDERLINE)
  76. case,(DARKPINK,,UNDERLINE)
  77. goto,(RED,YELLOW)
  78. break,BROWN
  79. continue,BROWN
  80. return,BROWN
  81. int ,(DARKGREEN)
  82. char ,(DARKGREEN)
  83. const ,(DARKGREEN)
  84. default ,(DARKGREEN)
  85. extern ,(DARKGREEN)
  86. long ,(DARKGREEN)
  87. short ,(DARKGREEN)
  88. unsigned ,(DARKGREEN)
  89. signed ,(DARKGREEN)
  90. static ,(DARKGREEN)
  91. typedef ,(DARKGREEN)
  92. void ,(DARKGREEN)
  93. #define,(BLACK)
  94. #pragma,(BLACK,,UNDERLINE)
  95. #include,(BLACK)
  96. #ifdef,(BLACK)
  97. #endif,(BLACK)
  98. #ifndef,(BLACK)
  99. #else,(BLACK)
  100. #elif,(BLACK)
  101. #if,(BLACK)
  102. #undef,(BLACK)
  103. struct ,(DARKGREEN)
  104. union ,DARKGREEN
  105. {,DARKGREEN
  106. },DARKGREEN
  107. (,BLACK
  108. ),BLACK
  109. !,DARKRED
  110. ;,DARKRED
  111. .END                         ;; end of keyword list        
  112. ;;
  113. [JAVA]
  114. Case=Yes                     ;; The language is case sensitive
  115. Language=C                   ;; The language structure is the C language
  116. CommentPos=0                 ;; No specific comment column
  117. Comment="/*//*/  "           ;; start and end character pairs
  118. String="" ' " ' ",\          ;; start and end character pairs
  119. Tab=4,8,12,36,42,72          ;; six field tab positions
  120. Keywords                     ;; The following is a list of keywords
  121. else,(BLACK,,UNDERLINE)      ;; JAVA language keywords
  122. if,(BLACK,,UNDERLINE)
  123. while,(BLACK,,UNDERLINE)
  124. for,(BLACK,,UNDERLINE)
  125. do,(BLACK,,UNDERLINE)
  126. switch,(BLACK,,UNDERLINE)
  127. case,(BLACK,,UNDERLINE)
  128. break,(BLACK,,UNDERLINE)
  129. continue,(BLACK,,UNDERLINE)
  130. return,(BLACK,,UNDERLINE)
  131. int,(BLACK,,UNDERLINE)
  132. try,(BLACK,,UNDERLINE)
  133. new,(BLACK,,UNDERLINE)
  134. final,(BLACK,,UNDERLINE)
  135. catch,(BLACK,,UNDERLINE)
  136. public,(BLACK,,UNDERLINE)
  137. private,(BLACK,,UNDERLINE)
  138. char,(BLACK,,UNDERLINE)
  139. const,(BLACK,,UNDERLINE)
  140. default,(BLACK,,UNDERLINE)
  141. extern,(BLACK,,UNDERLINE)
  142. long,(BLACK,,UNDERLINE)
  143. short,(BLACK,,UNDERLINE)
  144. static,(BLACK,,UNDERLINE)
  145. void,(BLACK,,UNDERLINE)
  146. .END                         ;; end of keyword list
  147. ;;
  148. [ASM]
  149. Case=No                      ;; keywords should be specified in upper case
  150. Comment=";       "           ;; start and end character pairs
  151. Language=ASM                 ;; The language structure MASM
  152. String="" ' " ' "            ;; start and end character pairs     
  153. Tab=10,16,36,42              ;; four tab positions
  154. Keywords                     ;; The following is a list of keywords
  155. PROC ,CYAN
  156. ENTER ,PINK
  157. LEAVE,PINK
  158. RET,BROWN
  159. SEGMENT ,CYAN
  160. CALL ,PINK
  161. STRUCT ,DARKGREEN
  162. PUBLIC ,DARKGREEN
  163. [,BLACK
  164. ],BLACK
  165. .END                         ;; end of keyword list      
  166. ;;
  167. [PAS]
  168. Case=No                      ;; keywords should be specified in upper case
  169. Comment="{ (*} *)"           ;; start and end character pairs
  170. Language=default             ;; The language structure is the default (Algol)
  171. String="" ' " ' "            ;; start and end character pairs     
  172. Keywords                     ;; The following is a list of keywords
  173. PROCEDURE ,CYAN
  174. FUNCTION ,CYAN
  175. DO,DARKCYAN
  176. BEGIN,(DARKCYAN,,UNDERLINE)
  177. END,DARKCYAN
  178. FOR,CYAN
  179. REPEAT,CYAN
  180. UNTIL,CYAN
  181. WHILE,CYAN
  182. CASE,CYAN
  183. IF,DARKPINK
  184. THEN,DARKPINK
  185. ELSE,DARKPINK
  186. GOTO,BROWN
  187. OR,BLACK
  188. AND,BLACK
  189. RETURN,BROWN
  190. BREAK,BROWN
  191. CYCLE,BROWN
  192. VAR,DARKGREEN
  193. TYPE,DARKGREEN
  194. (,BLACK
  195. ),BLACK
  196. .END                         ;; end of keyword list
  197. ;;
  198. [FOR]
  199. Case=Yes                     ;; keywords should be specified in upper case
  200. Comment="C       "           ;; start and end character pairs 
  201. CommentPos=1                 ;; Comment fixed in column one
  202. Language=FORTRAN             ;; The language structure is FORTRAN
  203. String="" ' " ' "            ;; start and end character pairs     
  204. Keywords                     ;; The following is a list of keywords
  205. SUBROUTINE ,(PINK,YELLOW,UNDERLINE)
  206. FUNCTION ,PINK
  207. RETURN ,BROWN
  208. GO TO ,(BROWN,GREEN)
  209. CALL ,PINK
  210. STOP,RED
  211. END,BLACK
  212. DO ,DARKGREEN
  213. CONTINUE ,DARKGREEN   
  214. .END
  215. [IPF]
  216. Case=No                      ;; keywords should be specified in upper case 
  217. CommentPos=1                 ;; Comment fixed in column one
  218. Comment=".*      "           ;; start and end character pairs
  219. Language=default             ;; The language structure is the default (Algol)
  220. String="" ' " ' "            ;; start and end character pairs     
  221. Keywords                     ;; The following is a list of keywords
  222. :,(BLACK,RED,)      
  223. :H1,(YELLOW,BLACK,)  
  224. :H2,(DARKRED,DEFAULT,)  
  225. LINK,(GREEN,BLACK,)     
  226. ELINK,(GREEN,BLACK,)    
  227. .END
  228. ;;    
  229. [ADA]
  230. Case=No                      ;; Case insensitive 
  231. CommentPos=0                 ;; No fixed comment position 
  232. Comment="--      "           ;; start and end character pairs
  233. Language=default             ;; The language structure is the default (Algol)
  234. String="" ' " ' "            ;; start and end character pairs     
  235. Keywords                     ;; The following is a list of keywords
  236. PROCEDURE ,CYAN
  237. FUNCTION ,CYAN
  238. DECLARE ,PINK
  239. DELAY,GREEN
  240. SUBTYPE ,PINK
  241. RANGE ,PINK
  242. CASE ,PINK
  243. SELECT,DARKPINK
  244. RECORD ,PINK
  245. BEGIN,DARKCYAN
  246. DO,DARKCYAN
  247. END LOOP,CYAN
  248. END IF,DARKRED
  249. END CASE,PINK
  250. END SELECT,DARKPINK
  251. END RECORD,PINK
  252. END,DARKCYAN
  253. ELSIF,DARKRED
  254. ELSE,DARKRED
  255. IF,DARKRED
  256. WHEN OTHERS ,DARKGREEN
  257. WHEN ,CYAN
  258. WITH ,DARKRED
  259. FOR ,CYAN
  260. LOOP ,CYAN
  261. RETURN ,BROWN
  262. EXIT WHEN ,BROWN
  263. EXIT,BROWN
  264. GOTO ,BROWN
  265. PRIVATE ,DARKRED
  266. TYPE ,DARKRED
  267. GENERIC ,DARKRED  
  268. IS,BROWN
  269. OR,BROWN 
  270. .END
  271. ;; 
  272. [PLS]                        ;; Not a case sensitive language
  273. Case=No                      ;; keywords should be specified in upper case 
  274. CommentPos=0                 ;; no fixed comment position
  275. Comment="/*! */  "           ;; start and end character pairs
  276. Language=default             ;; The language structure is the default (Algol)
  277. String="" ' " ' "            ;; start and end character pairs     
  278. Keywords                     ;; The following is a list of keywords
  279. PROC,CYAN
  280. DCL,BLACK
  281. BEGIN,DARKCYAN
  282. END,DARKCYAN
  283. DO,DARKCYAN
  284. IF,DARKPINK
  285. THEN,DARKPINK
  286. ELSE,DARKPINK
  287. SELECT,CYAN
  288. WHEN,CYAN
  289. OTHERWISE,DARKRED
  290. UNTIL,CYAN
  291. WHILE,CYAN
  292. RETURN,BROWN
  293. GOTO,BROWN
  294. GO TO,BROWN
  295. RETURN,BROWN
  296. LEAVE,BROWN
  297. CALL,PINK
  298. PROCEDURE,CYAN
  299. DECLARE,BLACK
  300. GENERATE,DARKCYAN
  301. @ENDGEN,DARKCYAN
  302. RESPECIFY,DARKRED
  303. RFY,DARKRED
  304. (,BLACK
  305. ),BLACK
  306. .END
  307. ;;
  308. [CMD]                        ;; REXX
  309. Case=No                      ;; keywords should be specified in upper case 
  310. CommentPos=0                 ;; no fixed comment position
  311. Comment="/*  */  "           ;; start and end character pairs
  312. Language=default             ;; The language structure is the default (Algol)
  313. String="" ' " ' "            ;; start and end character pairs     
  314. Keywords                     ;; The following is a list of keywords
  315. SAY ,DARKCYAN
  316. PULL ,DARKCYAN
  317. PARSE ,DARKCYAN
  318. EXIT ,DARKCYAN
  319. END,DARKCYAN
  320. DO ,DARKCYAN
  321. IF ,DARKPINK
  322. THEN ,DARKPINK
  323. ELSE ,DARKPINK
  324. SELECT,CYAN
  325. WHEN,CYAN
  326. UNTIL,CYAN
  327. WHILE,CYAN
  328. RETURN,BROWN
  329. GOTO ,BROWN
  330. LEAVE,BROWN
  331. CALL ,PINK
  332. .END
  333. ;;
  334. [PRF]                        ;; Alpha profile
  335. Case=Yes                     ;; keywords should be specified in upper case 
  336. CommentPos=0                 ;; no fixed comment position
  337. Comment=";;      "           ;; start and end character pairs
  338. Language=default             ;; The language structure is the default (Algol)
  339. String="        "            ;; start and end character pairs     
  340. Keywords                     ;; The following is a list of keywords
  341. Case,(DARKGREEN,WHITE,UNDERLINE)     
  342. CommentPos,(DARKGREEN,WHITE,UNDERLINE)  
  343. Language,(DARKGREEN,WHITE,UNDERLINE)   
  344. Comment,(DARKGREEN,WHITE,UNDERLINE)   
  345. String,(DARKGREEN,WHITE,UNDERLINE)       
  346. Keywords,(DARKGREEN,WHITE,UNDERLINE)   
  347. Extension,(DARKGREEN,WHITE,UNDERLINE)   
  348. Operator,(DARKGREEN,WHITE,UNDERLINE)   
  349. Tab,(DARKGREEN,WHITE,UNDERLINE)    
  350. TransferPgm,(DARKGREEN,WHITE,UNDERLINE)    
  351. [,(BROWN,WHITE,)  
  352. ],(BROWN,WHITE,)     
  353. * ,(RED,WHITE,)    
  354. .END,(DARKRED,WHITE,UNDERLINE)  
  355. ;;
  356. [COB]                        ;; Cobol
  357. Case=No                      ;; keywords should be specified in upper case 
  358. CommentPos=7                 ;; Comment fixed in column one
  359. Comment="* /     "           ;; start and end character pairs
  360. Language=default             ;; The language structure is the default (Algol)
  361. String=""   "   "            ;; start and end character pairs     
  362. Keywords                     ;; The following is a list of keywords
  363. CALL,DARKRED
  364. USING,BLACK
  365. CONTENT,(DARKBLUE,YELLOW,UNDERLINE)
  366. END-CALL,DARKRED    
  367. PROCEDURE,(WHITE,RED)
  368. CLOSE,BLACK
  369. OPEN,(BLACK,,UNDERLINE)
  370. .END
  371. ;;
  372. ;; Operator - defines the operator keywords for each language.
  373. ;; The second value indicates how to process the keyword, viz.
  374. ;; < or > indicate the scan direction from the keyword to locate the label,
  375. ;; P or C indicates that the keyword specifies an entry point or call,
  376. ;; : indicates that the label will be followed by a colon,
  377. ;; 2 indicates that the second label following a , is to be used.
  378. ;; An indefinite number of entries may be defined as follows :-
  379. ;; file_type,<│>C│P[:][2],keyword
  380. ;; and are terminated by '.END', invalid entries are ignored.
  381. ;; The keywords must be <=12 characters. 
  382. Operator
  383. A37,>C,CALL
  384. A37,>C2,BAS
  385. A37,>C2,BAL
  386. A37,>C2,DFHSTACK
  387. ASM,>C,CALL
  388. ASM,<P,PROC
  389. PAS,>P,PROCEDURE
  390. PAS,>P,FUNCTION
  391. PAS,>P,procedure
  392. PAS,>P,function
  393. PLS,<P:,PROC
  394. PLS,<P:,proc
  395. PLS,<P:,IPROC
  396. PLS,>C,CALL
  397. PLS,>C,call
  398. FOR,>P,SUBROUTINE
  399. FOR,>P,FUNCTION
  400. FOR,>C,CALL    
  401. ADA,>P,procedure
  402. .END 
  403. ;;  
  404. ;; The following functions may be reassigned to alternate   
  405. ;; keys; Ctrl+a or Ctrl+Shift+A are the only valid values :-
  406. ;; 
  407. Keys                           ;; Accelerator keys
  408. Backout=Ctrl+z                 ;; Backout
  409. BoxLine=Ctrl+l                 ;; Toggle Box/Line mode select
  410. Bracket=Ctrl+m                 ;; Match brackets
  411. Calculator=Ctrl+k              ;; Invoke calculator
  412. CommentSup=Ctrl+Shift+H        ;; Suppress comments
  413. Compare=Ctrl+Shift+F           ;; Compare files
  414. Compile=Ctrl+c                 ;; Compile
  415. ConvertCase=Ctrl+u             ;; Convert to/from upper/lower case
  416. DisAsm=Ctrl+d                  ;; Disassemble EXE & DLL
  417. Edit=Ctrl+Shift+E              ;; Edit line
  418. Expand=Ctrl+e                  ;; Expand label
  419. Hex=Ctrl+h                     ;; Display original file in Hex
  420. Highlight=Ctrl+i               ;; Highlight label under cursor
  421. HighlightSup=Ctrl+y            ;; Suppress highlighted lines
  422. LocateHigh=Ctrl+Shift+I        ;; Make locate argument of highlighted label
  423. Playback=Ctrl+p                ;; Playback
  424. Record=Ctrl+r                  ;; Record
  425. SaveFile=Ctrl+Shift+S          ;; Save File
  426. Search=Ctrl+g                  ;; Search directories
  427. Structure=Ctrl+s               ;; Display structure
  428. XREF=Ctrl+x                    ;; Search children for strings
  429. .END                           ;;  
  430. ;;
  431. ;; TransferPgm specifies the programme name invoked from the Allocate menu
  432. ;; default ALMCOPY
  433. TransferPgm="ALMCOPY"
  434. ;;
  435. ;; End of profile for ALPHA programme
  436.