6 lines
192 B
Ada
6 lines
192 B
Ada
generic
|
|
type Source (<>) is limited private;
|
|
type Target (<>) is limited private;
|
|
function Unchecked_Conversion (S : Source) return Target
|
|
with Pure, Import, Convention => Intrinsic;
|