[rdnzl-cvs] CVS update: RDNZL/CHANGELOG.txt RDNZL/ffi.lisp RDNZL/rdnzl.asd

[Edi Weitz]

Update of /project/rdnzl/cvsroot/RDNZL
In directory common-lisp.net:/tmp/cvs-serv26247

Modified Files:
	CHANGELOG.txt ffi.lisp rdnzl.asd 
Log Message:
delegate fixes (Dominic Robinson), version 0.8.0

Date: Fri Jan 13 08:06:29 2006
Author: eweitz

Index: RDNZL/CHANGELOG.txt
diff -u RDNZL/CHANGELOG.txt:1.3 RDNZL/CHANGELOG.txt:1.4
--- RDNZL/CHANGELOG.txt:1.3	Mon Nov 21 15:03:40 2005
+++ RDNZL/CHANGELOG.txt	Fri Jan 13 08:06:28 2006
@@ -1,3 +1,8 @@
+Version 0.8.0
+2006-01-13
+Fix mechanism which releases delegate adapters (thanks to Dominic Robinson)
+Updated to DLL version 0.5.0
+
 Version 0.7.1
 2005-11-21
 Updated to DLL version 0.4.1


Index: RDNZL/ffi.lisp
diff -u RDNZL/ffi.lisp:1.2 RDNZL/ffi.lisp:1.3
--- RDNZL/ffi.lisp:1.2	Fri Jul  8 20:45:34 2005
+++ RDNZL/ffi.lisp	Fri Jan 13 08:06:28 2006
@@ -1,7 +1,7 @@
 ;;; -*- Mode: LISP; Syntax: COMMON-LISP; Package: RDNZL; Base: 10 -*-
-;;; $Header: /project/rdnzl/cvsroot/RDNZL/ffi.lisp,v 1.2 2005/07/08 18:45:34 eweitz Exp $
+;;; $Header: /project/rdnzl/cvsroot/RDNZL/ffi.lisp,v 1.3 2006/01/13 07:06:28 eweitz Exp $
 
-;;; Copyright (c) 2004-2005, Dr. Edmund Weitz.  All rights reserved.
+;;; Copyright (c) 2004-2006, Dr. Edmund Weitz.  All rights reserved.
 
 ;;; Redistribution and use in source and binary forms, with or without
 ;;; modification, are permitted provided that the following conditions
@@ -331,7 +331,7 @@
   (funcall (gethash index *callback-hash*) args))
 
 (ffi-define-callable 
-  (ReleaseDelegateAdapter ffi-void-pointer)
+  (ReleaseDelegateAdapter ffi-void)
   ((index ffi-integer))
   ;; remove entry from hash table if CLR is done with it
-  (remhash index *callback-hash*))
\ No newline at end of file
+  (remhash index *callback-hash*))


Index: RDNZL/rdnzl.asd
diff -u RDNZL/rdnzl.asd:1.2 RDNZL/rdnzl.asd:1.3
--- RDNZL/rdnzl.asd:1.2	Mon Nov 21 15:04:23 2005
+++ RDNZL/rdnzl.asd	Fri Jan 13 08:06:28 2006
@@ -1,5 +1,5 @@
 ;;; -*- Mode: LISP; Syntax: COMMON-LISP; Package: CL-USER; Base: 10 -*-
-;;; $Header: /project/rdnzl/cvsroot/RDNZL/rdnzl.asd,v 1.2 2005/11/21 14:04:23 eweitz Exp $
+;;; $Header: /project/rdnzl/cvsroot/RDNZL/rdnzl.asd,v 1.3 2006/01/13 07:06:28 eweitz Exp $
 
 ;;; Copyright (c) 2004, Dr. Edmund Weitz.  All rights reserved.
 
@@ -39,7 +39,7 @@
 
 (defsystem #:rdnzl
   :serial t
-  :version "0.7.1"
+  :version "0.8.0"
   :components ((:file "packages")
                (:file "specials")
                (:file "util")