Re: Ada and string literals

[codeallergy <romainbeckers@gmail.com>]

Okay. assuming dat we use GNAT 2012

Literal1 : aliased constant String := "LITERAL"; 
Literal2 : aliased constant String := "LITERAL"; 
Literal3 : aliased constant String := "LITERAL"; 

how the above code is handled ?

compiler duplicate the string three times into the data section or
the three constants will share the same string or
one string into the data section but duplicated at the run time ?



another question: how free a object from a procedure ?
 
example:
procedure Free_Abc (Target : access String)
is
begin
   GNAT.Strings.Free(Target); -- error
end Free_Abc;

this code produce the error: actual for "X" must be a variable

why disallow that ?

thanks,
    Rom B.