From: Jan T. <de...@us...> - 2002-04-08 17:35:48
|
Update of /cvsroot/net-script/netscript2/src/perl/NetScript/Engine In directory usw-pr-cvs1:/tmp/cvs-serv7282 Modified Files: Statement.pm Log Message: * removed block and copy statements Index: Statement.pm =================================================================== RCS file: /cvsroot/net-script/netscript2/src/perl/NetScript/Engine/Statement.pm,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** Statement.pm 1 Apr 2002 20:30:56 -0000 1.1 --- Statement.pm 8 Apr 2002 17:35:41 -0000 1.2 *************** *** 37,39 **** --- 37,58 ---- + #/** + # Initialises the statement. The parameters depend + # on the type of the statement. + # @abstract + #*/ + sub init { + undef; + } + + #/** + # Executes the statement and returns the value of the + # statement. The value can be void (undef) + # @return the value of the statement + # @abstract + #*/ + sub evaluate { + undef; + } + 1; # make "require" happy |