From 0b4fe06d6cafc9e16f5f0954fd67a6f180c5ac8f Mon Sep 17 00:00:00 2001 From: Stephen Adams Date: Sun, 12 Mar 1995 16:31:16 +0000 Subject: [PATCH] Fixed free variable. --- v8/src/compiler/base/stats.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/v8/src/compiler/base/stats.scm b/v8/src/compiler/base/stats.scm index 574614123..44d27b4e9 100644 --- a/v8/src/compiler/base/stats.scm +++ b/v8/src/compiler/base/stats.scm @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Id: stats.scm,v 1.2 1995/01/05 22:28:22 adams Exp $ +$Id: stats.scm,v 1.3 1995/03/12 16:31:16 adams Exp $ Copyright (c) 1994 Massachusetts Institute of Technology @@ -93,7 +93,7 @@ MIT in each case. |# (cond ((find-statistic statistic) => (lambda (stat) (apply (compiler-statistic/sample stat) data) - datum)) + data)) (else (define-compiler-statistic (length data) statistic) (warn "SAMPLE should be replaced with call to SAMPLE/1 or SAMPLE/2" -- 2.25.1