Merge pull request #5333 from unisonweb/topic/jit-trace

Various fixes that enable running cloud on the JIT

.github/workflows/ci.yaml

@@ -14,7 +14,7 @@ on:
 env:
   ## Some version numbers that are used during CI
   ormolu_version: 0.7.2.0
-  jit_version: "@unison/internal/releases/0.0.18"
+  jit_version: "@unison/internal/releases/0.0.19"
   runtime_tests_version: "@unison/runtime-tests/main"
 
   ## Some cached directories

scheme-libs/racket/unison-runtime.rkt

@@ -118,9 +118,9 @@
 (define ((eval-exn-handler port) rq)
   (request-case rq
     [pure (result) (encode-success result port)]
-    [ref-exception:typelink
+    [ref-exception
       [0 (fail)
-        (control ref-exception:typelink k
+        (control ref-exception k
           (encode-exception fail port))]]))
 
 ; Implements the evaluation mode of operation. First decodes the
@@ -134,7 +134,7 @@
       ([exn:bug? (lambda (e) (encode-error e out))])
 
       (parameterize ([current-command-line-arguments args])
-        (handle [ref-exception:typelink] (eval-exn-handler out)
+        (handle [ref-exception] (eval-exn-handler out)
                 ((termlink->proc main-ref)))))))
 
 ; Uses racket pretty printing machinery to instead generate a file
@@ -147,7 +147,7 @@
       (parameterize ([print-as-expression #t])
         (display "#lang racket/base\n\n" port)
 
-        (for ([expr (build-intermediate-module main-ref icode)])
+        (for ([expr (build-intermediate-module #:profile #f main-ref icode)])
           (pretty-print expr port 1)
           (newline port))
         (newline port)))