Advertisement
Guest User

Untitled

a guest
Jun 20th, 2011
210
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. # Define SciTE settings for Perl, Bash, and AWK files.
  2.  
  3.  
  4. file.patterns.perl=*.pl;*.pm;*.pod
  5. file.patterns.bash=*.sh;*.bsh;configure
  6. file.patterns.awk=*.awk
  7.  
  8. shbang.perl=pl
  9. shbang.sh=sh
  10. shbang.bash=sh
  11.  
  12. shbang.gawk=awk
  13. shbang.nawk=awk
  14. shbang.mawk=awk
  15.  
  16. filter.perl=Perl (pl pm)|$(file.patterns.perl)|
  17. filter.bash=Bash (sh bsh)|$(file.patterns.bash)|
  18. filter.awk=GAWK  (awk)|$(file.patterns.awk)|
  19.  
  20. lexer.$(file.patterns.perl)=perl
  21. lexer.$(file.patterns.bash)=bash
  22. lexer.$(file.patterns.awk)=perl
  23.  
  24. keywords.$(file.patterns.perl)=\
  25. NULL __FILE__ __LINE__ __PACKAGE__ __DATA__ __END__ AUTOLOAD \
  26. BEGIN CORE DESTROY END EQ GE GT INIT LE LT NE CHECK abs accept \
  27. alarm and atan2 bind binmode bless caller chdir chmod chomp chop \
  28. chown chr chroot close closedir cmp connect continue cos crypt \
  29. dbmclose dbmopen defined delete die do dump each else elsif endgrent \
  30. endhostent endnetent endprotoent endpwent endservent eof eq eval \
  31. exec exists exit exp fcntl fileno flock for foreach fork format \
  32. formline ge getc getgrent getgrgid getgrnam gethostbyaddr gethostbyname \
  33. gethostent getlogin getnetbyaddr getnetbyname getnetent getpeername \
  34. getpgrp getppid getpriority getprotobyname getprotobynumber getprotoent \
  35. getpwent getpwnam getpwuid getservbyname getservbyport getservent \
  36. getsockname getsockopt glob gmtime goto grep gt hex if index \
  37. int ioctl join keys kill last lc lcfirst le length link listen \
  38. local localtime lock log lstat lt map mkdir msgctl msgget msgrcv \
  39. msgsnd my ne next no not oct open opendir or ord our pack package \
  40. pipe pop pos print printf prototype push quotemeta qu \
  41. rand read readdir readline readlink readpipe recv redo \
  42. ref rename require reset return reverse rewinddir rindex rmdir \
  43. scalar seek seekdir select semctl semget semop send setgrent \
  44. sethostent setnetent setpgrp setpriority setprotoent setpwent \
  45. setservent setsockopt shift shmctl shmget shmread shmwrite shutdown \
  46. sin sleep socket socketpair sort splice split sprintf sqrt srand \
  47. stat study sub substr symlink syscall sysopen sysread sysseek \
  48. system syswrite tell telldir tie tied time times truncate \
  49. uc ucfirst umask undef unless unlink unpack unshift untie until \
  50. use utime values vec wait waitpid wantarray warn while write \
  51. xor \
  52. given when default say state UNITCHECK
  53.  
  54. keywords.$(file.patterns.awk)=\
  55. BEGIN END \
  56. if else while do for in break continue delete exit function return \
  57. print printf sprintf \
  58. system close getline next nextfile fflush \
  59. atan2 cos exp int log rand sin sqrt srand \
  60. asort asorti gensub sub gsub index length match split \
  61. strtonum substr tolower toupper \
  62. mktime strftime systime \
  63. and compl lshift or rshift xor \
  64. bindtextdomain dcgettext dcngettext \
  65. ARGC ARGIND ARGV BINMODE CONVFMT ENVIRON ERRNO FIELDWIDTHS \
  66. FILENAME FNR FS IGNORECASE LINT NF NR OFMT OFS ORS PROCINFO \
  67. RS RT RSTART RLENGTH SUBSEP TEXTDOMAIN
  68.  
  69.  
  70. comment.block.awk=#~
  71. block.start.$(file.patterns.awk)=10 {
  72. block.end.$(file.patterns.awk)=10 }
  73.  
  74.  
  75. word.characters.$(file.patterns.perl)=$(chars.alpha)$(chars.numeric)_$@%&
  76.  
  77. comment.block.perl=#~
  78. block.start.$(file.patterns.perl)=10 {
  79. block.end.$(file.patterns.perl)=10 }
  80.  
  81. colour.perl.heredoc=$(colour.embedded.comment)
  82.  
  83. #fold.perl.package=1
  84. #fold.perl.pod=1
  85.  
  86. # generic keywords
  87. bash_keywords1=alias \
  88. ar asa awk banner basename bash bc bdiff break \
  89. bunzip2 bzip2 cal calendar case cat cc cd chmod cksum \
  90. clear cmp col comm compress continue cp cpio crypt \
  91. csplit ctags cut date dc dd declare deroff dev df diff diff3 \
  92. dircmp dirname do done du echo ed egrep elif else env \
  93. esac eval ex exec exit expand export expr false fc \
  94. fgrep fi file find fmt fold for function functions \
  95. getconf getopt getopts grep gres hash head help \
  96. history iconv id if in integer jobs join kill local lc \
  97. let line ln logname look ls m4 mail mailx make \
  98. man mkdir more mt mv newgrp nl nm nohup ntps od \
  99. pack paste patch pathchk pax pcat perl pg pr print \
  100. printf ps pwd read readonly red return rev rm rmdir \
  101. sed select set sh shift size sleep sort spell \
  102. split start stop strings strip stty sum suspend \
  103. sync tail tar tee test then time times touch tr \
  104. trap true tsort tty type typeset ulimit umask unalias \
  105. uname uncompress unexpand uniq unpack unset until \
  106. uudecode uuencode vi vim vpax wait wc whence which \
  107. while who wpaste wstart xargs zcat
  108.  
  109. # additional keywords from coreutils
  110. bash_keywords2=chgrp chown chroot dir dircolors \
  111. factor groups hostid install link md5sum mkfifo \
  112. mknod nice pinky printenv ptx readlink seq \
  113. sha1sum shred stat su tac unlink users vdir whoami yes
  114.  
  115. keywords.$(file.patterns.bash)=$(bash_keywords1) $(bash_keywords2)
  116.  
  117. word.characters.$(file.patterns.bash)=$(chars.alpha)$(chars.numeric)_$@%&
  118.  
  119. comment.block.bash=#~
  120.  
  121. colour.bash.heredoc=$(colour.embedded.comment)
  122.  
  123. # Perl styles
  124. # The perl styles are set to lots of different foreground and background colours as an
  125. # aid to debugging SciTE's Perl lexer - not because this is a good way to display Perl.
  126. style.perl.32=
  127. # White space
  128. style.perl.0=fore:#808080,$(font.base)
  129. # Error
  130. style.perl.1=$(colour.error)
  131. # Comment
  132. style.perl.2=$(colour.code.comment.box),$(font.code.comment.box)
  133. # POD: = at beginning of line
  134. style.perl.3=fore:#004000,back:#E0FFE0,$(font.text),eolfilled
  135. # Number
  136. style.perl.4=$(colour.number)
  137. # Keyword
  138. style.perl.5=$(colour.keyword),bold
  139. # Double quoted string
  140. style.perl.6=$(colour.string),$(font.monospace)
  141. # Single quoted string
  142. style.perl.7=$(colour.char),$(font.monospace)
  143. # Symbols / Punctuation. Currently not used by LexPerl.
  144. style.perl.8=$(colour.notused),$(font.notused)
  145. # Preprocessor. Currently not used by LexPerl.
  146. style.perl.9=$(colour.notused),$(font.notused)
  147. # Operators
  148. style.perl.10=$(colour.operator),bold
  149. # Identifiers (functions, etc.)
  150. style.perl.11=fore:#000000
  151. # Scalars: $var
  152. style.perl.12=fore:#000000,back:#FFE0E0
  153. # Array: @var
  154. style.perl.13=fore:#000000,back:#FFFFE0
  155. # Hash: %var
  156. style.perl.14=fore:#000000,back:#FFE0FF
  157. # Symbol table: *var
  158. style.perl.15=fore:#000000,back:#E0E0E0
  159. # Regex: /re/ or m{re}
  160. style.perl.17=fore:#000000,back:#A0FFA0
  161. # Substitution: s/re/ore/
  162. style.perl.18=fore:#000000,back:#F0E080
  163. # Long Quote (qq, qr, qw, qx) -- obsolete: replaced by qq, qx, qr, qw
  164. style.perl.19=fore:#FFFF00,back:#8080A0
  165. # Back Ticks
  166. style.perl.20=fore:#FFFF00,back:#A08080
  167. # Data Section: __DATA__ or __END__ at beginning of line
  168. style.perl.21=fore:#600000,back:#FFF0D8,eolfilled
  169. # Here-doc (delimiter)
  170. style.perl.22=fore:#000000,back:#DDD0DD
  171. # Here-doc (single quoted, q)
  172. style.perl.23=fore:#7F007F,back:#DDD0DD,eolfilled,notbold
  173. # Here-doc (double quoted, qq)
  174. style.perl.24=fore:#7F007F,back:#DDD0DD,eolfilled,bold
  175. # Here-doc (back ticks, qx)
  176. style.perl.25=fore:#7F007F,back:#DDD0DD,eolfilled,italics
  177. # Single quoted string, generic
  178. style.perl.26=fore:#7F007F,$(font.monospace),notbold
  179. # qq = Double quoted string
  180. style.perl.27=$(style.perl.6)
  181. # qx = Back ticks
  182. style.perl.28=$(style.perl.20)
  183. # qr = Regex
  184. style.perl.29=$(style.perl.17)
  185. # qw = Array
  186. style.perl.30=$(style.perl.13)
  187. # POD: verbatim paragraphs
  188. style.perl.31=fore:#004000,back:#C0FFC0,$(font.monospace),eolfilled
  189. # subroutine prototype
  190. style.perl.40=$(style.perl.10),italics
  191. # format identifier
  192. style.perl.41=fore:#C000C0,bold
  193. # format body
  194. style.perl.42=fore:#C000C0,back:#FFF0FF,eolfilled
  195. # Braces are only matched in operator style
  196. braces.perl.style=10
  197.  
  198. # Bash styles
  199. # The bash styles are set to lots of different foreground and background colours as an
  200. # aid to debugging SciTE's Bash lexer - not because this is a good way to display Bash.
  201. style.bash.32=
  202. # White space
  203. style.bash.0=fore:#808080,$(font.base)
  204. # Error
  205. style.bash.1=$(colour.error)
  206. # Comment
  207. style.bash.2=$(colour.code.comment.box),$(font.code.comment.box)
  208. # Number
  209. style.bash.3=$(colour.number)
  210. # Keyword
  211. style.bash.4=$(colour.keyword),bold
  212. # Double quoted string
  213. style.bash.5=$(colour.string),$(font.monospace)
  214. # Single quoted string
  215. style.bash.6=$(colour.char),$(font.monospace)
  216. # Operators
  217. style.bash.7=$(colour.operator),bold
  218. # Identifiers (functions, etc.)
  219. style.bash.8=fore:#000000
  220. # Scalars: $var
  221. style.bash.9=fore:#000000,back:#FFE0E0
  222. # Parameter expansion: ${var}
  223. style.bash.10=fore:#000000,back:#FFFFE0
  224. # Back Ticks
  225. style.bash.11=fore:#FFFF00,back:#A08080
  226. # Here-doc (delimiter)
  227. style.bash.12=fore:#000000,back:#DDD0DD
  228. # Here-doc (single quoted, q)
  229. style.bash.13=fore:#7F007F,back:#DDD0DD,eolfilled,notbold
  230. # Braces are only matched in operator style
  231. braces.bash.style=7
  232.  
  233. command.go.$(file.patterns.awk)=gawk -f $(FileNameExt)
  234.  
  235. command.go.$(file.patterns.perl)=perl -w $(FileNameExt)
  236.  
  237. command.compile.$(file.patterns.perl)=perl -c -w $(FileNameExt)
  238. command.name.0.$(file.patterns.perl)=Lint
  239. command.0.$(file.patterns.perl)=perl -MO=Lint,all $(FileNameExt)
  240.  
  241. command.name.1.$(file.patterns.perl)=Check Syntax
  242. command.1.$(file.patterns.perl)=perl -cw $(FileNameExt)
  243.  
  244. command.name.2.$(file.patterns.perl)=Code Profiler
  245. command.2.$(file.patterns.perl)=perl -d:DProf $(FileNameExt)
  246.  
  247. command.name.3.$(file.patterns.perl)=Profiler Parser
  248. command.3.$(file.patterns.perl)=C:\Perl\bin\dprofpp.bat $(FileDir)\tmon.out
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement