Re: Ada and string literals

[codeallergy <romainbeckers@gmail.com>]

Thanks for answering.

i reversed the generated code. when u use a literal as a argument like this

    Put_Line("HELLO");
    Abc("HELLO");

the same string from the data section is shared. when you use constants from a package like this

    package Abc is
        str1 : aliased constant String : "LITERAL";
        str2 : aliased constant String : "LITERAL";
    end Abc;

strings are duplicated and put into the data section, aliased or not. when you use constant from a procedure header (dunno how u name that) like this

    procedure Abc
    is
        str1 : aliased constant String : "LITERAL";
    begin
        null;
    end Abc;

if the constant is aliased, the constant is not put into the data section but "hardcoded" and push on the stackframe like this:

    .text:00401FA2  mov dword ptr [ebp-104h], 1
    .text:00401FAC  mov dword ptr [ebp-100h], 7
    .text:00401FB6  mov dword ptr [ebp-0FCh], 4554494Ch ; 4C49544552414C = "LITERAL"
    .text:00401FC0  mov word ptr [ebp-0F8h], 4152h
    .text:00401FC9  mov byte ptr [ebp-0F6h], 4Ch

if not aliased the constant is put into the data section.

    - Rom B.