X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=tests%2Fatoifl.lisp;h=8d65aa52d24794eaad30f13f960dfa2359afb5ce;hb=212e27b1cad10c503a9231fe6b7819e6945505c7;hp=23bbda0b101ecba2d189f57a71b08cfe65a21ee9;hpb=0bf8fb658b7a8181a42792f7cb0de08b91f7a8d3;p=uffi.git diff --git a/tests/atoifl.lisp b/tests/atoifl.lisp index 23bbda0..8d65aa5 100644 --- a/tests/atoifl.lisp +++ b/tests/atoifl.lisp @@ -2,21 +2,18 @@ ;;;; ************************************************************************* ;;;; FILE IDENTIFICATION ;;;; -;;;; Name: atoifl.cl +;;;; Name: atoifl.lisp ;;;; Purpose: UFFI Example file to atoi/atof/atol ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Mar 2002 ;;;; -;;;; $Id: atoifl.lisp,v 1.2 2003/04/29 12:57:10 kevin Exp $ +;;;; $Id$ ;;;; -;;;; This file, part of UFFI, is Copyright (c) 2002 by Kevin M. Rosenberg +;;;; This file, part of UFFI, is Copyright (c) 2002-2003 by Kevin M. Rosenberg ;;;; -;;;; UFFI users are granted the rights to distribute and use this software -;;;; as governed by the terms of the Lisp Lesser GNU Public License -;;;; (http://opensource.franz.com/preamble.html), also known as the LLGPL. ;;;; ************************************************************************* -(in-package :uffi-tests) +(in-package #:uffi-tests) (uffi:def-function ("atoi" c-atoi) ((str :cstring))