@scriptc/compiler 0.0.12 → 0.0.13

package/dist/backend/llvm/emitter.js

@@ -226,6 +226,9 @@ const LIB_FN_SYMS = {
     "text.decode": "scr_text_decode",
     "zlib.deflateSync": "scr_zlib_deflate",
     "zlib.inflateSync": "scr_zlib_inflate",
+    // The CA-store read (tlsca.get/set are may-throw seeds and refuse by
+    // omission — the C fallback carries them).
+    "tlsca.root": "scr_tls_ca_root",
     "crypto.randomBytes": "scr_crypto_random_bytes",
     "crypto.randomBytesToString": "scr_crypto_random_string",
     "crypto.randomUUID": "scr_crypto_random_uuid",
@@ -350,6 +353,7 @@ const LIB_FN_SYMS = {
     "dyn.iterPack": "scr_dyn_iter_pack",
     "dyn.arrLen": "scr_dyn_arr_len",
     "dyn.arrAt": "scr_dyn_arr_at",
+    "dyn.hasKey": "scr_dyn_has_key",
     "dyn.defineProps": "scr_dyn_define_props",
     "dyn.typeof": "scr_dyn_typeof",
     "dyn.toString": "scr_dyn_to_string_method",
@@ -446,6 +450,12 @@ const LIB_FN_SYMS = {
     "net.sockSetEncoding": "scr_net_sock_set_encoding",
     "net.sockSetTimeout": "scr_net_sock_set_timeout",
     "net.sockUnshift": "scr_net_sock_unshift_bytes",
+    "net.sockPause": "scr_net_sock_pause",
+    "net.sockResume": "scr_net_sock_resume",
+    "net.sockSetNoDelay": "scr_net_sock_set_nodelay",
+    "net.sockDestroySoon": "scr_net_sock_destroy_soon",
+    "net.sockBytesWritten": "scr_net_sock_bytes_written",
+    "net.sockReadable": "scr_net_sock_readable",
     "net.sockPipeRes": "scr_http_sock_pipe_res",
     "net.serverEmitConnection": "scr_net_server_emit_connection",
     "net.getAutoSelTimeout": "scr_net_get_autosel_timeout",
@@ -492,6 +502,7 @@ const LIB_FN_SYMS = {
     "http.clientDestroy": "scr_http_client_destroy",
     "http.clientDestroyed": "scr_http_client_destroyed",
     "http2.streamUndefCall": "scr_http2_stream_undef_call",
+    "http.agentNew": "scr_http_agent_new",
     // The island surface (--dynamic): eval/import bridge catchably (the
     // may-throw seed's pending check); importDyn answers an engine promise
     // and never throws itself. insp.jsval throws on composite island
@@ -556,6 +567,9 @@ const LIB_FN_SYMS = {
     "process.offWarning": "scr_process_off_warning",
     "process.emitWarning": "scr_process_emit_warning",
     "process.onUnhandledRejection": "scr_process_on_unhandled_rejection",
+    "process.offUnhandledRejection": "scr_process_off_unhandled_rejection",
+    "process.onRejectionHandled": "scr_process_on_rejection_handled",
+    "process.offRejectionHandled": "scr_process_off_rejection_handled",
     // The await lowering's loop hop and the dyn await (both park the
     // current fiber — USES_TIMERS_LIB_FNS marks the loop live).
     "async.hop": "scr_await_hop",
@@ -633,12 +647,13 @@ const USES_TIMERS_LIB_FNS = new Set([
     "http.createServer", "http.createServerEmpty",
     "http.request", "http.requestCb", "http.requestUrl", "http.requestUrlCb",
     "http.requestConn", "http.requestConnCb",
+    "http.agentNew", "http.requestAgent", "http.requestAgentCb",
     // The dyn-async slice (emit-exprs.ts's markings): fiber parks, the
     // microtask/immediate mints, the tracing-promise reaction fiber, and
     // the loop-end unhandled-rejection report.
     "async.hop", "async.awaitDyn",
     "dc.tcTracePromise",
-    "process.onUnhandledRejection",
+    "process.onUnhandledRejection", "process.onRejectionHandled",
     "timers.queueMicrotaskDyn", "timers.setImmediateFnValue", "timers.immediatePromise",
 ]);
 /** ScrBytesElem (scr_runtime.h): U8, U32, F32, I32. */
@@ -4199,8 +4214,21 @@ class LlEmitter {
                 const lj = B.newLabel("ord.j");
                 B.condBr(truthy, lt, lf);
                 B.startBlock(lt);
-                B.line(`store ${ty} ${this.unionExtract(l.name, e.type)}, ptr ${slot}`);
-                this.releaseValue(l.name, e.left.type);
+                if (e.retag !== undefined) {
+                    // Retagged shape: the whole box goes to the union→union helper,
+                    // which CONSUMES it (callees own their params) — no release on
+                    // this side. The store precedes the pending check so an unwind
+                    // leaves only the NULL dummy behind, in a slot nothing reads.
+                    const t = B.tmp();
+                    B.line(`${t} = call ${ty} @${this.callTarget(e.retag)}(${this.llType(e.left.type)} ${l.name})`);
+                    B.line(`store ${ty} ${t}, ptr ${slot}`);
+                    if (this.mayThrow.has(e.retag))
+                        this.emitPendingCheck();
+                }
+                else {
+                    B.line(`store ${ty} ${this.unionExtract(l.name, e.type)}, ptr ${slot}`);
+                    this.releaseValue(l.name, e.left.type);
+                }
                 B.br(lj);
                 B.startBlock(lf);
                 this.releaseValue(l.name, e.left.type);
@@ -10598,9 +10626,11 @@ class LlEmitter {
             B.line(`call void @${entry}(ptr ${args[0].name}, ptr ${args[1].name}, ptr @${adapter}, i1 ${args[2].name})`);
             return { name: "", type: e.type };
         }
-        if (e.fn === "http.request" || e.fn === "http.requestCb" || e.fn === "http.requestUrl" || e.fn === "http.requestUrlCb") {
+        if (e.fn === "http.request" || e.fn === "http.requestCb" || e.fn === "http.requestUrl" || e.fn === "http.requestUrlCb" ||
+            e.fn === "http.requestAgent" || e.fn === "http.requestAgentCb") {
             const isUrl = e.fn.startsWith("http.requestUrl");
-            const cbIdx = isUrl ? 3 : 7;
+            const isAgent = e.fn.startsWith("http.requestAgent");
+            const cbIdx = isUrl ? 3 : isAgent ? 8 : 7;
             const hasCb = e.fn.endsWith("Cb");
             const args = e.args.map((a) => this.emitExpr(a));
             let cb = "null";
@@ -10617,7 +10647,7 @@ class LlEmitter {
             }
             const head = args.slice(0, cbIdx);
             const decls = head.map((a) => (this.llType(a.type) === "i1" ? "i1 zeroext" : this.llType(a.type)));
-            const entry = isUrl ? "scr_http_request_url" : "scr_http_request";
+            const entry = isUrl ? "scr_http_request_url" : isAgent ? "scr_http_request_agent" : "scr_http_request";
             this.declare(`declare ptr @${entry}(${[...decls, "ptr", "ptr"].join(", ")})`);
             const t = B.tmp();
             B.line(`${t} = call ptr @${entry}(${[...head.map((a) => `${this.llType(a.type)} ${a.name}`), `ptr ${cb}`, `ptr ${adapter}`].join(", ")})`);
@@ -10652,6 +10682,13 @@ class LlEmitter {
             B.line(`call void @scr_http_res_on_finish(ptr ${args[0].name}, ptr ${args[1].name})`);
             return { name: "", type: e.type };
         }
+        if (e.fn === "net.sockOnFinish") {
+            const args = e.args.map((a) => this.emitExpr(a));
+            this.moveTemp(args[1]);
+            this.declare(`declare void @scr_net_sock_on_finish(ptr, ptr)`);
+            B.line(`call void @scr_net_sock_on_finish(ptr ${args[0].name}, ptr ${args[1].name})`);
+            return { name: "", type: e.type };
+        }
         if (e.fn === "island.castFail") {
             // The deferred boundary failure: the island value was evaluated
             // (its side effects are real), the throw is unconditional