[Git][ghc/ghc][wip/js-staging] Implement putchar (fix cgrun015)

[Sylvain Henry (@hsyl20)]

Sylvain Henry pushed to branch wip/js-staging at Glasgow Haskell Compiler / GHC


Commits:
3c7fb646 by Sylvain Henry at 2022-09-26T14:47:28+02:00
Implement putchar (fix cgrun015)

- - - - -


1 changed file:

- libraries/base/jsbits/base.js


Changes:

=====================================
libraries/base/jsbits/base.js
=====================================
@@ -805,3 +805,12 @@ function h$stg_doubleToWord64zh(v) {
   var h = h$word_float_conv_buf.getUint32(0);
   RETURN_UBX_TUP2(h,l);
 }
+
+
+const h$putchar_buf = h$newByteArray(1);
+
+function h$putchar(c) {
+  h$putchar_buf.u8[0] = c;
+  h$base_write(1, h$putchar_buf, 0, 1, null);
+  return h$errno;
+}



View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/3c7fb6463c1101c33a6fa81c647213766e27308b

-- 
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/3c7fb6463c1101c33a6fa81c647213766e27308b
You're receiving this email because of your account on gitlab.haskell.org.


-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.haskell.org/pipermail/ghc-commits/attachments/20220926/3768543d/attachment.html>