From 095176736dbc9fa39a5e0bef5ddf136a75be509e Mon Sep 17 00:00:00 2001 From: Ryan Culpepper Date: Wed, 29 Oct 2014 08:48:12 -0400 Subject: [PATCH] db: add empty string test for "text" type --- pkgs/db-pkgs/db-test/tests/db/db/sql-types.rkt | 1 + 1 file changed, 1 insertion(+) diff --git a/pkgs/db-pkgs/db-test/tests/db/db/sql-types.rkt b/pkgs/db-pkgs/db-test/tests/db/db/sql-types.rkt index 7f3d793e6f..9fdd025a0c 100644 --- a/pkgs/db-pkgs/db-test/tests/db/db/sql-types.rkt +++ b/pkgs/db-pkgs/db-test/tests/db/db/sql-types.rkt @@ -303,6 +303,7 @@ (type-test-case '(text) (call-with-connection (lambda (c) + (check-roundtrip c "") (check-roundtrip c "abcde") (check-roundtrip c (make-string #e1e6 #\a)) (check-roundtrip c (make-string #e1e7 #\b))