% +
% 	moz - The Moo in OZ project.
%	Version: 1.0.C025
% 	Copyright (C) 2002 Robin Lee Powell.  All rights reserved.
% 	Written by rlpowell@digitalkingdom.org
% 
% 	Redistribution and use in source and binary forms, with or without
% 	modification, are permitted provided that the following conditions are
% 	met:
% 	
% 	 1. Redistributions of source code must retain the above copyright
% 	 notice, this list of conditions and the following disclaimer.
% 	
% 	 2. Redistributions in binary form must reproduce the above copyright
% 	 notice, this list of conditions and the following disclaimer in the
% 	 documentation and/or other materials provided with the distribution.
% 	
% 	THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
% 	IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
% 	WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
% 	DISCLAIMED. IN NO EVENT SHALL THE AUTHER OR CONTRIBUTORS BE LIABLE FOR
% 	ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
% 	DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
% 	OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
% 	HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
% 	STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
% 	ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
% 	POSSIBILITY OF SUCH DAMAGE.
%
Container = class $ from Location Mobile
%%%%%%%%%
%
% Properties
%
%%%%%%%%%

%%%%%%%%%
%
% Attributes
%
%%%%%%%%%
%attr 

%%%%%%%%%%%%%%
%
% Features
%
%%%%%%%%%%%%%%
    feat

    % The list of things that the Server class saves.
    % ozName#name description#string name#string 
    exports: {Append
	{Record.toListInd
	    {Adjoin
		{List.toRecord exports Location.exports}
		{List.toRecord exports Mobile.exports}
	    }
	}
	% Nothing else here yet.
	nil
    }

    % The list of methods we allow the outside world to see, at
    % least potentially.
    methodList: {Append
	{NoRepeatsMerge
		Location.methodList
		Mobile.methodList
	}
	% Nothing else here yet.
	nil
    }

    % The name of this class.
    className: 'Container'

    %%%%%%%%%%%%%%
    %
    % Methods
    %
    %%%%%%%%%%%%%%


    %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
    %
    % init:
    %
    % One-time object initialization sets various values.
    %
    % ozName:  Our new Oz name.
    %
    % storage:  An object record for the Storage object.
    %
    % name:  Our printable name.
    %
    % description:  Our description.
    %
    % location:  Our location.
    %
    %%%%%%%%%%%%%%%%%%%%
    meth init( ... ) = InitHead
	Location, InitHead
	Mobile, InitHead
    end






    %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
    %
    % start:
    %
    % Called whenever the object is loaded or re-loaded.
    % 
    %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
    meth start( ... )
	skip
    end


    %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
    %
    % stop:
    %
    % Stops any processing that may have been started by start.
    %
    %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
    meth stop( ... )
	skip
    end



end