MODULE test EXPORTS Main;

IMPORT Text;

VAR
  foo := NEW(REF ARRAY OF CHAR, 10);
  bar := Text.FromChars(foo);  (* should be foo^ !!!*)

BEGIN
END test.