[Oberon] In.Real not working

Duke Normandin dukeofpurl at gmx.com
Fri Apr 9 17:01:52 CEST 2021


[code]
In.Int(choice);

CASE  choice OF
   1 : Out.String('Enter a number/temperature TO convert: ');
       In.Real(temp);
       Out.Ln;Out.String("Your input was ");Out.Real(temp,3);Out.String(" Fahrenheit!");Out.Ln;
       Out.String("That's "); Out.Real( fahr2cels(temp),3);Out.String(" In Celsius!");

|  2 : Out.String("Enter a number/temperature TO convert: ");
       In.Real(temp);
       Out.Ln;Out.String("Your input was ");Out.Real(temp,3);Out.String(" Celsius!");Out.Ln;
       Out.String("That's "); Out.Real(cels2fahr(temp),3);Out.String(" In Fahrenheit!");
ELSE  Out.String("Sorry! Invalid Choice");
END;
Out.Ln;
[/code]

My program compiles w/o errors. However, In.Real(temp) in each CASE alternative never seems to wait for user input. The entire block of code for the selected "choice" gets output with garbage (of course) values.

I'm stuck!  Again!! :)  Thx for any clues!
--
Duke Normandin <dukeofpurl at gmx.com>


More information about the Oberon mailing list