--  From the original bug report
with Ada.Strings.Unbounded
with C.Strings

with Interfaces.C.Strings
use Interfaces.C


--  Disimproved version
with Interfaces.C.Strings;
use Interfaces.C;

with Ada.Strings.Unbounded;
with C.Strings;