MODULE Gap09ScalarToByteArray;
(* NOT standard Modula-2: passing a scalar actual for an ARRAY OF BYTE
   formal (gm2's "untyped byte buffer").  Class: gm2-ext.
   Corpus: aochar, arrayofbyte, bytearray.
   V3: invalid call. *)
FROM SYSTEM IMPORT BYTE;
PROCEDURE bytes(b : ARRAY OF BYTE); BEGIN END bytes;
VAR i : INTEGER;
BEGIN bytes(i) END Gap09ScalarToByteArray.