2572851ad5
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@791 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
32 lines
720 B
Plaintext
32 lines
720 B
Plaintext
## template = class
|
|
#buffermode ( "logtalk" )
|
|
#prompt ( "Class name:" $classname )
|
|
#prompt ( "Metaclasses (comma separated):" $metaclasses )
|
|
#prompt ( "Superclasses (comma separated):" $superclasses )
|
|
#if ( !$metaclasses )
|
|
:- object($classname,
|
|
specializes($superclasses)).
|
|
#elseif ( !$superclasses )
|
|
:- object($classname,
|
|
instantiates($metaclasses)).
|
|
#else
|
|
:- object($classname,
|
|
instantiates($metaclasses),
|
|
specializes($superclasses)).
|
|
#end
|
|
|
|
#prompt ( "Version:" $version "1.0" )
|
|
#prompt ( "Author name:" $authorname )
|
|
#prompt ( "Comment:" $comment )
|
|
#today ( $date "yyyy/MM/dd" )
|
|
:- info([
|
|
version is $version,
|
|
author is '$authorname',
|
|
date is $date,
|
|
comment is '$comment']).
|
|
|
|
|
|
#caret ()
|
|
|
|
:- end_object.
|