From: Stephen Adams Date: Thu, 15 Dec 1994 01:28:15 +0000 (+0000) Subject: Fixed typo. X-Git-Tag: 20090517-FFI~6882 X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=481c6fae65c1157b6cd62d7fc9c7abcef2d49aa3;p=mit-scheme.git Fixed typo. --- diff --git a/v8/src/compiler/base/utils.scm b/v8/src/compiler/base/utils.scm index 1ffab4620..6131748a2 100644 --- a/v8/src/compiler/base/utils.scm +++ b/v8/src/compiler/base/utils.scm @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Id: utils.scm,v 1.2 1994/12/14 20:33:47 adams Exp $ +$Id: utils.scm,v 1.3 1994/12/15 01:28:15 adams Exp $ Copyright (c) 1987-1994 Massachusetts Institute of Technology @@ -457,7 +457,7 @@ MIT in each case. |# (sample/2/really statistic datum1 datum2)))) (define-integrable (find-statistic specification) - (if (pair? statistic) + (if (pair? specification) (hash-table/get *compiler-statistics* (car specification) #F) #F))