1 package body Opt67_Pkg
is
3 function Make_TSS_Name
(Typ
: Entity_Id
; Nam
: TNT
) return Name_Id
is
8 function Stream_Operation_OK
(N
: Entity_Id
; Name
: TNT
) return Boolean is
13 procedure Append_To
(N1
: Natural; N2
: Node_Id
) is
18 function Predef
(Loc
: Source_Ptr
; Name
: Name_Id
; E
: Entity_Id
)
24 function Init
return Natural is