diff --git a/ansi-tests/simple-string.lsp b/ansi-tests/simple-string.lsp
index 43b99105001ea17d1a83bfe97b57348513a59a02..41cec19e4b562bc0e01481a23f960e3eaf0eee14 100644
--- a/ansi-tests/simple-string.lsp
+++ b/ansi-tests/simple-string.lsp
@@ -63,23 +63,23 @@
   (typep* (make-array '(12) :element-type nil) 'simple-string)
   t)
 
-(deftest simple-estring.14
+(deftest simple-string.14
   (typep* "abc" '(simple-string))
   t)
 
-(deftest simple-estring.15
+(deftest simple-string.15
   (typep* "abc" '(simple-string *))
   t)
 
-(deftest simple-estring.16
+(deftest simple-string.16
   (typep* "abc" '(simple-string 3))
   t)
 
-(deftest simple-estring.17
+(deftest simple-string.17
   (typep* "abc" '(simple-string 2))
   nil)
 
-(deftest simple-estring.18
+(deftest simple-string.18
   (typep* "abc" '(simple-string 4))
   nil)