---------------------------------------------------------------------- -- Title : CharAK -- Version : 1.0 -- Copyright : (C) 1994 David Wallace Croft. All rights reserved. -- Author : David Wallace Croft, CompuServe [76600,102] -- Compiler : standard Ada -- Description : Character type manipulation. ---------------------------------------------------------------------- package CharAK is ---------------------------------------------------------------------- ---------------------------------------------------------------------- function Char_to_Strg ( InChar: in character) return string; function Filter ( InChar: in character) return character; function Is_Natural ( InChar: in character) return boolean; function Upcase ( InChar: in character) return character; ---------------------------------------------------------------------- ---------------------------------------------------------------------- end CharAK;