[slime-cvs] CVS update: slime/swank-backend.lisp

[Matthias Koeppe]

Update of /project/slime/cvsroot/slime
In directory common-lisp.net:/tmp/cvs-serv13102

Modified Files:
	swank-backend.lisp 
Log Message:
(make-weak-key-hash-table)
(make-weak-value-hash-table): New interfaces.

Date: Sun Aug 28 16:47:11 2005
Author: mkoeppe

Index: slime/swank-backend.lisp
diff -u slime/swank-backend.lisp:1.86 slime/swank-backend.lisp:1.87
--- slime/swank-backend.lisp:1.86	Tue Jul  5 22:30:59 2005
+++ slime/swank-backend.lisp	Sun Aug 28 16:47:11 2005
@@ -806,3 +806,14 @@
  (:call CALLER CALLEE)                  ; trace calls from CALLER to CALLEE.
  (:labels TOPLEVEL LOCAL) 
  (:flet TOPLEVEL LOCAL) ")
+
+
+;;;; Weak datastructures
+
+(definterface make-weak-key-hash-table (&rest args)
+  "Like MAKE-HASH-TABLE, but weak w.r.t. the keys."
+  (apply #'make-hash-table args))
+
+(definterface make-weak-value-hash-table (&rest args)
+  "Like MAKE-HASH-TABLE, but weak w.r.t. the values."
+  (apply #'make-hash-table args))