native: add http module

di/import_test.go

@@ -96,6 +96,10 @@ func TestEvalKernelImportError(t *testing.T) {
 			`import("notfound")`,
 			object.NewFileNotFoundErr("failed to read native module \"notfound\": open modules/notfound.pangaea: file does not exist"),
 		},
+		{
+			`import("dummy_native_wrong")`,
+			object.NewSyntaxErr("failed to parse"),
+		},
 	}
 
 	for _, tt := range tests {

native/modules/dummy_native_wrong.pangaea

@@ -0,0 +1 @@
+1 +

native/modules/http.pangaea

@@ -0,0 +1,24 @@
+_internal := import("http/internal")
+
+Response := {
+  new: _init('status, 'body, 'headers),
+}
+
+Client := {
+  get: m{|url, headers: {}, queries: {}|
+    _internal['request](method: 'GET, url: url, headers: headers, queries: queries).{self._toResponse(\)}
+  },
+  post: m{|url, headers: {}, body: ""|
+    _internal['request](method: 'POST, url: url, headers: headers, body: body).{self._toResponse(\)}
+  },
+  put: m{|url, headers: {}, body: ""|
+    _internal['request](method: 'PUT, url: url, headers: headers, body: body).{self._toResponse(\)}
+  },
+  delete: m{|url, headers: {}, queries: {}|
+    _internal['request](method: 'DELETE, url: url, headers: headers, queries: queries).{self._toResponse(\)}
+  },
+  patch: m{|url, headers: {}, body: ""|
+    _internal['request](method: 'PATCH, url: url, headers: headers, body: body).{self._toResponse(\)}
+  },
+  _toResponse: m{|r| Response.new(r.status, r.body, r.headers)},
+}