data/properties/forth.properties

   1 # Define SciTE settings for Forth files
   2
   3 # These patterns conflict with fortran.properties and nncrontab.properties
   4 # so disable these other properties files if you want to use forth.
   5 #file.patterns.forth=*.f;*.spf
   6 file.patterns.forth=*.forth
   7
   8 # add '*.tab;*.spf;' to 'source.files' variable in 'SciTEGlobal.properties'
   9 # if you want to include these file patterns into default source file list
  10
  11 lexer.$(file.patterns.forth)=forth
  12
  13 filter.forth=Forth files (f spf)|$(file.patterns.forth)|
  14
  15 word.characters.$(file.patterns.forth)=$(chars.alpha)$(chars.numeric)%-
  16
  17 comment.block.forth=\
  18 #comment.block.at.line.start.forth=0
  19 comment.stream.start.forth=(
  20 comment.stream.end.forth=)
  21 comment.box.start.forth=\
  22 comment.box.middle.forth=\
  23 comment.box.end.forth=\
  24 fold.comment=1
  25 fold.preprocessor=1
  26
  27 # Forth styles
  28
  29 # control keywords Forth
  30 keywords.$(file.patterns.forth)=\
  31 AGAIN BEGIN CASE DO ELSE ENDCASE ENDOF IF LOOP OF REPEAT THEN UNTIL  WHILE \
  32 [IF] [ELSE] [THEN] ?DO
  33
  34 # Keywords
  35 keywords2.$(file.patterns.forth)=\
  36 DUP DROP ROT SWAP OVER @ ! 2@ 2! 2DUP 2DROP 2SWAP 2OVER NIP R@ >R R> 2R@ 2>R 2R> \
  37 0= 0< SP@ SP! W@ W! C@ C! < > = <> 0<>\
  38 SPACE SPACES KEY? KEY THROW CATCH ABORT */ 2* /MOD CELL+ CELLS CHAR+ \
  39 CHARS MOVE ERASE DABS TITLE HEX DECIMAL HOLD <# # #S #> SIGN \
  40 D. . U. DUMP (.") >NUMBER ' IMMEDIATE EXIT RECURSE UNLOOP LEAVE HERE ALLOT , \
  41 C, W, COMPILE, BRANCH, RET, LIT, DLIT, ?BRANCH, ", >MARK >RESOLVE1 <MARK >RESOLVE \
  42 ALIGN ALIGNED USER-ALLOT USER-HERE HEADER DOES> SMUDGE HIDE :NONAME LAST-WORD \
  43 ?ERROR ERROR2 FIND1 SFIND SET-CURRENT GET-CURRENT DEFINITIONS GET-ORDER FORTH \
  44 ONLY SET-ORDER ALSO PREVIOUS VOC-NAME. ORDER LATEST LITERAL 2LITERAL SLITERAL \
  45 CLITERAL ?LITERAL1 ?SLITERAL1 HEX-LITERAL HEX-SLITERAL ?LITERAL2 ?SLITERAL2 SOURCE \
  46 EndOfChunk CharAddr PeekChar IsDelimiter GetChar OnDelimiter SkipDelimiters OnNotDelimiter \
  47 SkipWord SkipUpTo ParseWord NextWord PARSE SKIP CONSOLE-HANDLES REFILL DEPTH ?STACK \
  48 ?COMP WORD INTERPRET BYE QUIT MAIN1 EVALUATE INCLUDE-FILE INCLUDED >BODY +WORD \
  49 WORDLIST CLASS! CLASS@ PAR! PAR@ ID. ?IMMEDIATE ?VOC IMMEDIATE VOC WordByAddrWl \
  50 WordByAddr NLIST WORDS SAVE OPTIONS /notransl ANSI>OEM ACCEPT EMIT CR TYPE EKEY? \
  51 EKEY EKEY>CHAR EXTERNTASK ERASE-IMPORTS ModuleName ModuleDirName ENVIRONMENT? \
  52 DROP-EXC-HANDLER SET-EXC-HANDLER HALT ERR CLOSE-FILE CREATE-FILE CREATE-FILE-SHARED \
  53 OPEN-FILE-SHARED DELETE-FILE FILE-POSITION FILE-SIZE OPEN-FILE READ-FILE REPOSITION-FILE \
  54 DOS-LINES UNIX-LINES READ-LINE WRITE-FILE RESIZE-FILE WRITE-LINE ALLOCATE FREE RESIZE \
  55 START SUSPEND RESUME STOP PAUSE MIN MAX TRUE FALSE ASCIIZ> \
  56 R/O W/O ;CLASS ENDWITH OR AND /STRING SEARCH COMPARE EXPORT ;MODULE SPACE
  57
  58 # defwords
  59 keywords3.$(file.patterns.forth)=\
  60 VARIABLE CREATE : VALUE CONSTANT VM: M: var dvar chars OBJ \
  61 CONSTR: DESTR: CLASS: OBJECT: POINTER \
  62 USER USER-CREATE USER-VALUE VECT \
  63 WNDPROC: VOCABULARY -- TASK: CEZ: MODULE:
  64
  65 # prewords1
  66 keywords4.$(file.patterns.forth)=\
  67 CHAR [CHAR] POSTPONE WITH ['] TO [COMPILE] CHAR ASCII \'
  68
  69 # prewords2
  70 keywords5.$(file.patterns.forth)=\
  71 REQUIRE WINAPI:
  72
  73 # string words
  74 keywords6.$(file.patterns.forth)=\
  75 S" ABORT" Z" " ." C"
  76
  77 # whitespace (SCE_FORTH_DEFAULT)
  78 style.forth.0=$(font.monospace)
  79 # Comment (SCE_FORTH_COMMENT)
  80 style.forth.1=fore:#009933,$(font.comment),$(font.monospace)
  81 # ML comment (SCE_FORTH_COMMENT_ML)
  82 style.forth.2=fore:#007F00,$(font.comment)
  83 # ML comment (SCE_FORTH_IDENTIFIER)
  84 style.forth.3=fore:#000000,bold
  85 # control (SCE_FORTH_CONTROL)
  86 style.forth.4=fore:#00007F,bold
  87 # Keywords (SCE_FORTH_KEYWORD)
  88 style.forth.5=fore:#000000,$(font.monospace),bold
  89 # defwords (SCE_FORTH_DEFWORD)
  90 style.forth.6=fore:#FF0000,bold,$(font.monospace)
  91 # preword1 (SCE_FORTH_PREWORD1)
  92 style.forth.7=fore:#CC3300,bold,$(font.monospace)
  93 # preword2 (SCE_FORTH_PREWORD2)
  94 style.forth.8=fore:#996633,bold,$(font.monospace)
  95 # number (SCE_FORTH_NUMBER)
  96 style.forth.9=fore:#007F7F,$(font.monospace)
  97 # Double quoted string (SCE_FORTH_STRING)
  98 style.forth.10=fore:#CC3300,$(font.monospace)
  99 # locale
 100 style.forth.11=fore:#0000CC,$(font.monospace)
 101
 102 #command.compile.*.f=spf.cmd $(FileNameExt)