CekState record optimization + profiling: 1.5x speedup, root cause found

Transpiler (transpiler.sx): detects CEK state dict literals (5 fields:
control/env/kont/phase/value) and emits CekState OCaml record instead
of Dict(Hashtbl). Eliminates 200K Hashtbl allocations per page.

Bootstrapper: skip stdlib.sx (functions already registered as OCaml
primitives). Only transpile evaluator.sx.

Runtime: get_val handles CekState with direct field access. type_of
returns "dict" for CekState (backward compat).

Profiling results (root cause of slowness):
  Pure eval: OCaml 1.6x FASTER than Python (expected)
  Aser: OCaml 28x SLOWER than Python (unexpected!)

Root cause: Python has a native optimized aser. OCaml runs the SX
adapter-sx.sx through the CEK machine — each aserCall is ~50 CEK
steps with closures, scope operations, string building.

Fix needed: native OCaml aser (like Python's), not SX adapter
through CEK machine.

Co-Authored-By: Claude Opus 4.6 (1M context) <noreply@anthropic.com>

hosts/ocaml/lib/sx_runtime.ml

@@ -74,6 +74,11 @@ let sx_dict_set_b d k v =
 (** Get from dict or list. *)
 let get_val container key =
   match container, key with
+  | CekState s, String k ->
+    (match k with
+     | "control" -> s.cs_control | "env" -> s.cs_env
+     | "kont" -> s.cs_kont | "phase" -> String s.cs_phase
+     | "value" -> s.cs_value | _ -> Nil)
   | Dict d, String k -> dict_get d k
   | Dict d, Keyword k -> dict_get d k
   | (List l | ListRef { contents = l }), Number n ->
@@ -370,3 +375,7 @@ let strip_prefix s prefix =
     then String (String.sub s pl (String.length s - pl))
     else String s
   | _ -> s
+
+(* debug_log — no-op in production, used by CEK evaluator for component warnings *)
+let debug_log _ _ = Nil
+