xref: /csrg-svn/old/dbx/tests/mod/assign.mod (revision 44108)
1*44108Sbosticmodule main;
2*44108Sbosticfrom io import Writef, output;
3*44108Sbosticvar a : array[1..100] of char;
4*44108Sbosticbegin
5*44108Sbostic    a := "blah";
6*44108Sbostic    Writef(output, "%s", a);
7*44108Sbosticend main.
8