Natools

Differences From Artifact [a7ad3f6741]:

• File natools-chunked_strings.adb — part of check-in [99dd3c799b] at 2011-11-29 14:39:57 on branch trunk — natools-chunked_strings: new package for efficient storage and append on large strings (user: nat, size: 71953) [annotate] [blame] [check-ins using]
• File src/natools-chunked_strings.adb — part of check-in [fb1e9e5c96] at 2011-12-09 22:56:32 on branch trunk — Separation of library source and test code into distinct directories (user: nat, size: 71953) [annotate] [blame] [check-ins using]

To Artifact [56171a6910]:

• File src/natools-chunked_strings.adb — part of check-in [c4b3d85973] at 2013-09-11 19:45:37 on branch trunk — chunked_strings: fix size after Hard_Reset (user: nat, size: 71974) [annotate] [blame] [check-ins using]

786
787
788
789
790
791
792

793
794
795
796
797
798
799

786
787
788
789
790
791
792
793
794
795
796
797
798
799
800

+

                             Data            => Data);
   end Duplicate;



   procedure Hard_Reset (Str : in out Chunked_String) is
   begin
      Str.Size := 0;
      Free (Str.Data);
   end Hard_Reset;



   procedure Soft_Reset (Str : in out Chunked_String) is
   begin