Logtalk 2.27.0 files.

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1544 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
pmoura 2006-02-17 01:59:12 +00:00
parent 5cacbd8f2a
commit 9e688978c3
3 changed files with 177 additions and 0 deletions

View File

@ -0,0 +1,45 @@
=================================================================
Logtalk - Object oriented extension to Prolog
Release 2.27.0
Copyright (c) 1998-2006 Paulo Moura. All Rights Reserved.
=================================================================
This directory contains files that provide support for using version 2.0
or later of the source-highlight package by Lorenzo Bettini with Logtalk
source files. A detailed description on the source-highlight package is
available from:
http://www.gnu.org/software/src-highlite/
In order to check if your source-highlight installation already includes
support for Logtalk, use the following command:
% source-highlight --lang-list
If support for Logtalk is not included or if it is outdated, copy the file
"logtalk.lang" to the folder:
$prefix/share/source-highlight
where $prefix is the source-highlight installation directory (by default,
/usr/local) and then edit, if necessary, the file:
$prefix/share/source-highlight/lang.map
and add the entry:
lgt = logtalk.lang
Usage example for a "foo.lgt" Logtalk source file:
% source-highlight --out-format xhtml --input foo.lgt --output foo.html
Usually, Logtalk files are formatted using four-spaces tabs. You may want to
use the "--tab=4"option to keep you source code formatting choices.
You may also use the "logtalk.lang" file with plain Prolog files by using
the "--src-lang" option. For example:
% source-highlight --src-lang lgt --out-format xhtml --input foo.pl --output foo.html

View File

@ -0,0 +1,77 @@
comment start "%"
comment delim "/*" "*/" multiline nested
string delim "\"" "\"" escape "\\"
string delim "'" "'" escape "\\"
keyword = '\<(abolish|c(urrent|reate))_(object|protocol|category)(?=\()',
'\<(object|protocol|category)_property(?=\()',
'\<extends_(object|protocol)(?=\()',
'\<imp(lements_protocol|orts_category)(?=\()',
'\<(instantiates|specializes)_class(?=\()',
'\<(current_event|(abolish|define)_events)(?=\()',
'\<(current|set)_logtalk_flag(?=\()',
'\<logtalk_(compile|l(oad|ibrary_path))(?=\()'
keyword = '\<(after|before)(?=\()',
'\<(parameter|this|se(lf|nder))(?=\()',
'\<(current_predicate|predicate_property)(?=\()',
'\<(expand_term|phrase)(?=\()',
'\<(clause|retract(all)?)(?=\()',
'\<a(bolish|ssert(a|z))(?=\()',
'\<(ca(ll|tch)|throw)(?=\()',
'\<((bag|set)of|f(ind|or)all)(?=\()',
'\<unify_with_occurs_check(?=\()',
'\<(functor|arg|copy_term)(?=\()',
'\<(rem|mod|abs|sign)(?=\()',
'\<(float_(integer|fractional)_part|float)(?=\()',
'\<(floor|truncate|round|ceiling)(?=\()',
'\<(cos|atan|exp|log|s(in|qrt))(?=\()',
'\<(var|atom(ic)?|integer|float|compound|n(onvar|umber))(?=\()',
'\<current_(in|out)put(?=\()',
'\<set_(in|out)put(?=\()',
'\<(open|close)(?=\()',
'\<flush_output(?=\()',
'\<flush_output\>',
'\<(stream_property|at_end_of_stream|set_stream_position)(?=\()',
'\<(get|p(eek|ut))_(byte|c(har|ode))(?=\()',
'\<nl(?=\()', '\<(nl)\>',
'\<(read(_term)?)(?=\()',
'\<(write(q|_(canonical|term))?)(?=\()',
'\<(op|current_op)(?=\()',
'\<((current_)?char_conversion)(?=\()',
'\<atom_(length|c(hars|o(ncat|des)))(?=\()',
'\<(char_code|sub_atom)(?=\()',
'\<number_(c(hars|odes))(?=\()',
'\<(set|current)_prolog_flag(?=\()',
'\<halt(?=\()', '\<(halt)\>',
'\<once(?=\()',
'\<(true|fail|repeat)\>',
'\<(is|rem|mod)\>'
variable = '\<[A-Z_][A-Za-z0-9_]*'
cbracket = "{|}"
preproc = '^[[:blank:]]*:-[[:blank:]](ca(lls|tegory) | p(ublic|r(ot(ocol|ected)|ivate)) | e(ncoding|xports) | in(fo|itialization) | alias | d(ynamic|iscontiguous) | meta_predicate | m(etapredicate|od(e|ule)|ultifile) | o(bject|p) | use(s|_module))(?=\()',
'^[[:blank:]]*:-[[:blank:]](end_(category|object|protocol) | dynamic)\.'
preproc = '\<(extends|i(nstantiates|mp(lements|orts))|specializes)(?=\()'
normal = '\<[a-z][A-Za-z0-9_]*'
number = '0\'[A-Za-z0-9] | 0b[0-1]+ | 0o[0-7]+ | 0x[0-9a-fA-F]+ | [0-9]+(\.[0-9]+)?([eE]([-+])?[0-9]+)?'
symbol = "::", "^^",
">>", "<<", "/\\", "\\/", "\\",
"=:=", "=\\=", "<", "=<", ">", ">=",
"=..",
"\\==", "==", "@=<", "@<", "@>=", "@>",
"=", "\\=",
"+", "-", "**", "*", "//", "/",
"-->",
"!", "->", ";", "\\+",
"?", "@",
":-"

View File

@ -0,0 +1,55 @@
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE plist PUBLIC "-//Apple Computer//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
<plist version="1.0">
<dict>
<key>name</key>
<string>Miscellaneous</string>
<key>scope</key>
<string>source.logtalk</string>
<key>settings</key>
<dict>
<key>highlightPairs</key>
<array>
<array>
<string>(</string>
<string>)</string>
</array>
<array>
<string>{</string>
<string>}</string>
</array>
<array>
<string>[</string>
<string>]</string>
</array>
</array>
<key>increaseIndentPattern</key>
<string>:-$</string>
<key>smartTypingPairs</key>
<array>
<array>
<string>"</string>
<string>"</string>
</array>
<array>
<string>(</string>
<string>)</string>
</array>
<array>
<string>{</string>
<string>}</string>
</array>
<array>
<string>[</string>
<string>]</string>
</array>
<array>
<string>'</string>
<string>'</string>
</array>
</array>
</dict>
<key>uuid</key>
<string>B25054C4-CAA1-4F80-9864-0F5E12B5E741</string>
</dict>
</plist>