awa_unit_2.4.0_59135a52/ada-keystore/ada-fuse/examples/rotfs/src/rot_13.ads

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
with Interfaces.C.Strings;

package Rot_13 is

   function Encrypt (Plaintext : String)
      return String;

   function Encrypt (Plaintext : Interfaces.C.Strings.chars_ptr)
      return Interfaces.C.Strings.chars_ptr;

end Rot_13;