home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 5 Edit / 05-Edit.zip / fte0827.zip / config / m_ada.fte < prev    next >
Text File  |  1999-05-16  |  2KB  |  73 lines
  1. colorize Ada {
  2.     SyntaxParser        = 'SIMPLE';
  3.     
  4.     color {
  5.         { 'Normal',      'Editor_Default' },
  6.         { 'Number',      'Lang_Number' },
  7.         { 'Punctuation', 'Lang_Punctuation' },
  8.         { 'String',      'Lang_String' },
  9.         { 'Comment',     'Lang_Comment' },
  10.         { 'Function',    'Lang_Function' },
  11.     };
  12.     
  13.     keyword 'Editor_Keywords' {
  14.         'abort', 'else', 'new', 'return',  'abs', 'elsif', 'not', 'reverse',
  15.         'abstract', 'end', 'null', 'accept',  'entry', 'select', 'access',
  16.         'exception', 'separate', 'aliased',  'exit', 'of', 'subtype', 'all',
  17.         'or', 'and', 'for', 'others',  'tagged', 'array', 'function', 'out',
  18.         'task', 'at', 'terminate',  'generic', 'package', 'then', 'begin',
  19.         'goto', 'pragma', 'type', 'body',  'private', 'if', 'procedure',
  20.         'case', 'in',  'protected', 'until', 'constant', 'is',  'use', 'raise',
  21.         'declare', 'range',  'when', 'delay', 'limited', 'record',  'while',
  22.         'delta', 'loop', 'rem',  'with', 'digits', 'renames', 'do',  'mod',
  23.         'requeue', 'xor',
  24.     }; 
  25.     h_state 0 { 'Normal' }
  26.     h_trans { 4, '-s', 'a-zA-Z_', 'Normal' }
  27.     h_trans { 1, '', '--', 'Comment' }
  28.     h_trans { 2, '', '"', 'String' }
  29.     h_trans { 3, '', '\'', 'String' }
  30.     h_trans { 5, 's', '0-9', 'Number' }
  31.     h_trans { 0, 'S', '_a-zA-Z0-9', 'Punctuation' }
  32.  
  33.     h_state 1 { 'Comment' }
  34.     h_trans { 0, '$', '', 'Normal' }
  35.  
  36.     h_state 2 { 'String' }
  37.     h_trans { 0, '', '"', 'String' }
  38.     h_trans { 0, '$', '', 'String' }
  39.     h_trans { 4, 'Qq', '\\', 'String' }
  40.  
  41.     h_state 3 { 'String' }
  42.     h_trans { 0, '', '\'', 'String' }
  43.     h_trans { 0, '$', '', 'String' }
  44.  
  45.     h_state 4 { 'Normal' }
  46.     h_trans { 0, '$', '', 'Normal' }
  47.     h_wtype { 0, 0, 0, '', 'a-zA-Z0-9_' }
  48.  
  49.     h_state 5 { 'Number' }
  50.     h_trans { 0, '-S', '0-9', 'Normal' }
  51.     h_trans { 0, '$', '', 'Normal' }
  52. }
  53.  
  54. mode Ada: PLAIN {               # Ada mode
  55.     FileNameRx          = '\\.\\c{ADS}|{ADB}$';
  56.     Colorizer           = 'Ada';
  57.     HilitOn             = 1;
  58.     AutoIndent          = 1;
  59.     IndentMode          = 'PLAIN';
  60.     TabSize             = 8;
  61.     SpaceTabs           = 1;
  62.     MatchCase           = 1;
  63.     Trim                = 1;
  64.     MultiLineHilit      = 0;
  65.     AutoHilitParen      = 1;
  66.     
  67.     RoutineRegexp       = /^\s*{function}|{procedure}\s/;
  68.     
  69.     SaveFolds           = 2;      # save fold info at end of line
  70.     CommentStart        = ' --';
  71.     CommentEnd          = '';
  72. }
  73.