data/properties/pascal.properties

   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
   5 filter.pascal=Pascal (dpr dpk pas dfm inc)|*.dpr;*.dpk;*.pas;*.dfm;*.inc;*.pp|
   6
   7 file.patterns.pascal=*.dpr;*.dpk;*.pas;*.dfm;*.inc;*.pp
   8 lexer.$(file.patterns.pascal)=pascal
   9
  10 keywordclass.pascal=and array asm begin case cdecl class const constructor default \
  11 destructor div do downto else end end. except exit exports external far file \
  12 finalization finally for function goto if implementation in index inherited \
  13 initialization inline interface label library message mod near nil not \
  14 object of on or out overload override packed pascal private procedure program \
  15 property protected public published raise read record register repeat resourcestring \
  16 safecall set shl shr stdcall stored string then threadvar to try type unit \
  17 until uses var virtual while with write xor
  18
  19 keywordclass.pascalclasses=write read default public protected private property published stored
  20
  21 keywords.$(file.patterns.pascal)=$(keywordclass.pascal)
  22 keywords2.$(file.patterns.pascal)=$(keywordclass.pascalclasses)
  23
  24 # Pascal styles
  25 # White space
  26 style.pascal.0=fore:#000000,$(font.pascal)
  27 # Comment
  28 style.pascal.1=fore:#007F00,$(font.comment)
  29 # Line Comment
  30 style.pascal.2=fore:#007F00,$(font.comment)
  31 # Doc comment
  32 style.pascal.3=fore:#7F7F7F
  33 # Number
  34 style.pascal.4=fore:#007F7F
  35
  36 # Keyword
  37 style.pascal.5=fore:#00007F,bold
  38 # Double quoted string
  39 style.pascal.6=fore:#7F007F,italics,$(font.comment)
  40 # Single quoted string
  41 style.pascal.7=fore:#7F007F,italics,$(font.text)
  42 # Symbols
  43 style.pascal.8=fore:#007F7F
  44 # Preprocessor
  45 style.pascal.9=fore:#7F7F00
  46 # Operators
  47 style.pascal.10=fore:#000000
  48 # Inline Asm
  49 style.pascal.14=fore:#008080
  50 # Default/Identifiers
  51 style.pascal.32=fore:#800000
  52 # Brace highlight
  53 style.pascal.34=fore:#0000FF,notbold
  54 # Brace incomplete highlight
  55 style.pascal.35=fore:#FF0000,notbold
  56 # Braces are only matched in operator style
  57 braces.pascal.style=10
  58
  59 statement.indent.$(file.patterns.pascal)=5 case catch class default do else for then \
  60 private protected public struct try union while type
  61 statement.end.$(file.patterns.pascal)=10 ;
  62 statement.lookback.$(file.patterns.pascal)=20
  63 block.start.$(file.patterns.pascal)=10 begin
  64 block.end.$(file.patterns.pascal)=10 end
  65
  66 #using virtual pascal
  67 #pc=C:\Vp21\Bin.w32\Vpc.exe -VC:\Vp21\Bin.w32\Vp.vpo "$(FilePath)"
  68
  69 #using free pascal
  70
  71 # compile
  72 command.compile.*.pas=fpc "$(FilePath)"
  73
  74 # normal execute
  75 if PLAT_WIN
  76         command.go.*.pas="$(FileName).exe"
  77         command.go.subsystem.*.pas=2
  78 if PLAT_GTK
  79         command.go.*.pas="kvt -e $(FileName)"
  80
  81 # build
  82 command.build.*.pas=fpc -B "$(FilePath)"
  83 command.build.subsystem.*.pas=1
  84
  85 command.name.0.*.pas=Debug Compile
  86 command.0.*.pas=fpc -g "$(FilePath)"
  87 command.name.1.*.pas=Debug Build
  88 command.1.*.pas=fpc -g -B "$(FilePath)"
  89 command.name.2.*.pas=GDB
  90 if PLAT_WIN
  91         command.2.*.pas=gdbpasw "$(FileName)"
  92 if PLAT_GTK
  93         command.2.*.pas=gdb "$(FileName)"
  94         command.name.3.*.pas=DDD
  95         command.3.*.pas=ddd "$(FileName)"
  96