defmethod
|
|
defmethod
|
The defmethod Macro adds a new method Lambda methodName to the specified class Lambda className.
The defmethod Macro always returns the newly created methods Lambda. Following the
defmethod Macro, the new method Lambda can be invoked on any objects (class Structures)
of the specified className. For instance below we define a class Lambda, create an object of the class, and then
invoke the various class methods. Usage Use the defmethod when a new class Lambda is to large to be contained in a single source file, or
when each class method is to be kept in its own source file.
(defclass employee()
svars:(String:Name (Number:Salary 0.0))
cvars:(empStatic)
(defun new(self name salary)
(setq Name (string name))
(setq Salary salary)
self) ;; end of new method
(defun talk(self)
(writeln "I " Name " am an employee.")
true) ;; end of talk method
;;.... other class methods here
true) ;; end of employee class
(defclass employee:manager()
svars:(String:Title)
(defun talk(self)
(writeln "I " Name " am a manager.")
true) ;; end of talk method
;;.... other class methods here
true) ;; end of manager class
(defmethod employee:brag()
(writeln "I " Name " earn " Salary " dollars per year.")
true) ;; end of brag method
true) ;; end of brag method
;; Creating objects form each of two classes.
(setq emp (new employee "John Doe" 24000.0)) ;; Create an object of class employee
(setq mgr (new manager "Chuck Bigman" 36000.0)) ;; Create an object of class manager
;; Invoking methods on each object.
(brag:emp) ;; writes on console, "I John Doe make 24,000 per year."
(talk:emp) ;; writes on console, "I John Doe am an employee."
(talk:mgr) ;; writes on console, "I Chuck Bigman am a manager."
(class mgr) ;; returns "manager"
(defmethod className:methodName(arg...) svars:(var...) faces:(var...) pvars:(var...)
cvars:(var...) regs:(var...) vars:(var...) exp...) An class Lambda that will be assigned the className.
Expression:
Arguments
Name
Type
Description Argument: className Symbol
The class Lambda to which this method will be added. Argument: methodName Symbol
The name of the new method Lambda. Argument: (arg...) ---
Optional Argument. Argument list for the Lambda. Argument: svars:(var...) Symbol
The list of class variables which become part of each class Structure created by the class. Argument: faces:(var...) Symbol
Optional Argument. If present, must be followed by a interfaces feature list. Argument: vars:(var...) Symbol
Optional Argument. If present, must be followed by a local variable list. Argument: pvars:(var...) Symbol
Optional Argument. If present, must be followed by a persistent variable list. Argument: cvars:(var...) Symbol
Optional Argument. If present, must be followed by a persistent class variable list. Argument: regs:(var...) Symbol
Optional Argument. If present, must be followed by a register variable list
(up to fifty register variables are allowed). Argument: exp... ---
The Lisp statements that forms the Lambdas
Returns:
Here are a number of links to Lambda coding examples which contain this instruction in various use cases.
Here are the links to the data types of the function arguments.
| Lambda | Symbol |
Here are also a number of links to functions having arguments with any of these data types.
|
|
Analytic Information Server (AIS)AIS Component Systems
|