X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=tests%2Fstrtol.cl;h=4d3a090f658f32442922127b01e334c41e33c1a1;hb=bd34097f9dcc26469f64fb5f91bbf2f5f03d25b4;hp=a115b2a8019e856058a0b21edbaf14d0a247574f;hpb=f73eb94e15649aba5fcfbe3a900aa72f31f46a96;p=uffi.git diff --git a/tests/strtol.cl b/tests/strtol.cl index a115b2a..4d3a090 100644 --- a/tests/strtol.cl +++ b/tests/strtol.cl @@ -7,7 +7,7 @@ ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Feb 2002 ;;;; -;;;; $Id: strtol.cl,v 1.12 2002/03/23 16:32:39 kevin Exp $ +;;;; $Id: strtol.cl,v 1.13 2002/04/02 21:29:45 kevin Exp $ ;;;; ;;;; This file, part of UFFI, is Copyright (c) 2002 by Kevin M. Rosenberg ;;;; @@ -59,7 +59,7 @@ of first non-valid character" -#+test-uffi +#+examples-uffi (progn (flet ((print-results (str) (multiple-value-bind (result flag) (strtol str)