Fixed typo.

diff --git a/v8/src/compiler/base/utils.scm b/v8/src/compiler/base/utils.scm
index 1ffab46208a3bec11fdc5a57f053281f665d5721..6131748a2c86925511651236a174f6cda8f3013d 100644 (file)
--- 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))