Add an UNSPEC_PROLOGUE_USE to prevent the link register from being considered dead.
[official-gcc.git] / gcc / ada / a-nscoty.ads
blobde851c01c59c652a76cb1d13ed3aa0eb5537ddfe
1 ------------------------------------------------------------------------------
2 -- --
3 -- GNAT RUNTIME COMPONENTS --
4 -- --
5 -- A D A . N U M E R I C S . S H O R T _ C O M P L E X _ T Y P E S --
6 -- --
7 -- S p e c --
8 -- --
9 -- --
10 -- This specification is adapted from the Ada Reference Manual for use with --
11 -- GNAT. In accordance with the copyright of that document, you can freely --
12 -- copy and modify this specification, provided that if you redistribute a --
13 -- modified version, any changes that you have made are clearly indicated. --
14 -- --
15 ------------------------------------------------------------------------------
17 with Ada.Numerics.Generic_Complex_Types;
19 package Ada.Numerics.Short_Complex_Types is
20 new Ada.Numerics.Generic_Complex_Types (Short_Float);
22 pragma Pure (Short_Complex_Types);