genx
This commit is contained in:
@ -1,11 +1,9 @@
|
||||
(* TEST: [-asc -tc -cg -ir] *)
|
||||
#include "alpha.h"
|
||||
#include "alpha.h2"
|
||||
#include "alpha.h3"
|
||||
type main: integer -> integer
|
||||
function test: main
|
||||
|
||||
type main: string -> integer
|
||||
function entry: main
|
||||
|
||||
test (a) := {
|
||||
entry (arg) := {
|
||||
[integer:x; integer:y]
|
||||
y := 1;
|
||||
x := 3;
|
||||
|
Reference in New Issue
Block a user