X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=tests%2Fstrtol.lisp;h=cb053cf1351b7f01a2069e9024d1f613c00b0f7b;hb=0824453227a26da41a3929c9117b66714980414b;hp=0167dbf700bd823c00ab11e32ce7ed01c362b50d;hpb=65e2a75247b894d1f562102ef1df77c7060b5048;p=uffi.git

diff --git a/tests/strtol.lisp b/tests/strtol.lisp
index 0167dbf..cb053cf 100644
--- a/tests/strtol.lisp
+++ b/tests/strtol.lisp
@@ -7,7 +7,7 @@
 ;;;; Programmer:    Kevin M. Rosenberg
 ;;;; Date Started:  Feb 2002
 ;;;;
-;;;; $Id: strtol.lisp,v 1.3 2003/08/13 18:53:42 kevin Exp $
+;;;; $Id$
 ;;;;
 ;;;; This file, part of UFFI, is Copyright (c) 2002-2003 by Kevin M. Rosenberg
 ;;;;
@@ -54,10 +54,10 @@ of first non-valid character"
 	(uffi:free-foreign-object str-native)
 	(uffi:free-foreign-object endptr)))))
 
-(deftest strtol.1 (strtol "123") 123 t)
-(deftest strtol.2 (strtol "0") 0 t)
-(deftest strtol.3 (strtol "55a") 55 2)
-(deftest strtol.4 (strtol "a") nil nil)
+(deftest :strtol.1 (strtol "123") 123 t)
+(deftest :strtol.2 (strtol "0") 0 t)
+(deftest :strtol.3 (strtol "55a") 55 2)
+(deftest :strtol.4 (strtol "a") nil nil)