class GET_MAIN_SIG < $GET_MAIN_SIG

****	This phase determines the signature of main.

---

Flattened version is here

---

Ancestors

$GET_MAIN_SIG

CS_COMPONENT

---

Public

Readable Attributes

attr main_sig:SIG;

****	The signature of `main'.

Writable Attributes

attr main_sig:SIG;

****	The signature of `main'.

Features

create(p:PROG):SAME

get_main_sig(nm:STR)

****	Get the signature of the main routine in the class named `nm' and put it in `main_sig'.

---