X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=tests%2Fstrtol.lisp;h=c3bfe1393d936d0b064b12b3054ecf125399e866;hb=b65ea0252128fbf33245c76d34569e30d9740877;hp=1cb1be9e4763a7378fbe331222650a824f33d92f;hpb=0bf8fb658b7a8181a42792f7cb0de08b91f7a8d3;p=uffi.git diff --git a/tests/strtol.lisp b/tests/strtol.lisp index 1cb1be9..c3bfe13 100644 --- a/tests/strtol.lisp +++ b/tests/strtol.lisp @@ -2,21 +2,18 @@ ;;;; ************************************************************************* ;;;; FILE IDENTIFICATION ;;;; -;;;; Name: strtol.cl +;;;; Name: strtol.lisp ;;;; Purpose: UFFI Example file to strtol, uses pointer arithmetic ;;;; Programmer: Kevin M. Rosenberg ;;;; Date Started: Feb 2002 ;;;; -;;;; $Id: strtol.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-foreign-type char-ptr (* :unsigned-char))