(*
<h1>Supplemental Specification using RSL</h1>
<h2>Basic-Apple-Data</h2>
<P>
<pre> *)

(***********************************************************************
                         Basic-Apple-Data

                            Jon Doyel
                            Fall 1994



      This is the RSL for the basic components that relate to the
      AppleEvents and Forms that Ephram uses.

************************************************************************)

module BasicAppleData;

    export Form, InfoChunk;

    define object attribute DataRepresenationOf;

    object Form =  InfoChunk*; 

    obj InfoChunk =  Name and Value;
       (* An InfoChunk is a packet of info derived from some user-level info
	     * source, e.g., a mail message or picture.  An InfoChunk will be
	     * Ephram's basic unit info.  For the AI types among us, an InfoChunk
	     * =  just a slot/filler pair, aka, Lisp property. *)

    obj Name =  string;

    obj Value =  string;


    (*
       PLEASE NOTE:
       We are not attempting to define AppleEvents or AppleScript
       here.  That would be an overwhelming waste of time.  We are
       only describing the very abstract levels of the elements of 
       AppleEvents that Ephram makes use of.
       
       <h2>For more infomation, please see <A HREF="references.html> Inside Macintosh: Interapplication Communications</A>.</h2>
     *)


    obj AppleEvent =  AEDesc and AEObject;

    obj AEDesc =  string
      description:
      (* A four-char string, e.g., "aeoa", which is the "open application"
	      * event.  There are on the order of hundreds of them, known by the
	      * Apple Event Manager, which is running at all times.*);
    end;

    obj AEObject =  string;
      (* Data paired with an AEDesc -- string to us at this level *)

    obj FormData =  InfoFields;

    obj InfoFields =  InfoField*;

    obj InfoField =  FieldName and FieldValue;

    obj FieldName =  string;

    obj FieldValue =  string;

end BasicAppleData;

(* </pre> *)