Merge pull request #4948 from unisonweb/fix/more-jit-misc

A couple more miscellaneous JIT issues

.github/workflows/ci.md

@@ -9,7 +9,7 @@ At a high level, the CI process is:
 Some version numbers that are used during CI:
 - `ormolu_version: "0.5.0.1"`
 - `racket_version: "8.7"`
-- `jit_version: "@unison/internal/releases/0.0.16"`
+- `jit_version: "@unison/internal/releases/0.0.17"`
 
 Some cached directories:
   - `ucm_local_bin` a temp path for caching a built `ucm`

.github/workflows/ci.yaml

@@ -20,7 +20,7 @@ on:
 env:
   ormolu_version: 0.5.2.0
   ucm_local_bin: ucm-local-bin
-  jit_version: "@unison/internal/releases/0.0.16"
+  jit_version: "@unison/internal/releases/0.0.17"
   jit_src_scheme: unison-jit-src/scheme-libs/racket
   jit_dist: unison-jit-dist
   jit_generator_os: ubuntu-20.04

scheme-libs/racket/unison/primops-generated.rkt

@@ -308,7 +308,7 @@
      (let ([bs (map reify-value (chunked-list->list bs0))]
            [tl (reference->typelink rf)])
        (cond
-         [(eqv? tl builtin-boolean:typelink)
+         [(equal? tl builtin-boolean:typelink)
           (cond
             [(not (null? bs))
              (raise

unison-src/transcripts-manual/gen-racket-libs.md

@@ -5,7 +5,7 @@ Next, we'll download the jit project and generate a few Racket files from it.
 
 ```ucm
 .> project.create-empty jit-setup
-jit-setup/main> pull @unison/internal/releases/0.0.16 lib.jit
+jit-setup/main> pull @unison/internal/releases/0.0.17 lib.jit
 ```
 
 ```unison

unison-src/transcripts-manual/gen-racket-libs.output.md

@@ -20,7 +20,7 @@ Next, we'll download the jit project and generate a few Racket files from it.
   
   🎉 🥳 Happy coding!
 
-jit-setup/main> pull @unison/internal/releases/0.0.16 lib.jit
+jit-setup/main> pull @unison/internal/releases/0.0.17 lib.jit
 
   Downloaded 15091 entities.