lisp.c

	/* { 
	 * 	@t[0] = time();
	 * 	@reads[pid()] = quantize(arg2)
	 * }
	 */
	prog->ast =
		node_expr("",
			  node_expr("=",
				    node_expr("[]",
					      node_ident("@t"),
					      node_num(0),
					      NULL),
				    node_expr("time", NULL),
				    NULL),
			  node_expr("=",
				    node_expr("[]",
					      node_ident("@reads"),
					      node_expr("pid", NULL),
					      NULL),
				    node_expr("quantize", node_ident("arg2"), NULL),
				    NULL),
			  NULL);