File Coverage

blib/lib/Syntax/Highlight/Engine/Kate/SQL.pm

Criterion	Covered	Total	%
statement	24	93	25.8
branch	0	54	0.0
condition	1	3	33.3
subroutine	4	12	33.3
pod	0	9	0.0
total	29	171	16.9

# Copyright (c) 2005 - 2006 Hans Jeuken. All rights reserved.
# This program is free software; you can redistribute it and/or
# modify it under the same terms as Perl itself.

# This file was generated from the 'sql.xml' file of the syntax highlight
# engine of the kate text editor (http://www.kate-editor.org

#kate xml version 1.11
#kate version 2.4
#kate author Yury Lebedev ([e-mail])
#generated: Sun Feb  3 22:02:06 2008, localtime

package Syntax::Highlight::Engine::Kate::SQL;

our $VERSION = '0.07';

use strict;
use warnings;
use base('Syntax::Highlight::Engine::Kate::Template');

sub new {
   my $proto = shift;
   my $class = ref($proto) || $proto;
   my $self = $class->SUPER::new(@_);
   $self->attributes({
      'Comment' => 'Comment',
      'Data Type' => 'DataType',
      'Decimal' => 'DecVal',
      'External Variable' => 'Char',
      'Float' => 'Float',
      'Function' => 'Function',
      'Identifier' => 'Others',
      'Keyword' => 'Keyword',
      'Normal Text' => 'Normal',
      'Operator' => 'Normal',
      'Preprocessor' => 'Others',
      'String' => 'String',
      'String Char' => 'Char',
      'Symbol' => 'Char',
   });
   $self->listAdd('functions',
      'ABS',
      'ACOS',
      'ADD_MONTHS',
      'ASCII',
      'ASCIISTR',
      'ASIN',
      'ATAN',
      'ATAN2',
      'AVG',
      'BFILENAME',
      'BIN_TO_NUM',
      'BITAND',
      'CARDINALITY',
      'CAST',
      'CEIL',
      'CHARTOROWID',
      'CHR',
      'COALESCE',
      'COLLECT',
      'COMPOSE',
      'CONCAT',
      'CONVERT',
      'CORR',
      'CORR_K',
      'CORR_S',
      'COS',
      'COSH',
      'COUNT',
      'COVAR_POP',
      'COVAR_SAMP',
      'CUME_DIST',
      'CURRENT_DATE',
      'CURRENT_TIMESTAMP',
      'CV',
      'DBTIMEZONE',
      'DECODE',
      'DECOMPOSE',
      'DENSE_RANK',
      'DEPTH',
      'DEREF',
      'DUMP',
      'EMPTY_BLOB',
      'EMPTY_CLOB',
      'EXISTSNODE',
      'EXP',
      'EXTRACT',
      'EXTRACTVALUE',
      'FIRST',
      'FIRST_VALUE',
      'FLOOR',
      'FROM_TZ',
      'GREATEST',
      'GROUPING',
      'GROUPING_ID',
      'GROUP_ID',
      'HEXTORAW',
      'INITCAP',
      'INSTR',
      'INSTRB',
      'LAG',
      'LAST',
      'LAST_DAY',
      'LAST_VALUE',
      'LEAD',
      'LEAST',
      'LENGTH',
      'LENGTHB',
      'LN',
      'LNNVL',
      'LOCALTIMESTAMP',
      'LOG',
      'LOWER',
      'LPAD',
      'LTRIM',
      'MAKE_REF',
      'MAX',
      'MEDIAN',
      'MIN',
      'MOD',
      'MONTHS_BETWEEN',
      'NANVL',
      'NCHR',
      'NEW_TIME',
      'NEXT_DAY',
      'NLSSORT',
      'NLS_CHARSET_DECL_LEN',
      'NLS_CHARSET_ID',
      'NLS_CHARSET_NAME',
      'NLS_INITCAP',
      'NLS_LOWER',
      'NLS_UPPER',
      'NTILE',
      'NULLIF',
      'NUMTODSINTERVAL',
      'NUMTOYMINTERVAL',
      'NVL',
      'NVL2',
      'ORA_HASH',
      'ORA_ROWSCN',
      'PERCENTILE_CONT',
      'PERCENTILE_DISC',
      'PERCENT_RANK',
      'POWER',
      'POWERMULTISET',
      'POWERMULTISET_BY_CARDINALITY',
      'PRESENTNNV',
      'PRESENTV',
      'RANK',
      'RATIO_TO_REPORT',
      'RAWTOHEX',
      'RAWTONHEX',
      'REF',
      'REFTOHEX',
      'REGEXP_INSTR',
      'REGEXP_LIKE',
      'REGEXP_REPLACE',
      'REGEXP_SUBSTR',
      'REGR_AVGX',
      'REGR_AVGY',
      'REGR_COUNT',
      'REGR_INTERCEPT',
      'REGR_R2',
      'REGR_SLOPE',
      'REGR_SXX',
      'REGR_SXY',
      'REGR_SYY',
      'REMAINDER',
      'ROUND',
      'ROWIDTOCHAR',
      'ROWIDTONCHAR',
      'ROW_NUMBER',
      'RPAD',
      'RTRIM',
      'SCN_TO_TIMESTAMP',
      'SESSIONTIMEZONE',
      'SIGN',
      'SIN',
      'SINH',
      'SOUNDEX',
      'SQRT',
      'STATS_BINOMIAL_TEST',
      'STATS_CROSSTAB',
      'STATS_F_TEST',
      'STATS_KS_TEST',
      'STATS_MODE',
      'STATS_MW_TEST',
      'STATS_ONE_WAY_ANOVA',
      'STATS_T_TEST_INDEP',
      'STATS_T_TEST_INDEPU',
      'STATS_T_TEST_ONE',
      'STATS_T_TEST_PAIRED',
      'STATS_WSR_TEST',
      'STDDEV',
      'STDDEV_POP',
      'STDDEV_SAMP',
      'SUBSTR',
      'SUBSTRB',
      'SUM',
      'SYSDATE',
      'SYSTIMESTAMP',
      'SYS_CONNECT_BY_PATH',
      'SYS_CONTEXT',
      'SYS_DBURIGEN',
      'SYS_EXTRACT_UTC',
      'SYS_GUID',
      'SYS_TYPEID',
      'SYS_XMLAGG',
      'SYS_XMLGEN',
      'TAN',
      'TANH',
      'TIMESTAMP_TO_SCN',
      'TO_BINARY_DOUBLE',
      'TO_BINARY_FLOAT',
      'TO_CHAR',
      'TO_CLOB',
      'TO_DATE',
      'TO_DSINTERVAL',
      'TO_LOB',
      'TO_MULTI_BYTE',
      'TO_NCHAR',
      'TO_NCLOB',
      'TO_NUMBER',
      'TO_SINGLE_BYTE',
      'TO_TIMESTAMP',
      'TO_TIMESTAMP_TZ',
      'TO_YMINTERVAL',
      'TRANSLATE',
      'TREAT',
      'TRIM',
      'TRUNC',
      'TZ_OFFSET',
      'UID',
      'UNISTR',
      'UPDATEXML',
      'UPPER',
      'USER',
      'USERENV',
      'VALUE',
      'VARIANCE',
      'VAR_POP',
      'VAR_SAMP',
      'VSIZE',
      'WIDTH_BUCKET',
      'XMLAGG',
      'XMLCOLATTVAL',
      'XMLCONCAT',
      'XMLELEMENT',
      'XMLFOREST',
      'XMLSEQUENCE',
      'XMLTRANSFORM',
   );
   $self->listAdd('keywords',
      'ACCESS',
      'ACCOUNT',
      'ADD',
      'ADMIN',
      'ADMINISTER',
      'ADVISE',
      'AFTER',
      'AGENT',
      'ALL',
      'ALLOCATE',
      'ALL_ROWS',
      'ALTER',
      'ANALYZE',
      'ANCILLARY',
      'AND',
      'ANY',
      'ARCHIVE',
      'ARCHIVELOG',
      'AS',
      'ASC',
      'ASSERTION',
      'ASSOCIATE',
      'AT',
      'ATTRIBUTE',
      'ATTRIBUTES',
      'AUDIT',
      'AUTHENTICATED',
      'AUTHID',
      'AUTHORIZATION',
      'AUTOALLOCATE',
      'AUTOEXTEND',
      'AUTOMATIC',
      'BACKUP',
      'BECOME',
      'BEFORE',
      'BEGIN',
      'BEHALF',
      'BETWEEN',
      'BINDING',
      'BITMAP',
      'BLOCK',
      'BLOCK_RANGE',
      'BODY',
      'BOTH',
      'BOUND',
      'BREAK',
      'BROADCAST',
      'BTITLE',
      'BUFFER_POOL',
      'BUILD',
      'BULK',
      'BY',
      'CACHE',
      'CACHE_INSTANCES',
      'CALL',
      'CANCEL',
      'CASCADE',
      'CASE',
      'CATEGORY',
      'CHAINED',
      'CHANGE',
      'CHECK',
      'CHECKPOINT',
      'CHILD',
      'CHOOSE',
      'CHUNK',
      'CLASS',
      'CLEAR',
      'CLONE',
      'CLOSE',
      'CLOSE_CACHED_OPEN_CURSORS',
      'CLUSTER',
      'COALESCE',
      'COLUMN',
      'COLUMNS',
      'COLUMN_VALUE',
      'COMMENT',
      'COMMIT',
      'COMMITTED',
      'COMPATIBILITY',
      'COMPILE',
      'COMPLETE',
      'COMPOSITE_LIMIT',
      'COMPRESS',
      'COMPUTE',
      'CONNECT',
      'CONNECT_TIME',
      'CONSIDER',
      'CONSISTENT',
      'CONSTANT',
      'CONSTRAINT',
      'CONSTRAINTS',
      'CONTAINER',
      'CONTENTS',
      'CONTEXT',
      'CONTINUE',
      'CONTROLFILE',
      'COPY',
      'COST',
      'CPU_PER_CALL',
      'CPU_PER_SESSION',
      'CREATE',
      'CREATE_STORED_OUTLINES',
      'CROSS',
      'CUBE',
      'CURRENT',
      'CURSOR',
      'CYCLE',
      'DANGLING',
      'DATA',
      'DATABASE',
      'DATAFILE',
      'DATAFILES',
      'DBA',
      'DDL',
      'DEALLOCATE',
      'DEBUG',
      'DECLARE',
      'DEFAULT',
      'DEFERRABLE',
      'DEFERRED',
      'DEFINER',
      'DEGREE',
      'DELETE',
      'DEMAND',
      'DESC',
      'DETERMINES',
      'DICTIONARY',
      'DIMENSION',
      'DIRECTORY',
      'DISABLE',
      'DISASSOCIATE',
      'DISCONNECT',
      'DISKGROUP',
      'DISMOUNT',
      'DISTINCT',
      'DISTRIBUTED',
      'DOMAIN',
      'DROP',
      'DYNAMIC',
      'EACH',
      'ELSE',
      'EMPTY',
      'ENABLE',
      'END',
      'ENFORCE',
      'ENTRY',
      'ESCAPE',
      'ESTIMATE',
      'EVENTS',
      'EXCEPT',
      'EXCEPTION',
      'EXCEPTIONS',
      'EXCHANGE',
      'EXCLUDING',
      'EXCLUSIVE',
      'EXEC',
      'EXECUTE',
      'EXISTS',
      'EXPIRE',
      'EXPLAIN',
      'EXPLOSION',
      'EXTENDS',
      'EXTENT',
      'EXTENTS',
      'EXTERNALLY',
      'FAILED_LOGIN_ATTEMPTS',
      'FALSE',
      'FAST',
      'FILE',
      'FILTER',
      'FIRST_ROWS',
      'FLAGGER',
      'FLASHBACK',
      'FLUSH',
      'FOLLOWING',
      'FOR',
      'FORCE',
      'FOREIGN',
      'FREELIST',
      'FREELISTS',
      'FRESH',
      'FROM',
      'FULL',
      'FUNCTION',
      'FUNCTIONS',
      'GENERATED',
      'GLOBAL',
      'GLOBALLY',
      'GLOBAL_NAME',
      'GRANT',
      'GROUP',
      'GROUPS',
      'HASH',
      'HASHKEYS',
      'HAVING',
      'HEADER',
      'HEAP',
      'HIERARCHY',
      'HOUR',
      'ID',
      'IDENTIFIED',
      'IDENTIFIER',
      'IDGENERATORS',
      'IDLE_TIME',
      'IF',
      'IMMEDIATE',
      'IN',
      'INCLUDING',
      'INCREMENT',
      'INCREMENTAL',
      'INDEX',
      'INDEXED',
      'INDEXES',
      'INDEXTYPE',
      'INDEXTYPES',
      'INDICATOR',
      'INITIAL',
      'INITIALIZED',
      'INITIALLY',
      'INITRANS',
      'INNER',
      'INSERT',
      'INSTANCE',
      'INSTANCES',
      'INSTEAD',
      'INTERMEDIATE',
      'INTERSECT',
      'INTO',
      'INVALIDATE',
      'IS',
      'ISOLATION',
      'ISOLATION_LEVEL',
      'JAVA',
      'JOIN',
      'KEEP',
      'KEY',
      'KILL',
      'LABEL',
      'LAYER',
      'LEADING',
      'LEFT',
      'LESS',
      'LEVEL',
      'LIBRARY',
      'LIKE',
      'LIMIT',
      'LINK',
      'LIST',
      'LOCAL',
      'LOCATOR',
      'LOCK',
      'LOCKED',
      'LOGFILE',
      'LOGGING',
      'LOGICAL_READS_PER_CALL',
      'LOGICAL_READS_PER_SESSION',
      'LOGOFF',
      'LOGON',
      'MANAGE',
      'MANAGED',
      'MANAGEMENT',
      'MASTER',
      'MATERIALIZED',
      'MAXARCHLOGS',
      'MAXDATAFILES',
      'MAXEXTENTS',
      'MAXINSTANCES',
      'MAXLOGFILES',
      'MAXLOGHISTORY',
      'MAXLOGMEMBERS',
      'MAXSIZE',
      'MAXTRANS',
      'MAXVALUE',
      'MEMBER',
      'MERGE',
      'METHOD',
      'MINEXTENTS',
      'MINIMIZE',
      'MINIMUM',
      'MINUS',
      'MINUTE',
      'MINVALUE',
      'MODE',
      'MODIFY',
      'MONITORING',
      'MOUNT',
      'MOVE',
      'MOVEMENT',
      'MTS_DISPATCHERS',
      'MULTISET',
      'NAMED',
      'NATURAL',
      'NEEDED',
      'NESTED',
      'NESTED_TABLE_ID',
      'NETWORK',
      'NEVER',
      'NEW',
      'NEXT',
      'NLS_CALENDAR',
      'NLS_CHARACTERSET',
      'NLS_COMP',
      'NLS_CURRENCY',
      'NLS_DATE_FORMAT',
      'NLS_DATE_LANGUAGE',
      'NLS_ISO_CURRENCY',
      'NLS_LANG',
      'NLS_LANGUAGE',
      'NLS_NUMERIC_CHARACTERS',
      'NLS_SORT',
      'NLS_SPECIAL_CHARS',
      'NLS_TERRITORY',
      'NO',
      'NOARCHIVELOG',
      'NOAUDIT',
      'NOCACHE',
      'NOCOMPRESS',
      'NOCYCLE',
      'NOFORCE',
      'NOLOGGING',
      'NOMAXVALUE',
      'NOMINIMIZE',
      'NOMINVALUE',
      'NOMONITORING',
      'NONE',
      'NOORDER',
      'NOOVERRIDE',
      'NOPARALLEL',
      'NORELY',
      'NORESETLOGS',
      'NOREVERSE',
      'NORMAL',
      'NOSEGMENT',
      'NOSORT',
      'NOT',
      'NOTHING',
      'NOVALIDATE',
      'NOWAIT',
      'NULL',
      'NULLS',
      'OBJNO',
      'OBJNO_REUSE',
      'OF',
      'OFF',
      'OFFLINE',
      'OID',
      'OIDINDEX',
      'OLD',
      'ON',
      'ONLINE',
      'ONLY',
      'OPCODE',
      'OPEN',
      'OPERATOR',
      'OPTIMAL',
      'OPTIMIZER_GOAL',
      'OPTION',
      'OR',
      'ORDER',
      'ORGANIZATION',
      'OUT',
      'OUTER',
      'OUTLINE',
      'OVER',
      'OVERFLOW',
      'OVERLAPS',
      'OWN',
      'PACKAGE',
      'PACKAGES',
      'PARALLEL',
      'PARAMETERS',
      'PARENT',
      'PARTITION',
      'PARTITIONS',
      'PARTITION_HASH',
      'PARTITION_RANGE',
      'PASSWORD',
      'PASSWORD_GRACE_TIME',
      'PASSWORD_LIFE_TIME',
      'PASSWORD_LOCK_TIME',
      'PASSWORD_REUSE_MAX',
      'PASSWORD_REUSE_TIME',
      'PASSWORD_VERIFY_FUNCTION',
      'PCTFREE',
      'PCTINCREASE',
      'PCTTHRESHOLD',
      'PCTUSED',
      'PCTVERSION',
      'PERCENT',
      'PERMANENT',
      'PLAN',
      'PLSQL_DEBUG',
      'POST_TRANSACTION',
      'PREBUILT',
      'PRECEDING',
      'PREPARE',
      'PRESENT',
      'PRESERVE',
      'PREVIOUS',
      'PRIMARY',
      'PRIOR',
      'PRIVATE',
      'PRIVATE_SGA',
      'PRIVILEGE',
      'PRIVILEGES',
      'PROCEDURE',
      'PROFILE',
      'PUBLIC',
      'PURGE',
      'QUERY',
      'QUEUE',
      'QUOTA',
      'RANDOM',
      'RANGE',
      'RBA',
      'READ',
      'READS',
      'REBUILD',
      'RECORDS_PER_BLOCK',
      'RECOVER',
      'RECOVERABLE',
      'RECOVERY',
      'RECYCLE',
      'REDUCED',
      'REFERENCES',
      'REFERENCING',
      'REFRESH',
      'RELY',
      'RENAME',
      'REPLACE',
      'RESET',
      'RESETLOGS',
      'RESIZE',
      'RESOLVE',
      'RESOLVER',
      'RESOURCE',
      'RESTRICT',
      'RESTRICTED',
      'RESUME',
      'RETURN',
      'RETURNING',
      'REUSE',
      'REVERSE',
      'REVOKE',
      'REWRITE',
      'RIGHT',
      'ROLE',
      'ROLES',
      'ROLLBACK',
      'ROLLUP',
      'ROW',
      'ROWNUM',
      'ROWS',
      'RULE',
      'SAMPLE',
      'SAVEPOINT',
      'SCAN',
      'SCAN_INSTANCES',
      'SCHEMA',
      'SCN',
      'SCOPE',
      'SD_ALL',
      'SD_INHIBIT',
      'SD_SHOW',
      'SEGMENT',
      'SEG_BLOCK',
      'SEG_FILE',
      'SELECT',
      'SELECTIVITY',
      'SEQUENCE',
      'SERIALIZABLE',
      'SERVERERROR',
      'SESSION',
      'SESSIONS_PER_USER',
      'SESSION_CACHED_CURSORS',
      'SET',
      'SHARE',
      'SHARED',
      'SHARED_POOL',
      'SHRINK',
      'SHUTDOWN',
      'SINGLETASK',
      'SIZE',
      'SKIP',
      'SKIP_UNUSABLE_INDEXES',
      'SNAPSHOT',
      'SOME',
      'SORT',
      'SOURCE',
      'SPECIFICATION',
      'SPLIT',
      'SQL_TRACE',
      'STANDBY',
      'START',
      'STARTUP',
      'STATEMENT_ID',
      'STATIC',
      'STATISTICS',
      'STOP',
      'STORAGE',
      'STORE',
      'STRUCTURE',
      'SUBMULTISET',
      'SUBPARTITION',
      'SUBPARTITIONS',
      'SUCCESSFUL',
      'SUMMARY',
      'SUPPLEMENTAL',
      'SUSPEND',
      'SWITCH',
      'SYNONYM',
      'SYSDBA',
      'SYSOPER',
      'SYSTEM',
      'SYS_OP_BITVEC',
      'SYS_OP_ENFORCE_NOT_NULL$',
      'SYS_OP_NOEXPAND',
      'SYS_OP_NTCIMG$',
      'TABLE',
      'TABLES',
      'TABLESPACE',
      'TABLESPACE_NO',
      'TABNO',
      'TEMPFILE',
      'TEMPORARY',
      'THAN',
      'THE',
      'THEN',
      'THREAD',
      'THROUGH',
      'TIMEOUT',
      'TIMEZONE_HOUR',
      'TIMEZONE_MINUTE',
      'TIME_ZONE',
      'TO',
      'TOPLEVEL',
      'TRACE',
      'TRACING',
      'TRAILING',
      'TRANSACTION',
      'TRANSITIONAL',
      'TRIGGER',
      'TRIGGERS',
      'TRUE',
      'TRUNCATE',
      'TYPE',
      'TYPES',
      'UNARCHIVED',
      'UNBOUND',
      'UNBOUNDED',
      'UNDO',
      'UNIFORM',
      'UNION',
      'UNIQUE',
      'UNLIMITED',
      'UNLOCK',
      'UNRECOVERABLE',
      'UNTIL',
      'UNUSABLE',
      'UNUSED',
      'UPDATABLE',
      'UPDATE',
      'UPD_INDEXES',
      'UPPPER',
      'USAGE',
      'USE',
      'USER_DEFINED',
      'USE_STORED_OUTLINES',
      'USING',
      'VALIDATE',
      'VALIDATION',
      'VALUES',
      'VIEW',
      'WHEN',
      'WHENEVER',
      'WHERE',
      'WITH',
      'WITHOUT',
      'WORK',
      'WRITE',
   );
   $self->listAdd('operators',
      '!=',
      '*',
      '**',
      '+',
      '-',
      '..',
      '/',
      ':=',
      '<',
      '<=',
      '<>',
      '=',
      '=>',
      '>',
      '>=',
      '^=',
      '||',
      '~=',
   );
   $self->listAdd('types',
      'ANYDATA',
      'ANYDATASET',
      'ANYTYPE',
      'ARRAY',
      'BFILE',
      'BINARY_DOUBLE',
      'BINARY_FLOAT',
      'BINARY_INTEGER',
      'BLOB',
      'BOOLEAN',
      'CFILE',
      'CHAR',
      'CHARACTER',
      'CLOB',
      'DATE',
      'DAY',
      'DBURITYPE',
      'DEC',
      'DECIMAL',
      'DOUBLE',
      'FLOAT',
      'FLOB',
      'HTTPURITYPE',
      'INT',
      'INTEGER',
      'INTERVAL',
      'LOB',
      'LONG',
      'MLSLABEL',
      'MONTH',
      'NATIONAL',
      'NCHAR',
      'NCLOB',
      'NUMBER',
      'NUMERIC',
      'NVARCHAR',
      'OBJECT',
      'PLS_INTEGER',
      'PRECISION',
      'RAW',
      'REAL',
      'RECORD',
      'ROWID',
      'SECOND',
      'SINGLE',
      'SMALLINT',
      'TIME',
      'TIMESTAMP',
      'URIFACTORYTYPE',
      'URITYPE',
      'UROWID',
      'VARCHAR',
      'VARCHAR2',
      'VARRAY',
      'VARYING',
      'XMLTYPE',
      'YEAR',
      'ZONE',
   );
   $self->contextdata({
      'Multiline C-style comment' => {
         callback => \&parseMultilineCstylecomment,
         attribute => 'Comment',
      },
      'Normal' => {
         callback => \&parseNormal,
         attribute => 'Normal Text',
      },
      'SQL*Plus directive to include file' => {
         callback => \&parseSQLPlusdirectivetoincludefile,
         attribute => 'Preprocessor',
         lineending => '#pop',
      },
      'SQL*Plus remark directive' => {
         callback => \&parseSQLPlusremarkdirective,
         attribute => 'Comment',
         lineending => '#pop',
      },
      'Singleline PL/SQL-style comment' => {
         callback => \&parseSinglelinePLSQLstylecomment,
         attribute => 'Comment',
         lineending => '#pop',
      },
      'String literal' => {
         callback => \&parseStringliteral,
         attribute => 'String',
      },
      'User-defined identifier' => {
         callback => \&parseUserdefinedidentifier,
         attribute => 'Identifier',
         lineending => '#pop',
      },
   });
   $self->deliminators('\\s||\\(|\\)|,|\\%|\\&|;|\\?|\\[|\\]|\\{|\\}|\\\\|\\+|-|\\*|\\/|\\||=|\\!|<|>|\\~|\\^|:|\\.');
   $self->basecontext('Normal');
   $self->keywordscase(0);
   $self->initialize;
   bless ($self, $class);
   return $self;
}

sub language {
   return 'SQL';
}

sub parseMultilineCstylecomment {
   my ($self, $text) = @_;
   # attribute => 'Comment'
   # char => '*'
   # char1 => '/'
   # context => '#pop'
   # type => 'Detect2Chars'
   if ($self->testDetect2Chars($text, '*', '/', 0, 0, 0, undef, 0, '#pop', 'Comment')) {
      return 1
   }
   return 0;
};

sub parseNormal {
   my ($self, $text) = @_;
   # String => 'keywords'
   # attribute => 'Keyword'
   # context => '#stay'
   # type => 'keyword'
   if ($self->testKeyword($text, 'keywords', 0, undef, 0, '#stay', 'Keyword')) {
      return 1
   }
   # String => 'operators'
   # attribute => 'Operator'
   # context => '#stay'
   # type => 'keyword'
   if ($self->testKeyword($text, 'operators', 0, undef, 0, '#stay', 'Operator')) {
      return 1
   }
   # String => 'functions'
   # attribute => 'Function'
   # context => '#stay'
   # type => 'keyword'
   if ($self->testKeyword($text, 'functions', 0, undef, 0, '#stay', 'Function')) {
      return 1
   }
   # String => 'types'
   # attribute => 'Data Type'
   # context => '#stay'
   # type => 'keyword'
   if ($self->testKeyword($text, 'types', 0, undef, 0, '#stay', 'Data Type')) {
      return 1
   }
   # String => '%bulk_exceptions\b'
   # attribute => 'Data Type'
   # context => '#stay'
   # insensitive => 'true'
   # type => 'RegExpr'
   if ($self->testRegExpr($text, '%bulk_exceptions\\b', 1, 0, 0, undef, 0, '#stay', 'Data Type')) {
      return 1
   }
   # String => '%bulk_rowcount\b'
   # attribute => 'Data Type'
   # context => '#stay'
   # insensitive => 'true'
   # type => 'RegExpr'
   if ($self->testRegExpr($text, '%bulk_rowcount\\b', 1, 0, 0, undef, 0, '#stay', 'Data Type')) {
      return 1
   }
   # String => '%found\b'
   # attribute => 'Data Type'
   # context => '#stay'
   # insensitive => 'true'
   # type => 'RegExpr'
   if ($self->testRegExpr($text, '%found\\b', 1, 0, 0, undef, 0, '#stay', 'Data Type')) {
      return 1
   }
   # String => '%isopen\b'
   # attribute => 'Data Type'
   # context => '#stay'
   # insensitive => 'true'
   # type => 'RegExpr'
   if ($self->testRegExpr($text, '%isopen\\b', 1, 0, 0, undef, 0, '#stay', 'Data Type')) {
      return 1
   }
   # String => '%notfound\b'
   # attribute => 'Data Type'
   # context => '#stay'
   # insensitive => 'true'
   # type => 'RegExpr'
   if ($self->testRegExpr($text, '%notfound\\b', 1, 0, 0, undef, 0, '#stay', 'Data Type')) {
      return 1
   }
   # String => '%rowcount\b'
   # attribute => 'Data Type'
   # context => '#stay'
   # insensitive => 'true'
   # type => 'RegExpr'
   if ($self->testRegExpr($text, '%rowcount\\b', 1, 0, 0, undef, 0, '#stay', 'Data Type')) {
      return 1
   }
   # String => '%rowtype\b'
   # attribute => 'Data Type'
   # context => '#stay'
   # insensitive => 'true'
   # type => 'RegExpr'
   if ($self->testRegExpr($text, '%rowtype\\b', 1, 0, 0, undef, 0, '#stay', 'Data Type')) {
      return 1
   }
   # String => '%type\b'
   # attribute => 'Data Type'
   # context => '#stay'
   # insensitive => 'true'
   # type => 'RegExpr'
   if ($self->testRegExpr($text, '%type\\b', 1, 0, 0, undef, 0, '#stay', 'Data Type')) {
      return 1
   }
   # attribute => 'Float'
   # context => '#stay'
   # type => 'Float'
   if ($self->testFloat($text, 0, undef, 0, '#stay', 'Float')) {
      return 1
   }
   # attribute => 'Decimal'
   # context => '#stay'
   # type => 'Int'
   if ($self->testInt($text, 0, undef, 0, '#stay', 'Decimal')) {
      return 1
   }
   # attribute => 'String'
   # char => '''
   # context => 'String literal'
   # type => 'DetectChar'
   if ($self->testDetectChar($text, '\'', 0, 0, 0, undef, 0, 'String literal', 'String')) {
      return 1
   }
   # attribute => 'Comment'
   # char => '-'
   # char1 => '-'
   # context => 'Singleline PL/SQL-style comment'
   # type => 'Detect2Chars'
   if ($self->testDetect2Chars($text, '-', '-', 0, 0, 0, undef, 0, 'Singleline PL/SQL-style comment', 'Comment')) {
      return 1
   }
   # attribute => 'Comment'
   # char => '/'
   # char1 => '*'
   # context => 'Multiline C-style comment'
   # type => 'Detect2Chars'
   if ($self->testDetect2Chars($text, '/', '*', 0, 0, 0, undef, 0, 'Multiline C-style comment', 'Comment')) {
      return 1
   }
   # String => '^rem\b'
   # attribute => 'Comment'
   # column => '0'
   # context => 'SQL*Plus remark directive'
   # insensitive => 'true'
   # type => 'RegExpr'
   if ($self->testRegExpr($text, '^rem\\b', 1, 0, 0, 0, 0, 'SQL*Plus remark directive', 'Comment')) {
      return 1
   }
   # attribute => 'Identifier'
   # char => '"'
   # context => 'User-defined identifier'
   # type => 'DetectChar'
   if ($self->testDetectChar($text, '"', 0, 0, 0, undef, 0, 'User-defined identifier', 'Identifier')) {
      return 1
   }
   # String => '(:|&&?)\w+'
   # attribute => 'External Variable'
   # context => '#stay'
   # type => 'RegExpr'
   if ($self->testRegExpr($text, '(:|&&?)\\w+', 0, 0, 0, undef, 0, '#stay', 'External Variable')) {
      return 1
   }
   # String => '^/$'
   # attribute => 'Symbol'
   # column => '0'
   # context => '#stay'
   # type => 'RegExpr'
   if ($self->testRegExpr($text, '^/$', 0, 0, 0, 0, 0, '#stay', 'Symbol')) {
      return 1
   }
   # String => '^@@?[^@ \t\r\n]'
   # attribute => 'Preprocessor'
   # column => '0'
   # context => 'SQL*Plus directive to include file'
   # type => 'RegExpr'
   if ($self->testRegExpr($text, '^@@?[^@ \\t\\r\\n]', 0, 0, 0, 0, 0, 'SQL*Plus directive to include file', 'Preprocessor')) {
      return 1
   }
   return 0;
};

sub parseSQLPlusdirectivetoincludefile {
   my ($self, $text) = @_;
   return 0;
};

sub parseSQLPlusremarkdirective {
   my ($self, $text) = @_;
   return 0;
};

sub parseSinglelinePLSQLstylecomment {
   my ($self, $text) = @_;
   return 0;
};

sub parseStringliteral {
   my ($self, $text) = @_;
   # attribute => 'String Char'
   # context => '#stay'
   # type => 'HlCStringChar'
   if ($self->testHlCStringChar($text, 0, undef, 0, '#stay', 'String Char')) {
      return 1
   }
   # String => '&&?\w+'
   # attribute => 'External Variable'
   # context => '#stay'
   # type => 'RegExpr'
   if ($self->testRegExpr($text, '&&?\\w+', 0, 0, 0, undef, 0, '#stay', 'External Variable')) {
      return 1
   }
   # attribute => 'String'
   # char => '''
   # context => '#pop'
   # type => 'DetectChar'
   if ($self->testDetectChar($text, '\'', 0, 0, 0, undef, 0, '#pop', 'String')) {
      return 1
   }
   return 0;
};

sub parseUserdefinedidentifier {
   my ($self, $text) = @_;
   # attribute => 'Identifier'
   # char => '"'
   # context => '#pop'
   # type => 'DetectChar'
   if ($self->testDetectChar($text, '"', 0, 0, 0, undef, 0, '#pop', 'Identifier')) {
      return 1
   }
   return 0;
};


1;

__END__