diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2022-06-23 04:14:46 +0200 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2022-06-23 04:14:46 +0200 |
| commit | 2fb88465f7a25b1eac0cdbb78a05de9e78e68bfd (patch) | |
| tree | c48c312e1d44306039fc00cfe4b5cd611d7f9a3b /module/hnh/util | |
| parent | Remove procedure tabset. (diff) | |
| download | calp-2fb88465f7a25b1eac0cdbb78a05de9e78e68bfd.tar.gz calp-2fb88465f7a25b1eac0cdbb78a05de9e78e68bfd.tar.xz | |
Normalize keyword syntax.
Diffstat (limited to 'module/hnh/util')
| -rw-r--r-- | module/hnh/util/exceptions.scm | 10 | ||||
| -rw-r--r-- | module/hnh/util/tree.scm | 16 |
2 files changed, 13 insertions, 13 deletions
diff --git a/module/hnh/util/exceptions.scm b/module/hnh/util/exceptions.scm index 36b018d1..344eb27a 100644 --- a/module/hnh/util/exceptions.scm +++ b/module/hnh/util/exceptions.scm @@ -1,10 +1,10 @@ (define-module (hnh util exceptions) - #:use-module (srfi srfi-1) - #:use-module (hnh util) - #:use-module (ice-9 format) + :use-module (srfi srfi-1) + :use-module (hnh util) + :use-module (ice-9 format) - #:use-module ((system vm frame) - :select (frame-bindings binding-ref)) + :use-module ((system vm frame) + :select (frame-bindings binding-ref)) :export (warning-handler warnings-are-errors diff --git a/module/hnh/util/tree.scm b/module/hnh/util/tree.scm index 34e10365..8b41609b 100644 --- a/module/hnh/util/tree.scm +++ b/module/hnh/util/tree.scm @@ -1,12 +1,12 @@ (define-module (hnh util tree) - #:use-module (srfi srfi-1) - #:use-module (srfi srfi-71) - #:use-module (hnh util) - #:export (make-tree left-subtree - right-subtree - tree-node - length-of-longst-branch - tree-map)) + :use-module (srfi srfi-1) + :use-module (srfi srfi-71) + :use-module (hnh util) + :export (make-tree left-subtree + right-subtree + tree-node + length-of-longst-branch + tree-map)) ;; Constructs a binary tree where each node's children is partitioned ;; into a left and right branch using @var{pred?}. |