exp_dist.adb (Specific_Build_General_Calling_Stubs, [...]): New subprograms.
authorArnaud Charlet <charlet@gcc.gnu.org>
Wed, 8 Dec 2004 11:46:11 +0000 (12:46 +0100)
committerArnaud Charlet <charlet@gcc.gnu.org>
Wed, 8 Dec 2004 11:46:11 +0000 (12:46 +0100)
commitbd7f7a653fcfe6f9e6c62d18522d8792341cfd48
tree0950bd0e2dbb0871d4fd7b9aa078d529c09dbd82
parent14532762245860c7f5fef6cd83f283359590b22b
exp_dist.adb (Specific_Build_General_Calling_Stubs, [...]): New subprograms.

* exp_dist.adb (Specific_Build_General_Calling_Stubs,
Specific_Build_Stub_Target): New subprograms.
(Build_Subprogram_Calling_Stubs): Make this procedure independent from
the PCS implementation used, using the above PCS-customized subprograms.
Minor reformatting.
(PolyORB_Support.Helpers): New subunit containing supporting subprograms
for generation of DSA code targeted to the PolyORB PCS.
(Add_Stub_Type): Rewrite to isolate the parts that are specific to one
implementation of the partition communication subsystem in ancillary
subprograms.
(Specific_Build_Stub_Type, GARLIC_Support.Build_Stub_Type,
PolyORB_Support.Build_Stub_Type): New subrograms containing the
PCS-specific part of Add_Stub_Type.
(Insert_Partition_Check): Use runtime library function to perform
E.4(19) check.

        * rtsfind.ads: New entity System.PolyORB_Interface.Make_Ref
        (RE_Same_Partition): New entity, from s-parint.

        * s-parint.ads, s-parint.adb (Same_Partition): New subprogram.

From-SVN: r91884
gcc/ada/exp_dist.adb
gcc/ada/rtsfind.ads
gcc/ada/s-parint.adb
gcc/ada/s-parint.ads