Re: Contracts macro example

2022-07-20 Thread Zelphir Kaltstahl
Hello Maxime! On 7/19/22 17:20, Maxime Devos wrote: Zelphir Kaltstahl schreef op do 14-07-2022 om 23:55 [+]:   (make-assertion-failure)   (make-exception-with-message "assertion failed")   (make-exception-with-irritants (quote (op args* ...)] Instead of a gen

Re: Contracts macro example

2022-07-20 Thread Maxime Devos
On 20-07-2022 10:39, Zelphir Kaltstahl wrote: It would also be nice to define a global 'require' and 'ensure' and '' somewhere (e.g.: (define-syntax require (identifier-syntax (syntax-error "'require' can only be used as part of a contract construct", that way, require / ensure / can be ren

Re: UTF16 encoding adds BOM everywhere?

2022-07-20 Thread Mark H Weaver
Hi, Jean Abou Samra wrote: > With this code: > > (let ((p (open-output-file "x.txt"))) >   (set-port-encoding! p "UTF16") >   (display "ABC" p) >   (close-port p)) > > the sequence of bytes in the output file x.txt is > > ['FF', 'FE', '41', '0', 'FF', 'FE', '42', '0', 'FF', 'FE', '43', '0'

Re: UTF16 encoding adds BOM everywhere?

2022-07-20 Thread Jean Abou Samra
Hi Mark, Thanks for your reply! Le 20/07/2022 à 22:42, Mark H Weaver a écrit : Hi, No, this is certainly a bug. It sounds like the 'at_stream_start_for_bom_write' port flag is not being cleared, as it should be, after the first character is written. I suspect that it worked correctly when I