For this part, maybe there's more efficient way:
----------------------------------------------------------------
(define (get-bytevector-u32 port) "Read a 4-byte big-endian number."
(car (bytevector->uint-list (get-bytevector-n port 4)
(current-endianness) 4)))
------------------------------------
(bytevector-u32-ref (get-bytevector-n port 4) 0 (native-endianess))
If you want to base on Hoot, maybe it's OK to implement your own
(current-endianess) as you showed. And I think it's Hoot's work to compile
it to WASM
Not sure if it's possible to just reuse (native-endianess) of Guile.
On Sat, Dec 21, 2024 at 9:14 PM Nala Ginrut <nalagin...@gmail.com> wrote:
> I see, it's in *unimplemented-bindings of guile.scm, that's why I grep
> 'gettext' and it exists!
>
> Best regards.
>
> On Sat, Dec 21, 2024 at 8:46 PM Vivien Kraus <viv...@planete-kraus.eu>
> wrote:
>
>> Hello!
>>
>> Le samedi 21 décembre 2024 à 20:18 +0900, Nala Ginrut a écrit :
>> > Maybe not complete yet, but it contains gettext, and G_ is its short
>> > hand.
>> > I saw you implemented a simple G_ macro, is there any reason that it
>> > can't meet your requirements? Or you just happend to not know it
>> > exited in Hoot?
>>
>> Maybe I did not look in the correct place? As far as I understand, the
>> implementation in Hoot for (ice-9 i18n) is this:
>>
>> https://gitlab.com/spritely/guile-hoot/-/blob/main/lib/ice-9/i18n.scm?ref_type=heads
>>
>> It does not contain any meaningful implementation of gettext, and this
>> file claims that i18n is not supported yet.
>>
>> Vivien
>>
>
