projects
/
uffi.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
r1546: *** empty log message ***
[uffi.git]
/
tests
/
strtol.cl
diff --git
a/tests/strtol.cl
b/tests/strtol.cl
index d813f1333173b416c20f976d76cfce96813caaf6..57d2b45b37166bd207d8e6a2223aed439e479e1b 100644
(file)
--- a/
tests/strtol.cl
+++ b/
tests/strtol.cl
@@
-9,7
+9,7
@@
;;;;
;;;; Copyright (c) 2002 Kevin M. Rosenberg
;;;;
;;;;
;;;; Copyright (c) 2002 Kevin M. Rosenberg
;;;;
-;;;; $Id: strtol.cl,v 1.
3 2002/03/10 04:15:33
kevin Exp $
+;;;; $Id: strtol.cl,v 1.
7 2002/03/11 18:00:57
kevin Exp $
;;;;
;;;; This file is part of UFFI.
;;;;
;;;;
;;;; This file is part of UFFI.
;;;;
@@
-29,9
+29,9
@@
(in-package :cl-user)
(in-package :cl-user)
-(uffi:def-type char-ptr (* :char))
+(uffi:def-
foreign-
type char-ptr (* :char))
-;; This example does not use :c
-
string to pass the input string since
+;; This example does not use :cstring to pass the input string since
;; the routine needs to do pointer arithmetic to see how many characters
;; were parsed
;; the routine needs to do pointer arithmetic to see how many characters
;; were parsed