From 71c74aa39a101327ebc04a0a01d302cf551b32e9 Mon Sep 17 00:00:00 2001 From: wlott <wlott> Date: Thu, 20 May 1993 13:45:42 +0000 Subject: [PATCH] Initial revision --- code/gengc.lisp | 26 ++++++++++++++++++++++++++ 1 file changed, 26 insertions(+) create mode 100644 code/gengc.lisp diff --git a/code/gengc.lisp b/code/gengc.lisp new file mode 100644 index 000000000..0c36393eb --- /dev/null +++ b/code/gengc.lisp @@ -0,0 +1,26 @@ +;;; -*- Mode: Lisp; Package: LISP; Log: code.log -*- +;;; +;;; ********************************************************************** +;;; This code was written as part of the CMU Common Lisp project at +;;; Carnegie Mellon University, and has been placed in the public domain. +;;; If you want to use this code or any part of CMU Common Lisp, please contact +;;; Scott Fahlman or slisp-group@cs.cmu.edu. +;;; +(ext:file-comment + "$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/gengc.lisp,v 1.1 1993/05/20 13:45:42 wlott Exp $") +;;; +;;; ********************************************************************** +;;; +;;; Lisp level interface to the Generational Garbage Collector. +;;; +;;; Written by William Lott. +;;; + +(in-package "LISP") + +(defun do-before-gc-stuff () + nil) + +(defun do-after-gc-stuff () + nil) + -- GitLab