Added methods for PROFILE-COUNT and PROFILE-DATA
authorStephen Adams <edu/mit/csail/zurich/adams>
Sat, 26 Nov 1994 19:03:36 +0000 (19:03 +0000)
committerStephen Adams <edu/mit/csail/zurich/adams>
Sat, 26 Nov 1994 19:03:36 +0000 (19:03 +0000)
v8/src/compiler/rtlopt/rcse1.scm
v8/src/compiler/rtlopt/rinvex.scm

index 95b8d924f70378a0a51d1738eba8f07153e115a2..5f669caff302a4718314152f372206975a818ef5 100644 (file)
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: rcse1.scm,v 1.1 1994/11/19 02:06:38 adams Exp $
+$Id: rcse1.scm,v 1.2 1994/11/26 19:03:22 adams Exp $
 
 Copyright (c) 1988-1994 Massachusetts Institute of Technology
 
@@ -660,4 +660,7 @@ MIT in each case. |#
                         trivial-action)
     (method/unknown-invocation statement)))
 
+(define-cse-method 'PROFILE-COUNT method/noop)
+(define-cse-method 'PROFILE-DATA method/noop)
+
 ;; End of new stuff
\ No newline at end of file
index b68a1563849aade4f48618c1d54e53d3212901bd..d31f71e924231e6a7ff3f9d567be18629e74abd1 100644 (file)
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: rinvex.scm,v 1.1 1994/11/19 02:06:38 adams Exp $
+$Id: rinvex.scm,v 1.2 1994/11/26 19:03:36 adams Exp $
 
 Copyright (c) 1989-1994 Massachusetts Institute of Technology
 
@@ -278,7 +278,9 @@ MIT in each case. |#
            INTERRUPT-CHECK:CLOSURE
            INTERRUPT-CHECK:SIMPLE-LOOP
            PRESERVE
-           RESTORE))
+           RESTORE
+           PROFILE-COUNT
+           PROFILE-DATA))
 
 (define (define-one-arg-method type get set)
   (define-method type