Re: CodeWright support

Oh, I dunno about putting on pmwiki, its kind of chintzy. Thinking back on
it, I primarily hit the low-hanging fruit. I may have even have some of our
custom words in it. But I'll paste it here. If Charles tries it and likes
it, then it might be worth distributing wider.

This goes in CodeWright's lexer.ini file:

[ChromaLexer-Forth]
ChromaFlags=CHROMA_CF_MAIN,0x04000000,1
ChromaFlags=CHROMA_CF_STRING,0x00000300,1
ChromaAddNumberEx=0x00004103,'','0-9',''
ChromaAddNumberEx=0x00004005,'','0-9.','E'
ChromaAddNumberEx=0x00000006,'','',''
ChromaIdentifiers='!#-~ !#-~'
ChromaBraceChars=':;'
ChromaAddComment=0x00002000,0,'{ ','}'
ChromaAddComment=0x00002000,0,'( ',')'
ChromaAddComment=0x00001000,0,'\ ',''
ChromaAddComment=0x00002000,0,'\\\\',''
ChromaAddComment=0x00002000,1,'{','}'
ChromaAddWords=CHROMA_WT_KEYWORD +LOOP /LOOP ?DO AGAIN ARRAY BEGIN CASE
CONSTANT DO ELSE ENDCASE ENDOF EQU EXIT FCONSTANT FVARIABLE
ChromaAddWords=CHROMA_WT_KEYWORD IF LEAVE LOOP OF REPEAT THEN UNTIL VARIABLE
WHILE
ChromaAddWords=CHROMA_WT_PREPROC ASSEMBLER 0 COMPILER 0 DECIMAL 0 FORTH 0
HEX 0 HOST 0 INTERPRETER 0 TARGET 0 [ 0 [DEFINED] 4 [ELSE] 0 [IF] 0 [THEN] 0
[UNDEFINED] 4 ] 0
ChromaAddWords=CHROMA_WT_OPERATOR ! 0 ' 0 * 0 + 0 - 6 / 0 1+ 0 1- 0 2! 0 2@
0 @ 0 AND 0 C! 0 C@ 0 F! 0 F* 0
ChromaAddWords=CHROMA_WT_OPERATOR F+ 0 F- 0 F/ 0 F@ 0 FLITERAL 0 FNEGATE 0
F^2 0 LITERAL 0 LSHIFT 0 NEGATE 0 NOT 0 OR 0 RSHIFT 0 XOR 0
ChromaAddWords=CHROMA_WT_USER1 \
ChromaSetWordRegex=CHROMA_WT_NUMBER,'$[0-9A-F]+','',0x7

To go with this, I recommend changing CodeWright's delimiters for .f files,
so for instance, double-clicking a "word" will highlight the whole
any-character-allowed-in-identifiers thing (e.g. not just up to the nearest
"-"). This goes in cwright.ini:

[Extension]
ExtColorsAssoc='.f',5
ExtChromaLexer='.f','Forth'
ExtSetDelimiters=.f,^!-~
ExtDelimiterFlags=.f,0x00000001
----------------------------------------------------------------------
swiftx_at_forth.com The SwiftX programming discussion email list
To unsubscribe, send subject "unsubscribe" to swiftx-request_at_forth.com
For list command help, send subject "help" to swiftx-request_at_forth.com
Message archives are located at http://www.forth.com/archive/swiftx
----------------------------------------------------------------------
This list is a forum for SwiftX users. For product support and bug
reports, please send email to support_at_forth.com
----------------------------------------------------------------------
Received on Thu Jul 22 2004 - 14:33:52 PDT