From 3b8565c33b58196ffe2e3dd8f23a73de57a268f2 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Mon, 9 Mar 2020 23:47:05 +0100
Subject: Sprinkled in some time prints.

---
 module/main.scm | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'module/main.scm')

diff --git a/module/main.scm b/module/main.scm
index 15079dc5..bb3fa041 100755
--- a/module/main.scm
+++ b/module/main.scm
@@ -13,6 +13,7 @@ exec guile -e main -s $0 "$@"
 
              (util)
              (util io)
+             (util time)
 
              ((entry-points html)      :prefix      html-)
              ((entry-points terminal)  :prefix  terminal-)
@@ -84,6 +85,7 @@ exec guile -e main -s $0 "$@"
 (use-modules (system vm frame))
 
 (define (main args)
+  (report-time! "Program start")
   (with-throw-handler #t
     (lambda () (wrapped-main args))
     (lambda (err . args)
-- 
cgit v1.2.3