Implement +, * and - primitives

lib/include/am.h

@@ -5,8 +5,8 @@
 
 #define AM_STACK_SIZE 128U
 
-typedef struct {
-	expr_t *env, *expr, *val;
+typedef struct am {
+	expr_t *argl, *env, *expr, *val;
 	expr_t **sp, *stack[AM_STACK_SIZE];
 } am_t;
 

lib/include/prim.h

@@ -0,0 +1,10 @@
+#ifndef PRIM_H
+#define PRIM_H
+
+#include "am.h"
+#include "expr.h"
+#include "store.h"
+
+void prim_load(am_t *am, store_t *store);
+
+#endif