Re: avoiding builtin memset

[Shark8 <onewingedshark@gmail.com>]

I suppose you could try this:

    Procedure Memset(
       Address : System.Address;
       Value   : System.Storage_Elements.Storage_Element;
       Length  : Natural
      ) is
	Use System.Storage_Elements;
	Memory : Storage_Array(1..Storage_Offset(Length))
	  with Import, Address => Address;
    Begin
	For Element of Memory loop
	    Element := Value;
	end loop;
    End Memset;