From d618a8d616d5c1194998da1c6415d86133c0a99a Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Sat, 6 Jul 2013 07:20:44 -0600 Subject: [PATCH] fix an FFI test case --- pkgs/racket-pkgs/racket-test/tests/racket/foreign-test.rktl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/pkgs/racket-pkgs/racket-test/tests/racket/foreign-test.rktl b/pkgs/racket-pkgs/racket-test/tests/racket/foreign-test.rktl index 9f9b8de80d..ea708c07e7 100644 --- a/pkgs/racket-pkgs/racket-test/tests/racket/foreign-test.rktl +++ b/pkgs/racket-pkgs/racket-test/tests/racket/foreign-test.rktl @@ -512,7 +512,7 @@ (test 2.2t0 ptr-ref (ptr-add (extflvector->cpointer v) (ctype-sizeof _longdouble)) _longdouble)) ;; Check a corner of UTF-16 conversion: -(test "\U171D3" cast (cast "\U171D3" _string/utf-16 _pointer) _pointer _string/utf-16) +(test "\U171D3" cast (cast "\U171D3" _string/utf-16 _gcpointer) _gcpointer _string/utf-16) ;; check async: (when test-async?