Fix codepoint

2 files changed, 6 insertions, 1 deletions

diff --git a/src/gleam/string.gleam b/src/gleam/string.gleam
index 3f0ebe5..d9a97fe 100644
--- a/src/gleam/string.gleam
+++ b/src/gleam/string.gleam
@@ -650,7 +650,7 @@ if erlang {
 
 if javascript {
   external fn unsafe_int_to_utf_codepoint(Int) -> UtfCodepoint =
-    "../gleam_stdlib.js" "identity"
+    "../gleam_stdlib.js" "codepoint"
 }
 
 /// Converts an integer to a UtfCodepoint
diff --git a/src/gleam_stdlib.js b/src/gleam_stdlib.js
index da282fb..c7db142 100644
--- a/src/gleam_stdlib.js
+++ b/src/gleam_stdlib.js
@@ -3,6 +3,7 @@ import {
   Error,
   List,
   BitString,
+  UtfCodepoint,
   toBitString,
   stringBits,
 } from "./gleam.js";
@@ -223,3 +224,7 @@ export function bit_string_slice(bits, position, length) {
   let buffer = new Uint8Array(bits.buffer.buffer, start, Math.abs(length));
   return new Ok(new BitString(buffer));
 }
+
+export function codepoint(int) {
+  return new UtfCodepoint(int);
+}