#(define default-fret-table (make-hash-table 101))
#(define chord-shape-table (make-hash-table 29))
+#(call-after-session
+ (lambda ()
+ (hash-clear! default-fret-table)
+ (hash-clear! chord-shape-table)))
% declarations for standard directions
left = #-1
%% MAKE-HASH-TABLE in GUILE 1.6 takes mandatory size parameter.
#(define musicQuotes (make-hash-table 29))
+#(call-after-session
+ (lambda ()
+ (hash-clear! musicQuotes)))
#(define toplevel-book-handler print-book-with-defaults)
#(define toplevel-bookpart-handler collect-bookpart-for-book)
#(define expect-error #f)
#(define output-empty-score-list #f)
#(define output-suffix #f)
-#(hash-clear! default-fret-table)
-#(hash-clear! chord-shape-table)
-#(hash-clear! musicQuotes)
#(use-modules (scm clip-region))
#(use-modules (srfi srfi-1))