![]() | ![]() | ![]() | link-slot-p | ![]() |
|
| slot
| [Generic Function] |
Purpose
Determine if a slot meta-object is a link slot.
Method signatures
(slot direct-link-definition)
=> slot
|
(slot effective-link-definition)
=> slot
|
(slot slot-definition)
=> nil
|
Package :gbbopen
Module :gbbopen-core
Arguments and values
| slot | A slot meta object | |
| slot-or-nil | A slot meta object or nil
|
Returns
The slot if it is a link slot; nil otherwise.
See also
define-unit-class
Example
Return the names of the link slots of the hyp unit class:
> (loop for slot in (class-slots (find-class 'hyp))
if (link-slot-p slot) collect (slot-definition-name slot))
(supporting-hyps supported-hyps)
>
The GBBopen Project
![]() | ![]() | ![]() | link-slot-p | ![]() |