Logtalk 2.25.0 files.

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1288 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
pmoura
2005-05-23 23:33:41 +00:00
parent 0b420f5493
commit 72b037275f
291 changed files with 2828 additions and 1675 deletions

View File

@@ -1,16 +1,15 @@
=================================================================
Logtalk - Object oriented extension to Prolog
Release 2.24.0
Release 2.25.0
Copyright (c) 1998-2005 Paulo Moura. All Rights Reserved.
=================================================================
This directory contains files that provide syntax highlighting and
other editing services for writing Logtalk source files (*.lgt) and
source metafiles (*.mlgt) with common text editors. By default, Logtalk
syntax highlighting is also applied to the Prolog configuration files
(*.config).
other editing services for writing Logtalk source files (*.lgt) with
common text editors. By default, Logtalk syntax highlighting is also
applied to the Prolog configuration files (*.config).
Some text editors already include support for Logtalk. If that is the
case of your favorite editor, you may want to check if the supporting

View File

@@ -1,6 +1,6 @@
=================================================================
Logtalk - Object oriented extension to Prolog
Release 2.24.0
Release 2.25.0
Copyright (c) 1998-2005 Paulo Moura. All Rights Reserved.
=================================================================

View File

@@ -31,14 +31,6 @@
<key>BBLMLanguageSuffix</key>
<string>.lgt</string>
</dict>
<dict>
<key>BBLMLanguageSuffix</key>
<string>.mlgt</string>
</dict>
<dict>
<key>BBLMLanguageSuffix</key>
<string>.loader</string>
</dict>
</array>
<key>Language Features</key>
<dict>

View File

@@ -1,6 +1,6 @@
=================================================================
Logtalk - Object oriented extension to Prolog
Release 2.24.0
Release 2.25.0
Copyright (c) 1998-2005 Paulo Moura. All Rights Reserved.
=================================================================

View File

@@ -1,6 +1,6 @@
=================================================================
Logtalk - Object oriented extension to Prolog
Release 2.24.0
Release 2.25.0
Copyright (c) 1998-2005 Paulo Moura. All Rights Reserved.
=================================================================

View File

@@ -1,11 +1,11 @@
;; logtalk.el -- font lock support for Logtalk (http://www.logtalk.org/)
;; Copyright (C) 2003-2004 Paulo Moura
;; Copyright (C) 2003-2005 Paulo Moura
;; Author: Paulo Moura
;; Creation date: November 15, 2003
;; Last modification date: April 5, 2005
;; Version: 0.64
;; Last modification date: April 27, 2005
;; Version: 0.65
;; Installation:
;;
@@ -20,16 +20,14 @@
;; your ~/.emacs file:
;;
;; (autoload 'logtalk-mode "logtalk" "Major mode for editing Logtalk programs." t)
;; (setq auto-mode-alist (cons '("\\.mlgt\\'" . logtalk-mode) auto-mode-alist))
;; (setq auto-mode-alist (cons '("\\.lgt\\'" . logtalk-mode) auto-mode-alist))
;; (setq auto-mode-alist (cons '("\\.loader\\'" . logtalk-mode) auto-mode-alist))
;; (setq auto-mode-alist (cons '("\\.config\\'" . logtalk-mode) auto-mode-alist))
;; setup
(defvar logtalk-mode-version "0.62"
(defvar logtalk-mode-version "0.65"
"Logtalk mode version number")
(defvar logtalk-mode-hook nil)

View File

@@ -1,6 +1,6 @@
=================================================================
Logtalk - Object oriented extension to Prolog
Release 2.24.0
Release 2.25.0
Copyright (c) 1998-2005 Paulo Moura. All Rights Reserved.
=================================================================

View File

@@ -1,6 +1,6 @@
=================================================================
Logtalk - Object oriented extension to Prolog
Release 2.24.0
Release 2.25.0
Copyright (c) 1998-2005 Paulo Moura. All Rights Reserved.
=================================================================

View File

@@ -1,7 +1,7 @@
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE language SYSTEM "language.dtd">
<language name="Logtalk" version="1.34" kateversion="2.1" section="Sources" extensions="*.mlgt;*.lgt;*.loader;*.config" mimetype="text/x-logtalk" author="Paulo Moura (pmoura@logtalk.org)" license="Artistic License 2.0">
<language name="Logtalk" version="1.35" kateversion="2.1" section="Sources" extensions="*.lgt;*.config" mimetype="text/x-logtalk" author="Paulo Moura (pmoura@logtalk.org)" license="Artistic License 2.0">
<highlighting>

View File

@@ -1,6 +1,6 @@
=================================================================
Logtalk - Object oriented extension to Prolog
Release 2.24.0
Release 2.25.0
Copyright (c) 1998-2005 Paulo Moura. All Rights Reserved.
=================================================================

View File

@@ -66,4 +66,4 @@ nedit.highlightPatterns: Logtalk:1:0{\n\
Other arithemtic functors:"\\*\\*|<(sin|cos|atan|exp|log|sqrt)(?=[(])":::Subroutine::\n\
Bitwise functors:">>|<<|/\\\\|\\\\/|\\\\":::Subroutine::\n\
}
nedit.languageModes: Logtalk:.mlgt .lgt .loader .config::::4:4:\n\
nedit.languageModes: Logtalk: .lgt .config::::4:4:\n\

View File

@@ -1,6 +1,6 @@
=================================================================
Logtalk - Object oriented extension to Prolog
Release 2.24.0
Release 2.25.0
Copyright (c) 1998-2005 Paulo Moura. All Rights Reserved.
=================================================================

View File

@@ -35,6 +35,7 @@ discontiguous(/).
metapredicate().
op(, , ).
initialization().
encoding().
asserta()
assertz()

View File

@@ -24,6 +24,7 @@
<regex>:-\s(category)\(</regex>
<regex>:-\s(end_(object|protocol|category))\.</regex>
<regex>:-\s(alias)\(</regex>
<regex>:-\s(encoding)\(</regex>
<regex>:-\s(initialization)\(</regex>
<regex>:-\s(info)\(</regex>
<regex>:-\s(mode)\(</regex>

View File

@@ -1,6 +1,6 @@
=================================================================
Logtalk - Object oriented extension to Prolog
Release 2.24.0
Release 2.25.0
Copyright (c) 1998-2005 Paulo Moura. All Rights Reserved.
=================================================================

View File

@@ -1,6 +1,6 @@
=================================================================
Logtalk - Object oriented extension to Prolog
Release 2.24.0
Release 2.25.0
Copyright (c) 1998-2005 Paulo Moura. All Rights Reserved.
=================================================================

View File

@@ -0,0 +1,175 @@
<?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>Other: Logtalk Theme</string>
<key>settings</key>
<array>
<dict>
<key>name</key>
<string>Comments</string>
<key>scope</key>
<string>comment.line, comment.block</string>
<key>settings</key>
<dict>
<key>comment</key>
<string>misc. settings goes here!</string>
<key>fontStyle</key>
<string>italic</string>
<key>foreground</key>
<string>#23763A</string>
</dict>
</dict>
<dict>
<key>name</key>
<string>Strings</string>
<key>scope</key>
<string>string</string>
<key>settings</key>
<dict>
<key>comment</key>
<string>misc. settings goes here!</string>
<key>foreground</key>
<string>#881314</string>
</dict>
</dict>
<dict>
<key>name</key>
<string>Directives</string>
<key>scope</key>
<string>declaration</string>
<key>settings</key>
<dict>
<key>comment</key>
<string>misc. settings goes here!</string>
<key>foreground</key>
<string>#881280</string>
</dict>
</dict>
<dict>
<key>name</key>
<string>Variables</string>
<key>scope</key>
<string>variable</string>
<key>settings</key>
<dict>
<key>comment</key>
<string>misc. settings goes here!</string>
<key>foreground</key>
<string>#848AB9</string>
</dict>
</dict>
<dict>
<key>name</key>
<string>Predicates</string>
<key>scope</key>
<string>keyword.predicate</string>
<key>settings</key>
<dict>
<key>comment</key>
<string>misc. settings goes here!</string>
<key>foreground</key>
<string>#1A1AA6</string>
</dict>
</dict>
<dict>
<key>name</key>
<string>Operators</string>
<key>scope</key>
<string>keyword.operator</string>
<key>settings</key>
<dict>
<key>comment</key>
<string>misc. settings goes here!</string>
<key>foreground</key>
<string>#0000FF</string>
</dict>
</dict>
<dict>
<key>name</key>
<string>Constants</string>
<key>scope</key>
<string>constant.numeric</string>
<key>settings</key>
<dict>
<key>comment</key>
<string>misc. settings goes here!</string>
<key>foreground</key>
<string>#C44B45</string>
</dict>
</dict>
<dict>
<key>name</key>
<string>IncreaseIndent</string>
<key>scope</key>
<string>source.logtalk</string>
<key>settings</key>
<dict>
<key>comment</key>
<string>Increase indent after :- for clause rules</string>
<key>increaseIndentPattern</key>
<string>:-$</string>
</dict>
</dict>
<dict>
<key>name</key>
<string>Default smart typing</string>
<key>scope</key>
<string>source.logtalk</string>
<key>settings</key>
<dict>
<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>
</dict>
<dict>
<key>name</key>
<string>Default highlight pairs</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>
</dict>
</dict>
</array>
<key>uuid</key>
<string>D6585B8E-B37B-11D9-95B6-000A95DAA580</string>
</dict>
</plist>

View File

@@ -1,4 +0,0 @@
{
name = "Logtalk prototype";
content = "\n:- object(${1:Object}).\n\n\t:- info([\n\t\tversion is 1.0,\n\t\tauthor is '${2:Your Name}',\n\t\tdate is ${3:2004}/${4:10}/${5:18},\n\t\tcomment is '${6:Description}']).\n\n$0\n\n:- end_object.\n";
}

View File

@@ -1,4 +0,0 @@
{
name = " prototype with parent";
content = "\n:- object(${1:Prototype},\n\textends(${2:Parent})).\n\n\t:- info([\n\t\tversion is 1.0,\n\t\tauthor is '${3:Your Name}',\n\t\tdate is ${4:2004}/${5:10}/${6:18},\n\t\tcomment is '${7:Description}']).\n\n$0\n\n:- end_object.\n";
}

View File

@@ -1,4 +0,0 @@
{
name = " prototype with protocol";
content = "\n:- object(${1:Prototype},\n\timplements(${2:Protocol})).\n\n\t:- info([\n\t\tversion is 1.0,\n\t\tauthor is '${3:Your Name}',\n\t\tdate is ${4:2004}/${5:10}/${6:18},\n\t\tcomment is '${7:Description}']).\n\n$0\n\n:- end_object.\n";
}

View File

@@ -1,4 +0,0 @@
{
name = " prototype with category";
content = "\n:- object(${1:Prototype},\n\timports(${2:Category})).\n\n\t:- info([\n\t\tversion is 1.0,\n\t\tauthor is '${3:Your Name}',\n\t\tdate is ${4:2004}/${5:10}/${6:18},\n\t\tcomment is '${7:Description}']).\n\n$0\n\n:- end_object.\n";
}

View File

@@ -1,4 +0,0 @@
{
name = " prototype with all";
content = "\n:- object(${1:Prototype},\n\timplements(${2:Protocol}),\n\timports(${3:Category}),\n\textends(${4:Parent})).\n\n\t:- info([\n\t\tversion is 1.0,\n\t\tauthor is '${5:Your Name}',\n\t\tdate is ${6:2004}/${7:10}/${8:18},\n\t\tcomment is '${9:Description}']).\n\n$0\n\n:- end_object.\n";
}

View File

@@ -1,4 +0,0 @@
{
name = "Logtalk class";
content = "\n:- object(${1:Class},\n\tspecializes(${2:Superclass})).\n\n\t:- info([\n\t\tversion is 1.0,\n\t\tauthor is '${3:Your Name}',\n\t\tdate is ${4:2004}/${5:10}/${6:18},\n\t\tcomment is '${7:Description}']).\n\n$0\n\n:- end_object.\n";
}

View File

@@ -1,4 +0,0 @@
{
name = " class with protocol";
content = "\n:- object(${1:Class},\n\timplements(${2:Protocol}),\n\tspecializes(${3:Superclass})).\n\n\t:- info([\n\t\tversion is 1.0,\n\t\tauthor is '${4:Your Name}',\n\t\tdate is ${5:2004}/${6:10}/${7:18},\n\t\tcomment is '${8:Description}']).\n\n$0\n\n:- end_object.\n";
}

View File

@@ -1,4 +0,0 @@
{
name = " class with category";
content = "\n:- object(${1:Class},\n\timports(${2:Category}),\n\tspecializes(${3:Superclass})).\n\n\t:- info([\n\t\tversion is 1.0,\n\t\tauthor is '${4:Your Name}',\n\t\tdate is ${5:2004}/${6:10}/${7:18},\n\t\tcomment is '${8:Description}']).\n\n$0\n\n:- end_object.\n";
}

View File

@@ -1,4 +0,0 @@
{
name = " class with metaclass";
content = "\n:- object(${1:Class},\n\tinstantiates(${2:Metaclass}),\n\tspecializes(${3:Superclass})).\n\n\t:- info([\n\t\tversion is 1.0,\n\t\tauthor is '${4:Your Name}',\n\t\tdate is ${5:2004}/${6:10}/${7:18},\n\t\tcomment is '${8:Description}']).\n\n$0\n\n:- end_object.\n";
}

View File

@@ -1,4 +0,0 @@
{
name = " class with all";
content = "\n:- object(${1:Class},\n\timplements(${2:Protocol}),\n\timports(${3:Category}),\n\tinstantiates(${4:Metaclass}),\n\tspecializes(${5:Superclass})).\n\n\t:- info([\n\t\tversion is 1.0,\n\t\tauthor is '${6:Your Name}',\n\t\tdate is ${7:2004}/${8:10}/${9:18},\n\t\tcomment is '${10:Description}']).\n\n$0\n\n:- end_object.\n";
}

View File

@@ -1,4 +0,0 @@
{
name = "Logtalk instance";
content = "\n:- object(${1:Instance},\n\tinstantiates(${2:Class})).\n\n\t:- info([\n\t\tversion is 1.0,\n\t\tauthor is '${3:Your Name}',\n\t\tdate is ${4:2004}/${5:10}/${6:18},\n\t\tcomment is '${7:Description}']).\n\n$0\n\n:- end_object.\n";
}

View File

@@ -1,4 +0,0 @@
{
name = " instance with protocol";
content = "\n:- object(${1:Instance},\n\timplements(${2:Protocol}),\n\tinstantiates(${3:Class})).\n\n\t:- info([\n\t\tversion is 1.0,\n\t\tauthor is '${4:Your Name}',\n\t\tdate is ${5:2004}/${6:10}/${7:18},\n\t\tcomment is '${8:Description}']).\n\n$0\n\n:- end_object.\n";
}

View File

@@ -1,4 +0,0 @@
{
name = " instance with category";
content = "\n:- object(${1:Instance},\n\timports(${2:Category}),\n\tinstantiates(${3:Class})).\n\n\t:- info([\n\t\tversion is 1.0,\n\t\tauthor is '${4:Your Name}',\n\t\tdate is ${5:2004}/${6:10}/${7:18},\n\t\tcomment is '${8:Description}']).\n\n$0\n\n:- end_object.\n";
}

View File

@@ -1,4 +0,0 @@
{
name = " instance with all";
content = "\n:- object(${1:Instance},\n\timplements(${2:Protocol}),\n\timports(${3:Category}),\n\tinstantiates(${4:Class})).\n\n\t:- info([\n\t\tversion is 1.0,\n\t\tauthor is '${5:Your Name}',\n\t\tdate is ${6:2004}/${7:10}/${8:18},\n\t\tcomment is '${9:Description}']).\n\n$0\n\n:- end_object.\n";
}

View File

@@ -1,4 +0,0 @@
{
name = "Logtalk protocol";
content = "\n:- protocol(${1:Protocol}).\n\n\t:- info([\n\t\tversion is 1.0,\n\t\tauthor is '${2:Your Name}',\n\t\tdate is ${3:2004}/${4:10}/${5:18},\n\t\tcomment is '${6:Description}']).\n\n$0\n\n:- end_protocol.\n";
}

View File

@@ -1,4 +0,0 @@
{
name = " extended protocol";
content = "\n:- protocol(${1:Extended},\n\textends(${2:Minimal})).\n\n\t:- info([\n\t\tversion is 1.0,\n\t\tauthor is '${3:Your Name}',\n\t\tdate is ${4:2004}/${5:10}/${6:18},\n\t\tcomment is '${7:Description}']).\n\n$0\n\n:- end_protocol.\n";
}

View File

@@ -1,4 +0,0 @@
{
name = "Logtalk category";
content = "\n:- category(${1:Category}).\n\n\t:- info([\n\t\tversion is 1.0,\n\t\tauthor is '${2:Your Name}',\n\t\tdate is ${3:2004}/${4:10}/${5:18},\n\t\tcomment is '${6:Description}']).\n\n$0\n\n:- end_category.\n";
}

View File

@@ -1,4 +0,0 @@
{
name = " category with protocol";
content = "\n:- category(${1:Category},\n\timplements(${2:Protocol})).\n\n\t:- info([\n\t\tversion is 1.0,\n\t\tauthor is '${3:Your Name}',\n\t\tdate is ${4:2004}/${5:10}/${6:18},\n\t\tcomment is '${7:Description}']).\n\n$0\n\n:- end_category.\n";
}

View File

@@ -1,4 +0,0 @@
{
name = "Logtalk public predicate";
content = "\t:- public(${1:Functor}/${2:Arity}).\n\t:- mode(${3:Callable}, ${4:Solutions}).\n\t:- info(${5:Functor}/${6:Arity}, [\n\t\tcomment is '${7:Description}']).\n\n$0";
}

View File

@@ -1,4 +0,0 @@
{
name = "Logtalk protected predicate";
content = "\t:- protected(${1:Functor}/${2:Arity}).\n\t:- mode(${3:Callable}, ${4:Solutions}).\n\t:- info(${5:Functor}/${6:Arity}, [\n\t\tcomment is '${7:Description}']).\n\n$0";
}

View File

@@ -1,4 +0,0 @@
{
name = "Logtalk private predicate";
content = "\t:- private(${1:Functor}/${2:Arity}).\n\t:- mode(${3:Callable}, ${4:Solutions}).\n\t:- info(${5:Functor}/${6:Arity}, [\n\t\tcomment is '${7:Description}']).\n\n$0";
}

View File

@@ -0,0 +1,25 @@
<?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>content</key>
<string>
:- category(${1:Category},
implements(${2:Protocol})).
:- info([
version is 1.0,
author is '`niutil -readprop / /users/$USER realname`',
date is `date +%Y/%m/%d`,
comment is '${3:Description}']).
$0
:- end_category.
</string>
<key>name</key>
<string> Category with protocol</string>
<key>uuid</key>
<string>8A263B8A-73F7-11D9-8083-000D93589AF6</string>
</dict>
</plist>

View File

@@ -0,0 +1,24 @@
<?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>content</key>
<string>
:- category(${1:Category}).
:- info([
version is 1.0,
author is '`niutil -readprop / /users/$USER realname`',
date is `date +%Y/%m/%d`,
comment is '${2:Description}']).
$0
:- end_category.
</string>
<key>name</key>
<string>Category</string>
<key>uuid</key>
<string>8A2679C6-73F7-11D9-8083-000D93589AF6</string>
</dict>
</plist>

View File

@@ -0,0 +1,28 @@
<?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>content</key>
<string>
:- object(${1:Class},
implements(${2:Protocol}),
imports(${3:Category}),
instantiates(${4:Metaclass}),
specializes(${5:Superclass})).
:- info([
version is 1.0,
author is '`niutil -readprop / /users/$USER realname`',
date is `date +%Y/%m/%d`,
comment is '${6:Description}']).
$0
:- end_object.
</string>
<key>name</key>
<string> Class with all</string>
<key>uuid</key>
<string>8A26A112-73F7-11D9-8083-000D93589AF6</string>
</dict>
</plist>

View File

@@ -0,0 +1,26 @@
<?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>content</key>
<string>
:- object(${1:Class},
imports(${2:Category}),
specializes(${3:Superclass})).
:- info([
version is 1.0,
author is '`niutil -readprop / /users/$USER realname`',
date is `date +%Y/%m/%d`,
comment is '${4:Description}']).
$0
:- end_object.
</string>
<key>name</key>
<string> Class with category</string>
<key>uuid</key>
<string>8A26CCD5-73F7-11D9-8083-000D93589AF6</string>
</dict>
</plist>

View File

@@ -0,0 +1,26 @@
<?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>content</key>
<string>
:- object(${1:Class},
instantiates(${2:Metaclass}),
specializes(${3:Superclass})).
:- info([
version is 1.0,
author is '`niutil -readprop / /users/$USER realname`',
date is `date +%Y/%m/%d`,
comment is '${4:Description}']).
$0
:- end_object.
</string>
<key>name</key>
<string> Class with metaclass</string>
<key>uuid</key>
<string>8A270068-73F7-11D9-8083-000D93589AF6</string>
</dict>
</plist>

View File

@@ -0,0 +1,26 @@
<?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>content</key>
<string>
:- object(${1:Class},
implements(${2:Protocol}),
specializes(${3:Superclass})).
:- info([
version is 1.0,
author is '`niutil -readprop / /users/$USER realname`',
date is `date +%Y/%m/%d`,
comment is '${4:Description}']).
$0
:- end_object.
</string>
<key>name</key>
<string> Class with protocol</string>
<key>uuid</key>
<string>8A272A62-73F7-11D9-8083-000D93589AF6</string>
</dict>
</plist>

View File

@@ -0,0 +1,25 @@
<?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>content</key>
<string>
:- object(${1:Class},
specializes(${2:Superclass})).
:- info([
version is 1.0,
author is '`niutil -readprop / /users/$USER realname`',
date is `date +%Y/%m/%d`,
comment is '${3:Description}']).
$0
:- end_object.
</string>
<key>name</key>
<string>Class</string>
<key>uuid</key>
<string>8A275494-73F7-11D9-8083-000D93589AF6</string>
</dict>
</plist>

View File

@@ -0,0 +1,25 @@
<?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>content</key>
<string>
:- protocol(${1:Extended},
extends(${2:Minimal})).
:- info([
version is 1.0,
author is '`niutil -readprop / /users/$USER realname`',
date is `date +%Y/%m/%d`,
comment is '${3:Description}']).
$0
:- end_protocol.
</string>
<key>name</key>
<string> Extended protocol</string>
<key>uuid</key>
<string>8A277A4C-73F7-11D9-8083-000D93589AF6</string>
</dict>
</plist>

View File

@@ -0,0 +1,27 @@
<?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>content</key>
<string>
:- object(${1:Instance},
implements(${2:Protocol}),
imports(${3:Category}),
instantiates(${4:Class})).
:- info([
version is 1.0,
author is '`niutil -readprop / /users/$USER realname`',
date is `date +%Y/%m/%d`,
comment is '${5:Description}']).
$0
:- end_object.
</string>
<key>name</key>
<string> Instance with all</string>
<key>uuid</key>
<string>8A27A016-73F7-11D9-8083-000D93589AF6</string>
</dict>
</plist>

View File

@@ -0,0 +1,26 @@
<?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>content</key>
<string>
:- object(${1:Instance},
imports(${2:Category}),
instantiates(${3:Class})).
:- info([
version is 1.0,
author is '`niutil -readprop / /users/$USER realname`',
date is `date +%Y/%m/%d`,
comment is '${4:Description}']).
$0
:- end_object.
</string>
<key>name</key>
<string> Instance with category</string>
<key>uuid</key>
<string>8A27C6D7-73F7-11D9-8083-000D93589AF6</string>
</dict>
</plist>

View File

@@ -0,0 +1,26 @@
<?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>content</key>
<string>
:- object(${1:Instance},
implements(${2:Protocol}),
instantiates(${3:Class})).
:- info([
version is 1.0,
author is '`niutil -readprop / /users/$USER realname`',
date is `date +%Y/%m/%d`,
comment is '${4:Description}']).
$0
:- end_object.
</string>
<key>name</key>
<string> Instance with protocol</string>
<key>uuid</key>
<string>8A27EAEC-73F7-11D9-8083-000D93589AF6</string>
</dict>
</plist>

View File

@@ -0,0 +1,25 @@
<?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>content</key>
<string>
:- object(${1:Instance},
instantiates(${2:Class})).
:- info([
version is 1.0,
author is '`niutil -readprop / /users/$USER realname`',
date is `date +%Y/%m/%d`,
comment is '${3:Description}']).
$0
:- end_object.
</string>
<key>name</key>
<string>Instance</string>
<key>uuid</key>
<string>8A2814B5-73F7-11D9-8083-000D93589AF6</string>
</dict>
</plist>

View File

@@ -0,0 +1,17 @@
<?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>content</key>
<string> :- private(${1:Functor}/0).
:- mode(${1:Functor}, ${2:Solutions}).
:- info(${1:Functor}/0, [
comment is '${3:Description}']).
$0</string>
<key>name</key>
<string> (with no arguments)</string>
<key>uuid</key>
<string>DBFDEDF5-7F59-11D9-BA7A-000A95DAA580</string>
</dict>
</plist>

View File

@@ -0,0 +1,18 @@
<?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>content</key>
<string> :- private(${1:Functor}/${2:Arity}).
:- mode(${1:Functor}(${3:Arguments}), ${4:Solutions}).
:- info(${1:Functor}/${2:Arity}, [
comment is '${5:Description}',
arguments is ['$6'-'$7']]).
$0</string>
<key>name</key>
<string>Private predicate</string>
<key>uuid</key>
<string>8A284660-73F7-11D9-8083-000D93589AF6</string>
</dict>
</plist>

View File

@@ -0,0 +1,17 @@
<?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>content</key>
<string> :- protected(${1:Functor}/0).
:- mode(${1:Functor}, ${2:Solutions}).
:- info(${1:Functor}/0, [
comment is '${3:Description}']).
$0</string>
<key>name</key>
<string> (with no arguments)</string>
<key>uuid</key>
<string>4A25F29C-7F59-11D9-BA7A-000A95DAA580</string>
</dict>
</plist>

View File

@@ -0,0 +1,18 @@
<?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>content</key>
<string> :- protected(${1:Functor}/${2:Arity}).
:- mode(${1:Functor}(${3:Arguments}), ${4:Solutions}).
:- info(${1:Functor}/${2:Arity}, [
comment is '${5:Description}',
arguments is ['$6'-'$7']]).
$0</string>
<key>name</key>
<string>Protected predicate</string>
<key>uuid</key>
<string>8A286F7E-73F7-11D9-8083-000D93589AF6</string>
</dict>
</plist>

View File

@@ -0,0 +1,24 @@
<?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>content</key>
<string>
:- protocol(${1:Protocol}).
:- info([
version is 1.0,
author is '`niutil -readprop / /users/$USER realname`',
date is `date +%Y/%m/%d`,
comment is '${2:Description}']).
$0
:- end_protocol.
</string>
<key>name</key>
<string>Protocol</string>
<key>uuid</key>
<string>8A28B0F6-73F7-11D9-8083-000D93589AF6</string>
</dict>
</plist>

View File

@@ -0,0 +1,27 @@
<?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>content</key>
<string>
:- object(${1:Prototype},
implements(${2:Protocol}),
imports(${3:Category}),
extends(${4:Parent})).
:- info([
version is 1.0,
author is '`niutil -readprop / /users/$USER realname`',
date is `date +%Y/%m/%d`,
comment is '${5:Description}']).
$0
:- end_object.
</string>
<key>name</key>
<string> Prototype with all</string>
<key>uuid</key>
<string>8A28E048-73F7-11D9-8083-000D93589AF6</string>
</dict>
</plist>

View File

@@ -0,0 +1,25 @@
<?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>content</key>
<string>
:- object(${1:Prototype},
imports(${2:Category})).
:- info([
version is 1.0,
author is '`niutil -readprop / /users/$USER realname`',
date is `date +%Y/%m/%d`,
comment is '${3:Description}']).
$0
:- end_object.
</string>
<key>name</key>
<string> Prototype with category</string>
<key>uuid</key>
<string>8A290A27-73F7-11D9-8083-000D93589AF6</string>
</dict>
</plist>

View File

@@ -0,0 +1,25 @@
<?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>content</key>
<string>
:- object(${1:Prototype},
extends(${2:Parent})).
:- info([
version is 1.0,
author is '`niutil -readprop / /users/$USER realname`',
date is `date +%Y/%m/%d`,
comment is '${3:Description}']).
$0
:- end_object.
</string>
<key>name</key>
<string> Prototype with parent</string>
<key>uuid</key>
<string>8A292E31-73F7-11D9-8083-000D93589AF6</string>
</dict>
</plist>

View File

@@ -0,0 +1,25 @@
<?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>content</key>
<string>
:- object(${1:Prototype},
implements(${2:Protocol})).
:- info([
version is 1.0,
author is '`niutil -readprop / /users/$USER realname`',
date is `date +%Y/%m/%d`,
comment is '${3:Description}']).
$0
:- end_object.
</string>
<key>name</key>
<string> Prototype with protocol</string>
<key>uuid</key>
<string>8A29547D-73F7-11D9-8083-000D93589AF6</string>
</dict>
</plist>

View File

@@ -0,0 +1,24 @@
<?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>content</key>
<string>
:- object(${1:Object}).
:- info([
version is 1.0,
author is '`niutil -readprop / /users/$USER realname`',
date is `date +%Y/%m/%d`,
comment is '${2:Description}']).
$0
:- end_object.
</string>
<key>name</key>
<string>Prototype</string>
<key>uuid</key>
<string>8A298BE0-73F7-11D9-8083-000D93589AF6</string>
</dict>
</plist>

View File

@@ -0,0 +1,17 @@
<?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>content</key>
<string> :- public(${1:Functor}/0).
:- mode(${1:Functor}, ${2:Solutions}).
:- info(${1:Functor}/0, [
comment is '${3:Description}']).
$0</string>
<key>name</key>
<string> (with no arguments)</string>
<key>uuid</key>
<string>D96B0926-7F56-11D9-BA7A-000A95DAA580</string>
</dict>
</plist>

View File

@@ -0,0 +1,18 @@
<?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>content</key>
<string> :- public(${1:Functor}/${2:Arity}).
:- mode(${1:Functor}(${3:Arguments}), ${4:Solutions}).
:- info(${1:Functor}/${2:Arity}, [
comment is '${5:Description}',
arguments is ['$6'-'$7']]).
$0</string>
<key>name</key>
<string>Public predicate</string>
<key>uuid</key>
<string>8A29B12E-73F7-11D9-8083-000D93589AF6</string>
</dict>
</plist>

View File

@@ -1,235 +1,205 @@
/**
** Logtalk syntax dictionary for TextMate.
**
** Paulo Moura <pmoura@logtalk.org>
**/
{
name = "Logtalk";
fileTypes = ( lgt, mlgt, config, loader );
foldingStartMarker = ":-\\s+(object|protocol|category)(?=[(])";
foldingStopMarker = ":-\\s+end_(object|protocol|category)(?=[.])";
increaseIndentPattern = ":-$";
smartTypingPairs = (
( "(", ")" ), ( "[", "]" ), ( "{", "}" ),
( "\"", "\"" ), ( "'", "'" )
);
highlightPairs = (
( "(", ")" ), ( "[", "]" ), ( "{", "}" )
);
foregroundColor = "#000000";
backgroundColor = "#ffffff";
patterns = (
{
name = "Block comments";
begin = "/\\*"; end = "\\*/";
fontStyle = ( italic ); foregroundColor = "#23763A";
},
{
name = "Line Comments";
match = "%.*$";
fontStyle = ( italic ); foregroundColor = "#23763A";
},
{
name = "Entity opening directives";
match = ":-\\s+(object|protocol|category)(?=[(])";
foregroundColor = "#881280";
},
{
name = "Entity closing directives";
match = ":-\\s+end_(object|protocol|category)(?=[.])";
foregroundColor = "#881280";
},
{
name = "Entity relations";
match = "\\b(extends|i(nstantiates|mp(orts|lements))|specializes)(?=[(])";
foregroundColor = "#881280";
},
{
name = "Entity directives";
match = ":-\\s+(calls|in(itialization|fo)|uses)(?=[(])";
foregroundColor = "#881280";
},
{
name = "Predicate directives";
match = ":-\\s+(alias|info|d(ynamic|iscontiguous)|m(etapredicate|ode|ultifile)|p(ublic|r(otected|ivate))|op|uses)(?=[(])";
foregroundColor = "#881280";
},
{
name = "Message sending operators";
match = "(::|\\^\\^)";
foregroundColor = "#0000ff";
},
{
name = "Mode operators";
match = "(\\?|@)";
foregroundColor = "#0000ff";
},
{
name = "Term comparison operators";
match = "(@=<|@<|@>|@>=|==|\\\\==)";
foregroundColor = "#0000ff";
},
{
name = "Arithemtic comparison operators";
match = "(=<|<|>|>=|=:=|=\\\\=)";
foregroundColor = "#0000ff";
},
{
name = "Bitwise operators";
match = "(<<|>>|/\\\\|\\\\/|\\\\)";
foregroundColor = "#0000ff";
},
{
name = "Evaluable operators";
match = "\\<(mod|rem)\\>";
foregroundColor = "#0000ff";
},
{
name = "Evaluable operators";
match = "(\\*\\*|\\+|-|\\*|/|//)";
foregroundColor = "#0000ff";
},
{
name = "Other operators";
match = "(:-|!|\\\\\+|,|;|-->|->|=|\\\=|\\.|=\\.\\.|\\<is\\>)";
foregroundColor = "#0000ff";
},
{
name = "Control constructs (arity 0)";
match = "\\<(true|fail|repeat)\\>";
foregroundColor = "#1A1AA6";
},
{
name = "Control constructs";
match = "\\<(ca(ll|tch)|throw|once)(?=[(])";
foregroundColor = "#1A1AA6";
},
{
name = "Character and byte input/output";
match = "\\<((get|peek|put)_(char|code|byte)|nl)(?=[(])";
foregroundColor = "#1A1AA6";
},
{
name = "Character and byte input/output";
match = "\\<nl\\>";
foregroundColor = "#1A1AA6";
},
{
name = "Atomic term processing";
match = "\\<(atom_(length|concat|chars|codes)|sub_atom|char_code|number_(chars|codes))(?=[(])";
foregroundColor = "#1A1AA6";
},
{
name = "Term testing";
match = "\\<(var|atom|integer|float|atomic|compound|n(onvar|umber))(?=[(])";
foregroundColor = "#1A1AA6";
},
{
name = "Term input/output";
match = "\\<(read_term|read|write|writeq|write_(canonical|term)|op|current_op|char_conversion|current_char_conversion)(?=[(])";
foregroundColor = "#1A1AA6";
},
{
name = "Term creation and decomposition";
match = "\\<(arg|copy_term|functor)(?=[(])";
foregroundColor = "#1A1AA6";
},
{
name = "Term unification";
match = "\\<(unify_with_occurs_check)(?=[(])";
foregroundColor = "#1A1AA6";
},
{
name = "Stream selection and control";
match = "\\<((set|current)_(in|out)put|open|close|flush_output|stream_property|at_end_of_stream|set_stream_position)(?=[(])";
foregroundColor = "#1A1AA6";
},
{
name = "Stream selection and control (others)";
match = "\\<(flush_output|at_end_of_stream)\\>";
foregroundColor = "#1A1AA6";
},
{
name = "Prolog flags";
match = "\\<((set|current)_prolog_flag)(?=[(])";
foregroundColor = "#1A1AA6";
},
{
name = "Compiling and loading predicates";
match = "\\<(logtalk_(compile|l(ibrary_path|oad)))(?=[(])";
foregroundColor = "#1A1AA6";
},
{
name = "Event handling predicates";
match = "\\<((abolish|define)_events|current_event)(?=[(])";
foregroundColor = "#1A1AA6";
},
{
name = "Implementation defined hooks";
match = "\\<((current|set)_logtalk_flag|halt)(?=[(])";
foregroundColor = "#1A1AA6";
},
{
name = "Implementation defined hooks (others)";
match = "\\<(halt)\\>";
foregroundColor = "#1A1AA6";
},
{
name = "Entity creation and abolishing predicates";
match = "\\<((create|abolish)_(object|protocol|category))(?=[(])";
foregroundColor = "#1A1AA6";
},
{
name = "Reflection predicates";
match = "\\<(current_(object|protocol|category)|(object|protocol|category)_property||extends_(object|protocol)|imp(orts_category|lements_protocol)|(instantiates|specializes)_class)(?=[(])";
foregroundColor = "#1A1AA6"; },
{ name = "Other predicates"; match = "\\<((for|retract)all)(?=[(])"; foregroundColor = "#1A1AA6"; },
{
name = "Execution context methods";
match = "\\<(parameter|se(lf|nder)|this)(?=[(])";
foregroundColor = "#1A1AA6";
},
{
name = "Database methods"; match = "\\<(abolish|assert(a|z)|clause|retract|retractall)(?=[(])"; foregroundColor = "#1A1AA6"; },
{
name = "All solutions methods";
match = "\\<((bag|set)of|f(ind|or)all)(?=[(])";
foregroundColor = "#1A1AA6";
},
{
name = "Reflection methods";
match = "\\<(current_predicate|predicate_property)(?=[(])";
foregroundColor = "#1A1AA6";
},
{
name = "Event handler methods";
match = "\\<(before|after)(?=[(])";
foregroundColor = "#1A1AA6";
},
{
name = "Grammar rule methods";
match = "\\<(expand_term|phrase)(?=[(])";
foregroundColor = "#1A1AA6";
},
{
name = "Character constants";
match = "\\<(0'[0-9a-zA-Z]|0b[0-1]+|0o[0-7]+|0x[0-9a-fA-F]+)\\>";
foregroundColor = "#C44B45";
},
{
name = "Numeric constants";
match = "\\<([0-9]+\\.?[0-9]*((e|E)(\\+|-)[0-9]+)?)\\>";
foregroundColor = "#C44B45";
},
{
name = "Atoms";
begin = "'"; end = "'"; swallow = "\\\\.";
foregroundColor = "#881314";
},
{
name = "Strings";
begin = "\""; end = "\""; swallow = "\\\\.";
foregroundColor = "#881314";
},
{
name = "Variables";
match = "\\<(\\u|_)\\w*\\>";
foregroundColor = "#848AB9";
}
);
name = Logtalk;
scopeName = "source.logtalk";
fileTypes = (lgt, config);
foldingStartMarker = ":-\\s+(object|protocol|category)(?=[(])";
foldingStopMarker = ":-\\s+end_(object|protocol|category)(?=[.])";
patterns = (
{
begin = "/\\*";
end = "\\*/";
name = "comment.block";
},
{
match = "%.*$";
name = "comment.line.percentage";
},
{
match = ":-\\s+(object|protocol|category)(?=[(])";
name = "declaration.entity.opening";
},
{
match = ":-\\s+end_(object|protocol|category)(?=[.])";
name = "declaration.entity.closing";
},
{
match = "\\b(extends|i(nstantiates|mp(orts|lements))|specializes)(?=[(])";
name = "declaration.entity.relations";
},
{
match = ":-\\s+(calls|encoding|in(itialization|fo)|uses)(?=[(])";
name = "declaration.entity.others";
},
{
match = ":-\\s+(alias|info|d(ynamic|iscontiguous)|m(etapredicate|ode|ultifile)|p(ublic|r(otected|ivate))|op|uses)(?=[(])";
name = "declaration.predicate";
},
{
match = "(::|\\^\\^)";
name = "keyword.operator.message-sending";
},
{
match = "(\\?|@)";
name = "keyword.operator.mode";
},
{
match = "(@=<|@<|@>|@>=|==|\\\\==)";
name = "keyword.operator.term-comparison";
},
{
match = "(=<|<|>|>=|=:=|=\\\\=)";
name = "keyword.operator.arithmetic-comparison";
},
{
match = "(<<|>>|/\\\\|\\\\/|\\\\)";
name = "keyword.operator.bitwise";
},
{
match = "\\b(mod|rem)\\b";
name = "keyword.operator.evaluable";
},
{
match = "(\\*\\*|\\+|-|\\*|/|//)";
name = "keyword.operator.evaluable";
},
{
match = "(:-|!|\\\\+|,|;|-->|->|=|\\=|\\.|=\\.\\.|\\bis\\b)";
name = "keyword.operator.misc";
},
{
match = "\\b(true|fail|repeat)\\b";
name = "keyword.predicate.control";
},
{
match = "\\b(ca(ll|tch)|throw|once)(?=[(])";
name = "keyword.predicate.control";
},
{
match = "\\b((get|peek|put)_(char|code|byte)|nl)(?=[(])";
name = "keyword.predicate.chars-and-bytes-io";
},
{
match = "\\bnl\\b";
name = "keyword.predicate.chars-and-bytes-io";
},
{
match = "\\b(atom_(length|concat|chars|codes)|sub_atom|char_code|number_(chars|codes))(?=[(])";
name = "keyword.predicate.atom-term-processing";
},
{
match = "\\b(var|atom|integer|float|atomic|compound|n(onvar|umber))(?=[(])";
name = "keyword.predicate.term-testing";
},
{
match = "\\b(read_term|read|write|writeq|write_(canonical|term)|op|current_op|char_conversion|current_char_conversion)(?=[(])";
name = "keyword.predicate.term-io";
},
{
match = "\\b(arg|copy_term|functor)(?=[(])";
name = "keyword.predicate.term-creation-and-decomposition";
},
{
match = "\\b(unify_with_occurs_check)(?=[(])";
name = "keyword.predicate.term-unification";
},
{
match = "\\b((set|current)_(in|out)put|open|close|flush_output|stream_property|at_end_of_stream|set_stream_position)(?=[(])";
name = "keyword.predicate.stream-selection-and-control";
},
{
match = "\\b(flush_output|at_end_of_stream)\\b";
name = "keyword.predicate.stream-selection-and-control";
},
{
match = "\\b((set|current)_prolog_flag)(?=[(])";
name = "keyword.predicate.prolog-flags";
},
{
match = "\\b(logtalk_(compile|l(ibrary_path|oad)))(?=[(])";
name = "keyword.predicate.compiling-and-loading";
},
{
match = "\\b((abolish|define)_events|current_event)(?=[(])";
name = "keyword.predicate.event-handling";
},
{
match = "\\b((current|set)_logtalk_flag|halt)(?=[(])";
name = "keyword.predicate.hooks.implementation-defined";
},
{
match = "\\b(halt)\\b";
name = "keyword.predicate.hooks.implementation-defined";
},
{
match = "\\b((create|abolish)_(object|protocol|category))(?=[(])";
name = "keyword.predicate.entity-creation-and-abolishing";
},
{
match = "\\b(current_(object|protocol|category)|(object|protocol|category)_property|extends_(object|protocol)|imp(orts_category|lements_protocol)|(instantiates|specializes)_class)(?=[(])";
name = "keyword.predicate.reflection";
},
{
match = "\\b((for|retract)all)(?=[(])";
name = "keyword.predicate.misc";
},
{
match = "\\b(parameter|se(lf|nder)|this)(?=[(])";
name = "keyword.predicate.execution-context";
},
{
match = "\\b(abolish|assert(a|z)|clause|retract|retractall)(?=[(])";
name = "keyword.predicate.database";
},
{
match = "\\b((bag|set)of|f(ind|or)all)(?=[(])";
name = "keyword.predicate.all-solutions";
},
{
match = "\\b(current_predicate|predicate_property)(?=[(])";
name = "keyword.predicate.reflection";
},
{
match = "\\b(before|after)(?=[(])";
name = "keyword.predicate.event-handler";
},
{
match = "\\b(expand_term|phrase)(?=[(])";
name = "keyword.predicate.grammar-rule";
},
{
match = "\\b(0'[0-9a-zA-Z]|0b[0-1]+|0o[0-7]+|0x[0-9a-fA-F]+)\\b";
name = "constant.numeric";
},
{
match = "\\b([0-9]+\\.?[0-9]*((e|E)(\\+|-)[0-9]+)?)\\b";
name = "constant.numeric";
},
{
begin = "'";
end = "'";
name = "string.single-quoted";
swallow = "\\\\.";
},
{
begin = "\"";
end = "\"";
name = "string.double-quoted";
swallow = "\\\\.";
},
{
match = "\\b([A-Z_][A-Za-z0-9_]*)\\b";
name = "variable";
}
);
uuid = "C11FA1F2-6EDB-11D9-8798-000A95DAA580";
}

View File

@@ -1,6 +1,6 @@
=================================================================
Logtalk - Object oriented extension to Prolog
Release 2.24.0
Release 2.25.0
Copyright (c) 1998-2005 Paulo Moura. All Rights Reserved.
=================================================================

View File

@@ -1,6 +1,6 @@
=================================================================
Logtalk - Object oriented extension to Prolog
Release 2.24.0
Release 2.25.0
Copyright (c) 1998-2005 Paulo Moura. All Rights Reserved.
=================================================================
@@ -15,7 +15,7 @@ To install:
Copy the files logtalk.syn and Logtalk.tcl to the SAMPLES subdirectory
in the TextPad application directory and define a new document class
for Logtalk source files (whose extensions are .mlgt, .lgt, .loader,
and .config).
for Logtalk source files (whose extension is .lgt) and for Prolog
configuration files (whose extension is .config).
THIS SYNTAX FILE IS UNDER DEVELOPMENT.

View File

@@ -1,6 +1,6 @@
=================================================================
Logtalk - Object oriented extension to Prolog
Release 2.24.0
Release 2.25.0
Copyright (c) 1998-2005 Paulo Moura. All Rights Reserved.
=================================================================
@@ -20,14 +20,8 @@ case, install the syntax file by performing the following steps:
2. Add the following entries to the "filetype.vim" configuration
file (only if not already present):
" Logtalk source metafiles
au BufNewFile,BufRead *.mlgt setf logtalk
" Logtalk source files
au BufNewFile,BufRead *.lgt setf logtalk
" Logtalk source file loader
au BufNewFile,BufRead *.loader setf logtalk
" Logtalk config files
au BufNewFile,BufRead *.config setf logtalk

View File

@@ -1,6 +1,6 @@
=================================================================
Logtalk - Object oriented extension to Prolog
Release 2.24.0
Release 2.25.0
Copyright (c) 1998-2005 Paulo Moura. All Rights Reserved.
=================================================================

View File

@@ -5,14 +5,6 @@
All rights reserved.
*/
(
{
Identifier = sourcecode.logtalk;
BasedOn = sourcecode;
Name = "Logtalk source metafiles";
Extensions = (mlgt);
ComputerLanguage = logtalk;
AppliesToBuildRules = no;
},
{
Identifier = sourcecode.logtalk;
BasedOn = sourcecode;
@@ -21,14 +13,6 @@
ComputerLanguage = logtalk;
AppliesToBuildRules = no;
},
{
Identifier = sourcecode.logtalk.loader;
BasedOn = sourcecode.logtalk;
Name = "Logtalk source file loader";
Extensions = (loader);
ComputerLanguage = prolog;
AppliesToBuildRules = no;
},
{
Identifier = sourcecode.logtalk.config;
BasedOn = sourcecode.logtalk;