diff --git a/pkgs/racket-test/tests/racket/glib-log.rkt b/pkgs/racket-test/tests/racket/glib-log.rkt index 18232b65f5..3c9523d6ba 100644 --- a/pkgs/racket-test/tests/racket/glib-log.rkt +++ b/pkgs/racket-test/tests/racket/glib-log.rkt @@ -54,7 +54,8 @@ (define (make s) (define p (malloc (add1 (bytes-length s)) 'raw)) - (memcpy p s (add1 (bytes-length s))) + (memcpy p s (bytes-length s)) + (ptr-set! p _byte (bytes-length s) 0) p) (define hello (make #"hello"))