Function class

class className [superClass] memberList

Creates a new class object.

Parameters:

className - Symbol that will identify the new class.

superClass - Symbol identifying the super class of the new class.

memberList - List of symbols representing the members of the new class.

Returns:

A reference to the new class object.

Creates a new class object and stores a reference to it in the global variable identified by the symbol className.

The class function could be implemented using the new-class function like this:

global class args {
    global [car $args] [apply new-class [cdr $args]]
}