diff options
| author | Ludovic Courtes | 2006-03-07 23:02:01 +0000 |
|---|---|---|
| committer | Ludovic Courtes | 2006-03-07 23:02:01 +0000 |
| commit | 1dcb0d05955a40d784455ec73dcf1552a07c5126 (patch) | |
| tree | 73b6ee4f648316b93cba740d4fc5b51474104f8f /src/guile/skribilo.scm | |
| parent | 37105ac9d8dac73a04b2fc542d3a94340964781d (diff) | |
| parent | 86c7ef726434b31b78570bf80db3cdecf8b84ca3 (diff) | |
| download | skribilo-1dcb0d05955a40d784455ec73dcf1552a07c5126.tar.gz skribilo-1dcb0d05955a40d784455ec73dcf1552a07c5126.tar.lz skribilo-1dcb0d05955a40d784455ec73dcf1552a07c5126.zip | |
Partial rewrite of the debugging facilities (slightly slower).
Patches applied:
* skribilo--devel--1.2 (patch 44)
- Partial rewrite of the debugging facilities (slightly slower).
git-archimport-id: lcourtes@laas.fr--2004-libre/skribilo--devel--1.2--patch-72
Diffstat (limited to 'src/guile/skribilo.scm')
| -rw-r--r-- | src/guile/skribilo.scm | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/src/guile/skribilo.scm b/src/guile/skribilo.scm index f683080..dbaa368 100644 --- a/src/guile/skribilo.scm +++ b/src/guile/skribilo.scm @@ -413,9 +413,7 @@ Processes a Skribilo/Skribe source file and produces its output. ;; Parse the most important options. - (set-skribe-debug! (string->number debugging-level)) - - (if (> (skribe-debug) 4) + (if (> (*debug*) 4) (set! %load-hook (lambda (file) (format #t "~~ loading `~a'...~%" file)))) @@ -428,6 +426,7 @@ Processes a Skribilo/Skribe source file and produces its output. (append %load-path (*source-path*)))) (*image-path* (cons image-path (*image-path*))) + (*debug* (string->number debugging-level)) (*warning* (string->number warning-level)) (*verbose* (let ((v (option-ref options 'verbose 0))) |