projects
/
uffi.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
r2822: *** empty log message ***
[uffi.git]
/
src-main
/
strings.cl
diff --git
a/src-main/strings.cl
b/src-main/strings.cl
index f4e0e0305fa2c14d0d82c9c186893e57e1346dc9..30616449b3d1faf5ecb2598bffbf856001f74261 100644
(file)
--- a/
src-main/strings.cl
+++ b/
src-main/strings.cl
@@
-7,7
+7,7
@@
;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: Feb 2002
;;;;
;;;; Programmer: Kevin M. Rosenberg
;;;; Date Started: Feb 2002
;;;;
-;;;; $Id: strings.cl,v 1.
1 2002/09/16 17:54:30
kevin Exp $
+;;;; $Id: strings.cl,v 1.
2 2002/09/19 03:33:25
kevin Exp $
;;;;
;;;; This file, part of UFFI, is Copyright (c) 2002 by Kevin M. Rosenberg
;;;;
;;;;
;;;; This file, part of UFFI, is Copyright (c) 2002 by Kevin M. Rosenberg
;;;;
@@
-20,7
+20,7
@@
(in-package :uffi)
(in-package :uffi)
-(def
-constant
+null-cstring-pointer+
+(def
var
+null-cstring-pointer+
#+cmu nil
#+allegro 0
#+lispworks (fli:make-pointer :address 0 :type '(:unsigned :char))
#+cmu nil
#+allegro 0
#+lispworks (fli:make-pointer :address 0 :type '(:unsigned :char))