/* iGASM example */
/* Writes previously entered string and reads another one,
        until entered "stop". */

functions
        s : String;
        
final
        s = "stop";
        
rules
        writeln := "Previous string: ";
        writeln := s;
        s := readln("Enter a string or \"stop\" to exit!");