/* Test the new PackChar/PackFloat creation methods */ proc main() { var a, b; a = new PackChar(4); b = new PackFloat(2); a[0] = 'h'; a[1] = 'i'; a[2] = '!'; a[3] = '\n'; say(a); b[1] = 1.0; say(b[0], ", ", b[1], "\n"); }