###############################################################################
# Name: caml.py #
# Purpose: Define Caml syntax for highlighting and other features #
# Author: Cody Precord <cprecord@editra.org> #
# Copyright: (c) 2008 Cody Precord <staff@editra.org> #
# License: wxWindows License #
###############################################################################
"""
FILE: caml.py
AUTHOR: Cody Precord
@summary: Lexer configuration module for Caml
"""
__author__ = "Cody Precord <cprecord@editra.org>"
__svnid__ = "$Id: _caml.py 63834 2010-04-03 06:04:33Z CJP $"
__revision__ = "$Revision: 63834 $"
#-----------------------------------------------------------------------------#
# Imports
import wx.stc as stc
# Local Imports
import synglob
import syndata
#-----------------------------------------------------------------------------#
#---- Keyword Definitions ----#
# Objective Caml 3 textual keywords
CAML_KW1 = (0, "and as assert asr begin class constraint do done downto else "
"end exception external false for fun function functor if in "
"include inherit initializer land lazy let lor lsl lsr lxor "
"match method mod module mutable new object of open or private "
"rec sig struct then to true try type val virtual when while "
"with")
# Caml optional keywords
CAML_KW2 = (1, "option Some None ignore ref lnot succ pred parser")
# Caml type/library keywords
CAML_KW3 = (2, "array bool char float int list string unit")
#---- End Keyword Definitions ----#
#---- Syntax Style Specs ----#
SYNTAX_ITEMS = [(stc.STC_CAML_CHAR, 'char_style'),
(stc.STC_CAML_COMMENT, 'comment_style'),
(stc.STC_CAML_COMMENT1, 'comment_style'),
(stc.STC_CAML_COMMENT2, 'comment_style'),
(stc.STC_CAML_COMMENT3, 'comment_style'),
(stc.STC_CAML_DEFAULT, 'default_style'),
(stc.STC_CAML_IDENTIFIER, 'default_style'),
(stc.STC_CAML_KEYWORD, 'keyword_style'),
(stc.STC_CAML_KEYWORD2, 'pre_style'),
(stc.STC_CAML_KEYWORD3, 'keyword2_style'),
(stc.STC_CAML_LINENUM, 'number_style'),
(stc.STC_CAML_NUMBER, 'number_style'),
(stc.STC_CAML_OPERATOR, 'operator_style'),
(stc.STC_CAML_STRING, 'string_style'),
(stc.STC_CAML_TAGNAME, 'directive_style')] #STYLE ME
#---- Extra Properties ----#
FOLD = ('fold', '1')
#-----------------------------------------------------------------------------#
class SyntaxData(syndata.SyntaxDataBase):
"""SyntaxData object for Caml"""
def __init__(self, langid):
syndata.SyntaxDataBase.__init__(self, langid)
# Setup
self.SetLexer(stc.STC_LEX_CAML)
def GetKeywords(self):
"""Returns Specified Keywords List """
return [CAML_KW1, CAML_KW2, CAML_KW3]
def GetSyntaxSpec(self):
"""Syntax Specifications """
return SYNTAX_ITEMS
def GetProperties(self):
"""Returns a list of Extra Properties to set """
return [FOLD]
def GetCommentPattern(self):
"""Returns a list of characters used to comment a block of code """
return [u'(*', u'*)']
|