diff --git a/racket/typed/prim.rkt b/racket/typed/prim.rkt index ed99767..ee261a4 100644 --- a/racket/typed/prim.rkt +++ b/racket/typed/prim.rkt @@ -33,6 +33,7 @@ (define-primop positive? (→fn Int Bool)) (define-primop negative? (→fn Int Bool)) (define-primop current-inexact-milliseconds (→fn Int)) +(define-primop string=? (→fn String String Bool)) (define-primop bytes->string/utf-8 (→ ByteString (Computation (Value String) (Endpoints) (Roles) (Spawns)))) (define-primop string->bytes/utf-8 (→ String (Computation (Value ByteString) (Endpoints) (Roles) (Spawns))))