From ce69f9710370677250541205d1478b3c239e2057 Mon Sep 17 00:00:00 2001
From: wlott <wlott>
Date: Fri, 8 Jun 1990 01:18:34 +0000
Subject: [PATCH] Added defknown of %make-weak-pointer.

---
 compiler/generic/vm-fndb.lisp | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/compiler/generic/vm-fndb.lisp b/compiler/generic/vm-fndb.lisp
index e3ee0d978..f25c2d116 100644
--- a/compiler/generic/vm-fndb.lisp
+++ b/compiler/generic/vm-fndb.lisp
@@ -7,7 +7,7 @@
 ;;; Scott Fahlman (FAHLMAN@CMUC). 
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/generic/vm-fndb.lisp,v 1.11 1990/06/03 19:08:39 ch Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/generic/vm-fndb.lisp,v 1.12 1990/06/08 01:18:34 wlott Exp $
 ;;;
 ;;; This file defines the machine specific function signatures.
 ;;;
@@ -69,6 +69,10 @@
   (unsafe))
 
 
+(defknown %make-weak-pointer (t boolean) weak-pointer
+  (flushable))
+
+
 (defknown (dynamic-space-free-pointer binding-stack-pointer-sap
 				      control-stack-pointer-sap)  ()
   (system-area-pointer)
-- 
GitLab