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,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";
}