From 9f5325aca4d2089d01891b0064a7c0f01ba31569 Mon Sep 17 00:00:00 2001 From: Stephen Adams Date: Sun, 19 Nov 1995 19:28:34 +0000 Subject: [PATCH] Added ZONES sub-package. --- v7/src/pcsample/pcs.pkg | 11 ++++++++++- 1 file changed, 10 insertions(+), 1 deletion(-) diff --git a/v7/src/pcsample/pcs.pkg b/v7/src/pcsample/pcs.pkg index 6d02393f1..595b8cc04 100644 --- a/v7/src/pcsample/pcs.pkg +++ b/v7/src/pcsample/pcs.pkg @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Id: pcs.pkg,v 1.1 1995/07/28 14:14:08 adams Exp $ +$Id: pcs.pkg,v 1.2 1995/11/19 19:28:34 adams Exp $ Copyright (c) 1995 Massachusetts Institute of Technology @@ -432,3 +432,12 @@ MIT in each case. |# with-pc-sample-default-status-displayer ) (initialization (initialize-package!))) + +(define-package (pc-sample zones) + (files "zones") + (parent ()) + (export () + make-pc-sample-zone + wrap-with-zone + reset-zone-counts! + display-zone-report)) \ No newline at end of file -- 2.25.1