From 9d11069fae97dd421760826d0a4cff4937e6a8d4 Mon Sep 17 00:00:00 2001 From: Stephen Adams Date: Fri, 25 Nov 1994 22:57:50 +0000 Subject: [PATCH] *** empty log message *** --- v8/src/compiler/midend/fakeprim.scm | 10 +++++++++- 1 file changed, 9 insertions(+), 1 deletion(-) diff --git a/v8/src/compiler/midend/fakeprim.scm b/v8/src/compiler/midend/fakeprim.scm index 661ebfc01..327cec123 100644 --- a/v8/src/compiler/midend/fakeprim.scm +++ b/v8/src/compiler/midend/fakeprim.scm @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Id: fakeprim.scm,v 1.1 1994/11/19 02:04:29 adams Exp $ +$Id: fakeprim.scm,v 1.2 1994/11/25 22:57:50 adams Exp $ Copyright (c) 1994 Massachusetts Institute of Technology @@ -729,6 +729,14 @@ MIT in each case. |# (cookie-call %small-fixnum? '#F value 'precision-bits) + +(define %profile-data + ;; (CALL ',%profile-data '#F ') + (make-operator/simple* "#[profile-data]" '(UNSPECIFIC-RESULT))) + +(cookie-call %profile-data '#F 'data) + + (define (make-operator/out-of-line name . more) (apply make-operator name '(SIDE-EFFECT-INSENSITIVE) -- 2.25.1