From 5c1c5f2aad47968e71a77b22eed4430f83460b3e Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Tue, 27 May 2008 09:35:07 +0000
Subject: [PATCH] * write timing to stderr

git-svn-id: trunk@11091 -
---
 tests/bench/timer.pas | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/tests/bench/timer.pas b/tests/bench/timer.pas
index ec9965fed2..c92a91f953 100644
--- a/tests/bench/timer.pas
+++ b/tests/bench/timer.pas
@@ -7,7 +7,7 @@ unit timer;
 
     var
        verbosetimer : boolean = true;
-       
+
     procedure start;
     procedure stop;
     function MSec:cardinal;
@@ -46,12 +46,12 @@ unit timer;
          etime:=gt;
          s:=etime-stime;
 	 if verbosetimer then
-           write(s div 1000,'.',s mod 1000,' Seconds');
+           write(stderr,s div 1000,'.',s mod 1000,' Seconds');
      end;
 
     function MSec:cardinal;
       begin
         Msec:=etime-stime;
       end;
-      
+
 end.