Add basic Easync support to heptagon/*

Warning: While the project compiles, async code is not yet generated.

compiler/heptagon/analysis/initialization.ml

@@ -287,6 +287,7 @@ and apply h app e_list =
         let ty1 = typing h e1 in
         let _ = typing h e2 in
         itype ty1
+    (* FIXME(Arduino): voir si ajout nécessaire *)
     | Enode _ ->
        begin
          (* for nodes, force all inputs to be initialized *)

compiler/heptagon/parsing/hept_static_scoping.ml

@@ -69,7 +69,8 @@ let qualify_pervasive q =
 let static_app_from_app app args =
   match app.a_op with
     | Efun q
-    | Enode q ->
+    | Enode q
+    | Easync (q, _) ->
         let q = qualify_pervasive q in
         q, (app.a_params @ args)
     | _ -> raise Not_static