# ***** BEGIN LICENSE BLOCK ***** # Version: MPL 1.1/GPL 2.0/LGPL 2.1 # # The contents of this file are subject to the Mozilla Public License # Version 1.1 (the "License"); you may not use this file except in # compliance with the License. You may obtain a copy of the License at # http://www.mozilla.org/MPL/ # # Software distributed under the License is distributed on an "AS IS" # basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See the # License for the specific language governing rights and limitations # under the License. # # The Original Code is Komodo code. # # The Initial Developer of the Original Code is ActiveState Software Inc. # Portions created by ActiveState Software Inc are Copyright (C) 2000-2007 # ActiveState Software Inc. All Rights Reserved. # # Contributor(s): # ActiveState Software Inc # # Alternatively, the contents of this file may be used under the terms of # either the GNU General Public License Version 2 or later (the "GPL"), or # the GNU Lesser General Public License Version 2.1 or later (the "LGPL"), # in which case the provisions of the GPL or the LGPL are applicable instead # of those above. If you wish to allow use of your version of this file only # under the terms of either the GPL or the LGPL, and not to allow others to # use your version of this file under the terms of the MPL, indicate your # decision by deleting the provisions above and replace them with the notice # and other provisions required by the GPL or the LGPL. If you do not delete # the provisions above, a recipient may use your version of this file under # the terms of any one of the MPL, the GPL or the LGPL. # # ***** END LICENSE BLOCK ***** from xpcom import components, ServerException from koLanguageServiceBase import * class koMetapostLanguage(KoLanguageBase): name = "Metapost" _reg_desc_ = "%s Language" % name _reg_contractid_ = "@activestate.com/koLanguage?language=%s;1" \ % (name) _reg_clsid_ = "{0a8c12de-7cd7-4d45-9220-0aaaa93047dc}" _reg_categories_ = [("komodo-language", name)] _stateMap = { 'default': ('SCE_METAPOST_DEFAULT',), 'keywords': ('SCE_METAPOST_COMMAND',), 'commands': ('SCE_METAPOST_COMMAND',), 'comments': ('SCE_METAPOST_EXTRA',), 'special': ('SCE_METAPOST_SPECIAL',), 'symbols': ('SCE_METAPOST_SYMBOL',), } defaultExtension = '.mp' commentDelimiterInfo = {"line": [ "%" ]} sample = """ SAMPLE NOT AVAILABLE """ def get_lexer(self): if self._lexer is None: self._lexer = KoLexerLanguageService() self._lexer.setLexer( components.interfaces.ISciMoz.SCLEX_METAPOST) self._lexer.setKeywords(0, self._keywordsTex + self._keywordsPrimitives + self._keywordsPlain) return self._lexer _keywordsTex="""btex verbatimtex etex""".split() _keywordsPrimitives=""" charcode day linecap linejoin miterlimit month pausing prologues showstopping time tracingcapsules tracingchoices tracingcommands tracingequations tracinglostchars tracingmacros tracingonline tracingoutput tracingrestores tracingspecs tracingstats tracingtitles truecorners warningcheck year false nullpicture pencircle true and angle arclength arctime ASCII bluepart boolean bot char color cosd cycle decimal directiontime floor fontsize greenpart hex infont intersectiontimes known length llcorner lrcorner makepath makepen mexp mlog normaldeviate not numeric oct odd or path pair pen penoffset picture point postcontrol precontrol redpart reverse rotated scaled shifted sind slanted sqrt str string subpath substring transform transformed ulcorner uniformdeviate unknown urcorner xpart xscaled xxpart xypart ypart yscaled yxpart yypart zscaled addto clip input interim let newinternal save setbounds shipout show showdependencies showtoken showvariable special begingroup endgroup of curl tension and controls reflectedabout rotatedaround interpath on off beginfig endfig def vardef enddef epxr suffix text primary secondary tertiary primarydef secondarydef tertiarydef top bottom ulft urt llft lrt randomseed also contour doublepath withcolor withpen dashed if else elseif fi for endfor forever exitif forsuffixes downto upto step until charlist extensible fontdimen headerbyte kern ligtable boundarychar chardp charext charht charic charwd designsize fontmaking charexists cullit currenttransform gfcorners grayfont hround imagerules lowres_fix nodisplays notransforms openit displaying currentwindow screen_rows screen_cols pixels_per_inch cull display openwindow numspecial totalweight autorounding fillin proofing tracingpens xoffset chardx granularity smoothing turningcheck yoffset chardy hppp tracingedges vppp extra_beginfig extra_endfig mpxbreak end""".split() _keywordsPlain=""" ahangle ahlength bboxmargin defaultpen defaultscale labeloffset background currentpen currentpicture cuttings defaultfont extra_beginfig extra_endfig beveled black blue bp butt cc cm dd ditto down epsilon evenly fullcircle green halfcircle identity in infinity left mitered mm origin pensquare pt quartercircle red right rounded squared unitsquare up white withdots abs bbox ceiling center cutafter cutbefore dir directionpoint div dotprod intersectionpoint inverse mod lft round rt unitvector whatever cutdraw draw drawarrow drawdblarrow fill filldraw drawdot loggingall pickup tracingall tracingnone undraw unfill unfilldraw buildcycle dashpattern decr dotlabel dotlabels drawoptions incr label labels max min thelabel z beginchar blacker capsule_end change_width define_blacker_pixels define_corrected_pixels define_good_x_pixels define_good_y_pixels define_horizontal_corrected_pixels define_pixels define_whole_blacker_pixels define_whole_pixels define_whole_vertical_blacker_pixels define_whole_vertical_pixels endchar extra_beginchar extra_endchar extra_setup font_coding_scheme font_extra_space""".split()