1 files changed, 88 insertions, 0 deletions

diff --git a/src/A.c b/src/A.c
new file mode 100644
index 0000000..751de8c
--- /dev/null
+++ b/src/A.c
@@ -0,0 +1,88 @@
+# include <stdlib.h>
+# include "A.h"
+
+/*
+ *      node constructor functions
+ */
+
+/* A_CompoundStm - returns a compound statement of stm1, stm2 */
+A_stm A_CompoundStm (A_stm stm1, A_stm stm2) {
+        A_stm s                         = malloc(sizeof(*s));
+        s->type                         = A_compoundStm;
+        s->u.compound.stm1      = stm1;
+        s->u.compound.stm2      = stm2;
+        return s;
+}
+
+/* A_AssignStm - returns a assign statement of id, exp */
+A_stm A_AssignStm (char *id, A_exp exp) {
+        A_stm s                 = malloc(sizeof(*s));
+        s->type                 = A_assignStm;
+        s->u.assign.id  = id;
+        s->u.assign.exp = exp;
+        return s;
+}
+
+/* A_PrintStm - returns a print statement of exps */
+A_stm A_PrintStm (A_expList exps) {
+        A_stm s                 = malloc(sizeof(*s));
+        s->type                 = A_printStm;
+        s->u.print.exps = exps;
+        return s;
+}
+
+/* A_IdExp - returns an id expression of id */
+A_exp A_IdExp (char *id) {
+        A_exp e = malloc(sizeof(*e));
+        e->type = A_idExp;
+        e->u.id = id;
+        return e;
+}
+
+/* A_NumExp - returns a number expression of num */
+A_exp A_NumExp (int num) {
+        A_exp e         = malloc(sizeof(*e));
+        e->type         = A_numExp;
+        e->u.num        = num;
+        return e;
+}
+
+/* A_OpExp - returns an operation expression of exp1, op, exp2 */
+A_exp A_OpExp (A_exp exp1, A_binop op, A_exp exp2) {
+        A_exp e                 = malloc(sizeof(*e));
+        e->type                 = A_opExp;
+        e->u.op.exp1    = exp1;
+        e->u.op.op              = op;
+        e->u.op.exp2    = exp2;
+        return e;
+}
+
+/* A_EseqExp - returns a seqeunce expression of stm, exp */
+A_exp A_EseqExp (A_stm stm, A_exp exp) {
+        A_exp e                 = malloc(sizeof(*e));
+        e->type                 = A_eseqExp;
+        e->u.eseq.stm   = stm;
+        e->u.eseq.exp   = exp;
+        return e;
+}
+
+/* A_PairExpList - returns a list expression pair of head, tail */
+A_expList A_PairExpList (A_exp head, A_expList tail) {
+        A_expList l             = malloc(sizeof(*l));
+        l->type                 = A_pairExpList;
+        l->u.pair.head  = head;
+        l->u.pair.tail  = tail;
+        return l;
+}
+
+/* A_LastExpList - returns a expression list end of last */
+A_expList A_LastExpList (A_exp last) {
+        A_expList l     = malloc(sizeof(*l));
+        l->type         = A_lastExpList;
+        l->u.last       = last;
+        return l;
+}
+
+int main (int argc, char** argv) {
+        return 0;
+}