From 9ab1bd31b64e86ad10b1a9304b0cc9520d147061 Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Mon, 24 Aug 2015 22:37:50 -0700 Subject: [PATCH] performance note --- render.rkt | 1 + 1 file changed, 1 insertion(+) diff --git a/render.rkt b/render.rkt index 4dcaed9..8219920 100644 --- a/render.rkt +++ b/render.rkt @@ -193,6 +193,7 @@ (cond [(bytes? ,(world:current-main-export)) ,(world:current-main-export)] ; if main export is binary, just pass it through [else + ;; `include-template` is the slowest part of the operation (the eval itself is cheap) (include-template #:command-char ,(world:current-command-char) (file ,(->string (find-relative-path source-dir template-path))))]))))) (time (parameterize ([current-directory (->complete-path source-dir)]) ; because include-template wants to work relative to source location (render-through-eval expr-to-eval))))