|
|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 Tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 472 (0x1d8)
Types: TextFile
Names: »V«
└─⟦bdeee703f⟧ Bits:30000538 8mm tape, Rational 1000, RWI 10_1_1
└─⟦545705153⟧ »DATA«
└─⟦f9289093d⟧
└─⟦5f3412b64⟧ Bits:30000745 8mm tape, Rational 1000, ENVIRONMENT 12_6_5 TOOLS
└─⟦91c658230⟧ »DATA«
└─⟦f9289093d⟧
└─⟦this⟧
package Rwi_String is
------------------------------------------------------------------------------
-- Heap String - Ada can't construct aggregates using string literals and Ada
-- can't use a function in the same spec that defines the function. This is
-- used by the Release module.
------------------------------------------------------------------------------
type Heap_String is access String;
function Hs (S : String) return Heap_String;
end Rwi_String;