"Fossies" - the Fresh Open Source Software Archive

Member "wscite/pascal.properties" (11 Sep 2020, 4180 Bytes) of package /windows/misc/wscite445.zip:


As a special service "Fossies" has tried to format the requested text file into HTML format (style: standard) with prefixed line numbers. Alternatively you can here view or download the uninterpreted source code file.

    1 # Define SciTE settings for Pascal files.
    2 # Changed by Fernando Lozano <fsl@centroin.com.br> for Free Pascal
    3 # Changed by Mathias Rauen <scite@madshi.net> for Delphi
    4 # Changed by Marko Njezic <sf@maxempire.com> to match new LexPascal lexer and updated for Delphi XE4
    5 
    6 filter.pascal=Pascal (dpr dpk pas dfm inc pp)|*.dpr;*.dpk;*.pas;*.dfm;*.inc;*.pp|
    7 
    8 *filter.pascal=$(filter.pascal)
    9 
   10 file.patterns.pascal=*.dpr;*.pas;*.dfm;*.inc;*.pp
   11 file.patterns.pascal.package=*.dpk
   12 file.patterns.pascal.all=$(file.patterns.pascal);$(file.patterns.pascal.package)
   13 lexer.$(file.patterns.pascal.all)=pascal
   14 *language.pascal=Pascal|pas||
   15 
   16 keywordclass.pascal=absolute abstract and array as asm assembler automated begin case \
   17 cdecl class const constructor delayed deprecated destructor dispid dispinterface \
   18 div do downto dynamic else end except experimental export exports external far \
   19 file final finalization finally for forward function goto helper if \
   20 implementation in inherited initialization inline interface is label library \
   21 message mod near nil not object of on operator or out overload override packed \
   22 pascal platform private procedure program property protected public published \
   23 raise record reference register reintroduce repeat resourcestring safecall \
   24 sealed set shl shr static stdcall strict string then threadvar to try type unit \
   25 unsafe until uses var varargs virtual while winapi with xor
   26 
   27 keywordclass.pascal.smart=add default implements index name nodefault read readonly \
   28 remove stored write writeonly
   29 
   30 keywordclass.pascal.package=package contains requires
   31 
   32 keywords.$(file.patterns.pascal)=$(keywordclass.pascal) $(keywordclass.pascal.smart)
   33 keywords.$(file.patterns.pascal.package)=$(keywordclass.pascal) $(keywordclass.pascal.smart) $(keywordclass.pascal.package)
   34 
   35 # If enabled some keywords will only be highlightend in appropriate context.
   36 # As implemented those are keywords related to property and DLL exports declarations
   37 lexer.pascal.smart.highlighting=1
   38 
   39 # Pascal styles
   40 
   41 # Default
   42 style.pascal.32=$(font.base)
   43 # White space
   44 style.pascal.0=fore:#808080
   45 # Identifiers
   46 style.pascal.1=
   47 # Comment: { ... }
   48 style.pascal.2=$(colour.code.comment.box),$(font.code.comment.box)
   49 # Comment: (* ... *)
   50 style.pascal.3=$(colour.code.comment.box),$(font.code.comment.box)
   51 # Line Comment: // ...
   52 style.pascal.4=$(colour.code.comment.line),$(font.code.comment.line)
   53 # Preprocessor: {$ ... }
   54 style.pascal.5=$(colour.preproc)
   55 # Preprocessor: (*$ ... *)
   56 style.pascal.6=$(colour.preproc)
   57 # Number
   58 style.pascal.7=$(colour.number)
   59 # Hex Number
   60 style.pascal.8=$(colour.number)
   61 # Keyword
   62 style.pascal.9=$(colour.keyword),bold
   63 # String
   64 style.pascal.10=$(colour.string)
   65 # End of line where string is not closed
   66 style.pascal.11=fore:#000000,$(font.monospace),back:#E0C0E0,eolfilled
   67 # Character
   68 style.pascal.12=$(colour.char)
   69 # Operators
   70 style.pascal.13=$(colour.operator),bold
   71 # Inline Asm
   72 style.pascal.14=fore:#804080
   73 
   74 # Braces are only matched in operator style
   75 braces.pascal.style=13
   76 
   77 comment.block.pascal=//~
   78 comment.stream.start.pascal={
   79 comment.stream.end.pascal=}
   80 comment.box.start.pascal=(*
   81 comment.box.middle.pascal= *
   82 comment.box.end.pascal= *)
   83 
   84 statement.indent.$(file.patterns.pascal)=9 case class do else for then \
   85 private protected public published repeat try while type
   86 statement.end.$(file.patterns.pascal)=13 ;
   87 statement.lookback.$(file.patterns.pascal)=20
   88 block.start.$(file.patterns.pascal)=9 begin
   89 block.end.$(file.patterns.pascal)=9 end
   90 
   91 #using virtual pascal
   92 #pc=C:\Vp21\Bin.w32\Vpc.exe -VC:\Vp21\Bin.w32\Vp.vpo "$(FilePath)"
   93 
   94 #using free pascal
   95 
   96 # compile
   97 command.compile.*.pas=fpc "$(FilePath)"
   98 
   99 # normal execute
  100 if PLAT_WIN
  101 	command.go.*.pas="$(FileName).exe"
  102 	command.go.subsystem.*.pas=2
  103 if PLAT_GTK
  104 	command.go.*.pas="kvt -e $(FileName)"
  105 
  106 # build
  107 command.build.*.pas=fpc -B "$(FilePath)"
  108 command.build.subsystem.*.pas=1
  109 
  110 command.name.0.*.pas=Debug Compile
  111 command.0.*.pas=fpc -g "$(FilePath)"
  112 command.name.1.*.pas=Debug Build
  113 command.1.*.pas=fpc -g -B "$(FilePath)"
  114 command.name.2.*.pas=GDB
  115 if PLAT_WIN
  116 	command.2.*.pas=gdbpasw "$(FileName)"
  117 if PLAT_GTK
  118 	command.2.*.pas=gdb "$(FileName)"
  119 	command.name.3.*.pas=DDD
  120 	command.3.*.pas=ddd "$(FileName)"
  121