20 lines
396 B
Plaintext
20 lines
396 B
Plaintext
#include "std.alpha"
|
|
|
|
type main: string -> integer
|
|
function entry: main
|
|
|
|
(* maybe some other type definitions *)
|
|
|
|
entry(arg) := {
|
|
[ string: one_name; string: another_name ]
|
|
|
|
one_name := "a string literal";
|
|
|
|
another_name := reserve another_name(4);
|
|
another_name(0) := 'C';
|
|
another_name(1) := 'a';
|
|
another_name(2) := 'r';
|
|
another_name(3) := 'l';
|
|
|
|
return 0;
|
|
} |