RosettaCodeData/Task/Reverse-a-string/Sather/reverse-a-string.sa

class MAIN is
  main is
    s ::= "asdf";
    reversed ::= s.reverse;
    -- current implementation does not handle multibyte encodings correctly
  end;
end;