DataMuseum.dk

top - download

    Length: 692 (0x2b4)
    Types: TextFile
    Names: »B«

└─⟦afbc8121e⟧ Bits:30000532 8mm tape, Rational 1000, MC68020_OS2000 7_2_2
    └─ ⟦77aa8350c⟧ »DATA« 
        └─⟦f794ecd1d⟧ 
            └─⟦4c85d69e2⟧ 
                └─⟦this⟧ 

TextFile

procedure Unchecked_Deallocation (X : in out Name) is  
    Bad_Lrm_Unchecked_Deallocation : exception;
    -- Normally the compiler caches the trees for Unchecked_Conversion and
    -- Unchecked_Deallocation and uses these cached values to detect that
    -- an instantiation is of one of these pre-defined generics.  However,
    -- if an instantiation is done in the same run of the compiler as the
    -- coding of the generic, then the cached values are not valid and the
    -- the compiler incorrectly generates out of line code.  If this
    -- situation happens, the above exception will be raised.
    --
begin
    raise Bad_Lrm_Unchecked_Deallocation;
end Unchecked_Deallocation;