diff options
author | Hugo Hörnquist <hugo@hornquist.se> | 2020-01-22 00:13:46 +0100 |
---|---|---|
committer | Hugo Hörnquist <hugo@hornquist.se> | 2020-01-22 00:13:46 +0100 |
commit | 28c831d261ddc010f083e7c834e48d93b1783327 (patch) | |
tree | fa260a6833792e37d7a9987a99c2418e593b97e1 /module/vcomponent | |
parent | Add bettyr vcomponent record printer. (diff) | |
download | calp-28c831d261ddc010f083e7c834e48d93b1783327.tar.gz calp-28c831d261ddc010f083e7c834e48d93b1783327.tar.xz |
Experiments with multithreading.
Diffstat (limited to '')
-rw-r--r-- | module/vcomponent/parse.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/module/vcomponent/parse.scm b/module/vcomponent/parse.scm index 309ec85f..c4142910 100644 --- a/module/vcomponent/parse.scm +++ b/module/vcomponent/parse.scm @@ -304,7 +304,7 @@ row ~a column ~a ctx = ~a ;; return calendar) (make-vcomponent) - (map (lambda (fname) + ((@ (ice-9 threads) par-map) (lambda (fname) (let ((fullname (/ path fname))) (let ((cal (call-with-input-file fullname parse-calendar))) |