Re: [GeSHi-devel] New Geshi language file for Clojure

SourceForge Headquarters 225 Broadway Suite 1600 San Diego, CA 92101 +1 (858) 454-5900

Hi,

thank you for this submission.

Your language file is placed right here, but before inclusion there are
some things you should recheck and improve:

1. Please run the Language File Check script that comes with every GeSHi
release. This will tell you some common mistakes when writing language
files. I usually don't accept a language file that doesn't pass that script.
2. Although GeSHi isoptimized to handle large arrays of keywords rather
than small ones you should group keywords though as to allow for more
flexibility in highlighting. Usually this grouping is done in a matter
of "control structures, built-in functions, reserved, data types, ...)
3. Please attach your language file or an archive containing it instead
of inlining. If you have a look at the language check script you'll
probably notice why ;-)

Regards,
BenBE.

Am 17.11.2009 14:22, schrieb Seth Schroeder:
> Hello all,
>
> Below please find a new language file for the <a
> href="http://clojure.org">Clojure</a> language. Clojure is a Lisp that
> runs on the JVM, and so the Scheme language file for Geshi was used as
> the source. The keywords in the file below are relatively in sync with
> the current release of Clojure.
>
> Contact information for the author of the Scheme file has been
> maintained. If this is not the right way to submit a new language file
> please let me know.
>
> Thank you,
>
> Seth Schroeder
>
> ==============================
>
> <?php
> /*************************************************************************************
>  * clojure.php
>  * ----------
>  * Author: Seth Schroeder (go...@fo...
> <mailto:go...@fo...>)
>  * Copyright: (c) 2009 Seth Schroeder (go...@fo...
> <mailto:go...@fo...>)
>  * Release Version: 1.0.0.0
>  * Date Started: 2009/11/17
>  *
>  * Based on the Scheme language file for GeSHi by Jon Raphaelson
> (jon...@gm... <mailto:jon...@gm...>)
>  *
>  * CHANGES
>  * -------
>  * 2009/11/17 (1.0.0.0)
>  *  -  First Release
>  *
>  * TODO (updated 2009/11/17)
>  * -------------------------
>  * 
>  *************************************************************************************
>  *
>  *     This file is part of GeSHi.
>  *
>  *   GeSHi is free software; you can redistribute it and/or modify
>  *   it under the terms of the GNU General Public License as published by
>  *   the Free Software Foundation; either version 2 of the License, or
>  *   (at your option) any later version.
>  *
>  *   GeSHi is distributed in the hope that it will be useful,
>  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
>  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
>  *   GNU General Public License for more details.
>  *
>  *   You should have received a copy of the GNU General Public License
>  *   along with GeSHi; if not, write to the Free Software
>  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
>  02111-1307  USA
>  *
>  ************************************************************************************/
>
> $language_data = array (
>     'LANG_NAME' => 'Clojure',
>     'COMMENT_SINGLE' => array(1 => ';'),
>     'COMMENT_MULTI' => array('#|' => '|#'),
>     'CASE_KEYWORDS' => GESHI_CAPS_NO_CHANGE,
>     'QUOTEMARKS' => array('"'),
>     'ESCAPE_CHAR' => '\\',
>     'KEYWORDS' => array(
>         1 => array(
>            'accessor', 'aclone', 'add-classpath', 'aget', 'alength',
> 'alias', 'all-ns', 'amap', 'and', 'append-child', 'apply', 'areduce',
> 'array-map', 'aset', 'assert', 'assoc', 'assoc', 'associative?',
>
>            'bean', 'bigdec', 'bigint', 'bit-and', 'bit-and-not',
> 'bit-clear', 'bit-flip', 'bit-not', 'bit-or', 'bit-set',
> 'bit-shift-left', 'bit-shift-right', 'bit-test', 'bit-xor', 'boolean',
> 'branch?', 'butlast', 'byte',
>
>            'catch', 'char', 'char-escape-string', 'char-name-string',
> 'children', 'comp', 'comparator', 'compile', 'complement', 'concat',
> 'cond', 'condp', 'conj', 'cons', 'constantly', 'construct-proxy',
> 'contains?', 'count', 'count', 'counted?', 'create-ns', 'create-ns',
> 'create-struct', 'cycle',
>
>            'dec', 'def', 'definline', 'defmacro', 'defn', 'defn-',
> 'defstruct', 'difference', 'disj', 'dissoc', 'distinct', 'do',
> 'doall', 'doc', 'dorun', 'doseq', 'dotimes', 'double', 'down', 'drop',
> 'drop-last', 'drop-while',
>
>            'edit', 'empty?', 'end?', 'enumeration-seq', 'eval',
> 'even?', 'every?',
>
>            'false?', 'ffirst', 'file-seq', 'filter', 'filter',
> 'finally', 'find', 'find-doc', 'find-ns', 'first', 'float', 'fn',
> 'for', 'force', 'frest',
>
>            'gensym', 'get', 'get-proxy-class',
>
>            'hash', 'hash-map', 'hash-set',
>
>            'identical?', 'identity', 'if', 'if-let', 'if-not',
> 'import', 'in-ns', 'inc', 'index', 'insert-child', 'insert-left',
> 'insert-right', 'inspect', 'inspect-table', 'inspect-tree', 'int',
> 'interleave', 'intern', 'interpose', 'intersection', 'into',
> 'into-array', 'iterate', 'iterator-seq',
>
>            'join',
>
>            'key', 'keys', 'keyword?',
>
>            'last', 'lazy-cat', 'lazy-seq', 'left', 'leftmost',
> 'lefts', 'let', 'line-seq', 'list', 'list*', 'list?', 'long', 'loop',
>
>            'macroexpand', 'macroexpand-1', 'make-array', 'make-node',
> 'map', 'map-invert', 'map?', 'mapcat', 'max', 'memfn', 'merge',
> 'merge-with', 'min', 'monitor-enter', 'monitor-exit',
>
>            'name', 'namespace', 'neg?', 'new', 'next,', 'nil?',
> 'node', 'not', 'not-any?', 'not-empty', 'not-every?', 'not=', 'ns',
> 'ns', 'ns-aliases', 'ns-imports', 'ns-interns', 'ns-map', 'ns-name',
> 'ns-publics', 'ns-refers', 'ns-resolve', 'ns-unalias', 'ns-unmap',
> 'nth', 'nthrest', 'num',
>
>            'odd?', 'or',
>
>            'pany', 'par', 'parse', 'partial', 'partition', 'path',
> 'pdistinct', 'peek', 'pfilter-dupes', 'pfilter-nils', 'pmap', 'pmax',
> 'pmin', 'pop', 'pop', 'pos?', 'pr-str', 'preduce', 'prev',
> 'print-str', 'println-str', 'prn-str', 'project', 'proxy',
> 'proxy-mappings', 'proxy-super', 'psort', 'psummary', 'pvec',
>
>            'quot', 'quote',
>
>            'rand', 'rand-int', 'range', 'rationalize', 're-find',
> 're-groups', 're-matcher', 're-matches', 're-seq', 'recur', 'reduce',
> 'refer', 'rem', 'remove', 'remove-ns', 'rename', 'rename-keys',
> 'repeat', 'repeatedly', 'replace', 'replicate', 'resolve', 'rest',
> 'resultset-seq', 'reverse', 'reversible?', 'rfirst', 'right',
> 'rightmost', 'rights', 'root', 'rrest', 'rseq', 'rsubseq',
>
>            'second', 'select', 'select-keys', 'seq', 'seq-zip',
> 'seq?', 'seque', 'sequential?', 'set', 'set!', 'short', 'some',
> 'sort', 'sort-by', 'sorted-map', 'sorted-map-by', 'sorted-set',
> 'sorted?', 'source', 'split-at', 'split-with', 'str', 'string?',
> 'struct', 'struct-map', 'subseq', 'subvec', 'symbol', 'symbol?',
>
>            'take', 'take-nth', 'take-while', 'throw', 'throw-if',
> 'to-array', 'to-array-2d', 'tree-seq', 'true?', 'try',
>
>            'union', 'up', 'update-proxy',
>
>            'val', 'vals', 'var', 'vec', 'vector', 'vector-zip', 'vector?',
>
>            'when', 'when-first', 'when-let', 'when-not', 'while',
> 'with-open', 'with-out-str', 'with-precision',
>
>            'xml-seq', 'xml-zip',
>
>            'zero?', 'zipmap', 'zipper'
>             )
>         ),
>     'Symbols' => array(
>       '(', ')', '{', '}', '[', ']', '!', '%', '^', '&',
> '/','+','-','*','=','<','>',';','|','.','#'
>         ),
>     'CASE_SENSITIVE' => array(
>         GESHI_COMMENTS => false,
>         1 => false
>         ),
>     'STYLES' => array(
>         'KEYWORDS' => array(
>             1 => 'color: #b1b100;'
>             ),
>         'COMMENTS' => array(
>             1 => 'color: #808080; font-style: italic;',
>             'MULTI' => 'color: #808080; font-style: italic;'
>             ),
>         'ESCAPE_CHAR' => array(
>             0 => 'color: #000099; font-weight: bold;'
>             ),
>         'BRACKETS' => array(
>             0 => 'color: #66cc66;'
>             ),
>         'STRINGS' => array(
>             0 => 'color: #ff0000;'
>             ),
>         'NUMBERS' => array(
>             0 => 'color: #cc66cc;'
>             ),
>         'METHODS' => array(
>             0 => 'color: #202020;'
>             ),
>         'SYMBOLS' => array(
>             0 => 'color: #66cc66;'
>             ),
>         'REGEXPS' => array(
>             ),
>         'SCRIPT' => array(
>             )
>         ),
>     'URLS' => array(
>         1 => ''
>         ),
>     'OOLANG' => false,
>     'OBJECT_SPLITTERS' => array(
>         ),
>     'REGEXPS' => array(
>         ),
>     'STRICT_MODE_APPLIES' => GESHI_NEVER,
>     'SCRIPT_DELIMITERS' => array(
>         ),
>     'HIGHLIGHT_STRICT_BLOCK' => array(
>         )
> );
>
> ?>
>
> ------------------------------------------------------------------------
>
> ------------------------------------------------------------------------------
> Let Crystal Reports handle the reporting - Free Crystal Reports 2008 30-Day 
> trial. Simplify your report design, integration and deployment - and focus on 
> what you do best, core application coding. Discover what's new with
> Crystal Reports now.  http://p.sf.net/sfu/bobj-july
> ------------------------------------------------------------------------
>
> _______________________________________________
> geshi-devel mailing list
> ges...@li...
> https://lists.sourceforge.net/lists/listinfo/geshi-devel
>   