From 3bfd96308b717f74a415cd2a2e1d83e059500e26 Mon Sep 17 00:00:00 2001 From: wlott <wlott> Date: Thu, 6 Dec 1990 22:23:16 +0000 Subject: [PATCH] If we want to collect dynamic statistics, all setup-dynamic-count-info after all ir2 phases. --- compiler/main.lisp | 3 +++ 1 file changed, 3 insertions(+) diff --git a/compiler/main.lisp b/compiler/main.lisp index 3a808eba5..c31c33c2d 100644 --- a/compiler/main.lisp +++ b/compiler/main.lisp @@ -322,6 +322,9 @@ (when *compiler-trace-output* (describe-component component *compiler-trace-output*)) + (when *collect-dynamic-statistics* + (setup-dynamic-count-info component)) + (maybe-mumble "Code ") (let ((length (generate-code component))) -- GitLab