diff options
author | Hugo Hörnquist <hugo@hornquist.se> | 2019-12-30 15:52:35 +0100 |
---|---|---|
committer | Hugo Hörnquist <hugo@hornquist.se> | 2019-12-30 15:52:35 +0100 |
commit | e75be3a6cba8e3a92fd69a75d71452b04a399eee (patch) | |
tree | 8cb8dbe89996342be13f58dd2396d2516caac7d8 /module/main.scm | |
parent | HTML Add current time marker. (diff) | |
download | calp-e75be3a6cba8e3a92fd69a75d71452b04a399eee.tar.gz calp-e75be3a6cba8e3a92fd69a75d71452b04a399eee.tar.xz |
Add simple benchmark main.
Diffstat (limited to 'module/main.scm')
-rwxr-xr-x | module/main.scm | 14 |
1 files changed, 8 insertions, 6 deletions
diff --git a/module/main.scm b/module/main.scm index 4eddeb14..92df5e20 100755 --- a/module/main.scm +++ b/module/main.scm @@ -15,12 +15,13 @@ exec guile -e main -s $0 "$@" (util) (util io) - ((entry-points html) :prefix html-) - ((entry-points terminal) :prefix terminal-) - ((entry-points import) :prefix import-) - ((entry-points text) :prefix text-) - ((entry-points info) :prefix info-) - ((entry-points ical) :prefix ical-) + ((entry-points html) :prefix html-) + ((entry-points terminal) :prefix terminal-) + ((entry-points import) :prefix import-) + ((entry-points text) :prefix text-) + ((entry-points info) :prefix info-) + ((entry-points ical) :prefix ical-) + ((entry-points benchmark) :prefix benchmark-) ((entry-points server) :prefix server-) @@ -64,6 +65,7 @@ exec guile -e main -s $0 "$@" ((info) info-main) ((ical) ical-main) ((server) server-main) + ((benchmark) benchmark-main) (else => (lambda (s) (format (current-error-port) "Unsupported mode of operation: ~a~%" |