Structural Informatics Group (SIG) logo
Home | Projects | Demos | Downloads | Publications | Local Info | About Us | New site
Go to the first, previous, next, last section, table of contents.

send-super

send-super

type: function (subr)
location: built-in
source file: xlobj.c
Common LISP compatible: no
supported on: all machines

SYNTAX

(send-super <message> [<args>])
        <message>       -       the message selector
        <args>          -       the optional message arguments

DESCRIPTION

The SEND-SUPER function sends the specified arguments <args> to the <message> specified method of the superclass. It is necessary for SEND-SUPER to be executed from within a method being performed on an object. It will return the result of sending the message. If SEND-SUPER is performed outside of a method an error "error: not in a method" will result.

EXAMPLES

(setq a-class (send class :new '()))    ; create A-CLASS 
(send a-class :answer :show '()         ; set up special SHOW method
        '((print "nobody here") self))  ;
(setq an-obj (send a-class :new))       ; create AN-OBJ of A-CLASS
(send an-obj :show)                     ; prints "nobody here"
(send a-class :answer :myshow '()       ; set up MYSHOW method which
        '((send-super :show )))         ;     calls :SHOW in superclass
(send an-obj :myshow)                   ; prints Object is ............


Go to the first, previous, next, last section, table of contents.