Defines a class for a Lisp DDE server.
win32
define-dde-server class-name service-spec-args => class-name
service-spec-args ::= service-name | superclasses slot-specs [[class-option]]
class-option ::= (:service service-name) | standard-class-option
class-name⇩ |
A class name. |
service-name⇩ |
A string. |
superclasses⇩ |
A list of superclasses. |
slot-specs⇩ |
The specifications for the slots. |
standard-class-option⇩ | |
A list. |
class-name |
A class name. |
The macro define-dde-server
defines a class for a Lisp DDE server. The class inherits from dde-server
.
The long form of the macro is similar to defclass, but with one extra class option, :service
, which is used to specify the service name string to which this server will respond. If superclasses is nil
, then the single superclass of class-name will be dde-server
. subclass of dde-server
. If superclasses is non-nil, it should include subclass of dde-server
. slot-specs and standard-class-option are used as the slot specifications and class options of the new class.
The short form is provided to handle the common simple case; class-name is the name of the Lisp class to be defined, and service-name is the service name string to which this server will respond.
The first example uses the short version of define-dde-server
to define a class, called lisp-server
, which has the service name "LISP
".
(define-dde-server lisp-server "LISP")
The second example shows how to use the long for of the macro to define the same class, and illustrates the use of superclasses and a class-option.
(define-dde-server lisp-server (dde-server) () (:service "LISP"))
LispWorks® User Guide and Reference Manual - 01 Dec 2021 19:31:10