testwritechar.mod\pass\run\pimlib\gm2\testsuite\gcc - riscv-gnu-toolchain/gcc.git - Unnamed repository; edit this file 'description' to name the repository.

index : riscv-gnu-toolchain/gcc.git

Unnamed repository; edit this file 'description' to name the repository.

root

about summary refs log tree commit diff

path: root/gcc/testsuite/gm2/pimlib/run/pass/testwritechar.mod

blob: c2f739de6449dac527ea54156cea3e77a794c9dc (plain)

MODULE testwritechar ;

IMPORT CHAR ;
FROM FIO IMPORT StdOut ;

BEGIN
   CHAR.Write (StdOut, 'h') ;
   CHAR.Write (StdOut, 'e') ;
   CHAR.Write (StdOut, 'l') ;
   CHAR.Write (StdOut, 'l') ;
   CHAR.Write (StdOut, 'o') ;
   CHAR.WriteLn (StdOut)
END testwritechar.