Re: compare a string variable with a string literal

[dale@cs.rmit.edu.au (Dale Stanbrough)]

Someone wrote:

" How do you compare a string variable with a string literal??  It's not
  working.
  
  Please post and email response if possible."


It does work very well. No doubt you are doing...

   X : string (1..100);
   Last : Natural;


...

   Get_Line (X, Last);


...

   if X = "hello" then...


this will of course return false, because a 5 character string cannot equal 
a 100 character string. Ada strings _do not_ work like C strings - there is
no terminating character at the end of the valid input.

If you want to store variable length strings then use ada.strings.unbounded...


   with ada.strings.unbounded; use ada.strings.unbounded;

   ...
   X : string (1..100);
   Last : Natural;

   Y  : unbounded_string;


   get_line (x, last);
   y : = to_unbounded_string (X (1..last));

   if y = "hello" then

this _will_ do what you want it to.


Dale