2 - Amiga Magazine Online

BERNARDO INNOCENTI
OM-SET e OM-GET
Implementazione e uso
delle classi Boopsi
Usando il metodo OM-SET è possibile impostare contemporaneamente
diversi attributi, alcuni dei quali possono essere
ereditati da una delle superclassi dell'oggetto. I1 dispatcher
deve analizzare uno per volta gli attributi contenuti
nella TagList del messaggio opSet e per ognuno di essi
decide cosa fare. Se la TagList - contiene degli attributi sconosciuti,
il dispatcher deve passarla alla propria superclasse
in modo che abbia la possibilità di aggiornare di conse-
Il dispatcher (parte III)
nere una variabile LONG, e tutti i tipi di dimensione inferio-
re devono essere promossi a LONG. Se l'attributo richiesto
non viene riconosciuto, il dispatcher deve sottoporre il mes
saggio OM-GET alla propria superclasse. La documentazio-
ne sul codice di ritorno corretto per questo metodo è con-
traddittoria: l'autodoc di GetAttr() sostiene che la funzione
ritorna FALSE quando I'attributo non è stato riconosciuto,
mentre l'appendice B del RKRM dichiara che il risultato di
OM-GET non è definito. Nel dubbio, conviene attenersi
all'autodoc di GetAttrs( ) e ritornare un valore diverso da ze-
ro per gli attributi riconosciuti &l dispatcher.
Notifica
guenza i dati contenuti nella propria istanza. Si veda il Listato
2.
I1 sistema di notifica Boopsi permette di trasmettere a un
oggetto, detto turget, tutti i cambiamenti che avvengono
I1 risultato di OM-SET non è definito esplicitamente, ma in
genere le classi ritornano il valore O quando gli attributi impostati
non hanno causato alcun
negli attributi di un altro oggetto. I tre elementi che entrano
in gioco nella notifica sono:
cambiamento visivo nell'oggetto,
un valore diverso da zero in caso
contrario.
Object * MYCLASS-OMNew(C1ass *cl, Class *trueclass, struct opSet *msg)
i
Object *obj;
OM-GET è il metodo che permette
alle applicazioni di leggere il valore
di un attributo. Viene invocato uti-
/* Passa il messaggio OM-NEW alla superclasse */
obj = DoSuperMethodA (cl, (Object *)trueclass, (Msg) msg);
lizzando la funzione di Intuition i£ (obj)
GetAttr( ). Il messaggio associato a
{
questo metodo è così definito:
struct MyClassData *myclassdata;
/* Ottiene il puntatore ai dati dell'istanza */
struct opGet
{
ULONG MethodID;
ULONG opgAt tr ID ;
myclassdata = (struct MyClassData *) INST-DATA (cl, obj);
/* Inizializza i dati dell'istanza */
myclassdata->Attributo1 = GetTagData (
MYCLASS-Attributol, ATTRIBUTOl-DEFAULT, msg->opsAttrList);
myclassdata->Attributo? = GetTagData (
>
ULONG *opg_Storage;
MYCLASSAttributo2, ATTRIBUT02_DEFAULT, msg->opsAttrList);
...
I1 dispatcher deve copiare nel buf-
1
return obj;
fer puntato da opg-Storage il valore
dell'attributo opg-AttrID. Per
}
convenzione il buffer fornito deve
essere abbastanza grande da conte-
Listato I.