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>