- current_super_class(-Super)[private]
- Return the name of the super-class of the currently compiling
class.
- super_class(+ClassName, -SuperClassName)[private]
- Deternine the super-class of a class. Try to avoid realising
the class to improve compilation and save-state performance.
First clause deals with the most common case, where we want to
have the super-class of the currently compiling class.