1-18 Abbildende Ada-Sprache, v1.2 Oktober 2001 1 generisch die Art, die geschachtelt wird, ist privat; Art Boxed_Access ist der ganz geschachtelte Zugang; Paket CORBA.Value.Box ist Art Box_Ref ist neues CORBA.Value.Base mit privatem; Funktion Is_Null(The_Ref: Rückkehr Box_Ref) Boolesch; Funktion Create(With_Value: in geschachteltem) RückholBox_Ref; Funktion "+" (With_Value: in geschachteltem) RückholBox_Ref benennt verursachen um; Funktion Contents(The_Boxed: in Box_Ref) RückholBoxed_Access; Funktion "-" (The_Boxed: in Box_Ref) RückholBoxed_Access benennt Inhalt um; Verfahren Release(The_Ref: in aus Box_Ref); Ende CORBA.Value.Box; Implementierungen des Box_Ref Art muß den Hinweis stützen, der zählt, "intelligent Zeiger"Semantik für den geschachtelten Wert. Das Diagramm einer IDL-Wert-Kastenerklärung besteht aus: ? die Erklärung eines allgemeinen Zuganges zur zu boxenden Art. ? ein instantiation CORBA.Value.Box wenn die zu boxende und erklärt ist Art machen Sie Art als Aktualparameter des instantiation zugänglich. Der Name von instantiated Paket wird gebildet, indem man _ Value_Box hinzufügt zum IDL-Bezeichner für den Wert Kasten. Ableitung des ? A von Box_Ref schreiben Sie vom instantiation mit dem Namen, der von abgebildet wird der Bezeichner des Wertkastens. Dieses hat den Effekt des Vorstellens der Art und sein Betriebe in den ursprünglichen Namensbereich. Z.B. das folgende IDL: // IDL Modulbeispiel { sequence<Long valuetypeLongSeq >; Schnittstellenstab { leeres doit(in LongSeq seq1); }; }; Diagramme: