[GNUN Error] Incompatible change in licenses/quick-guide-gplv3.html

[Yavor Doganov]

Backtrace:
In unknown file:
   ?:  4  (let* ((nport #) (ans #)) (close-port nport) ans)
   ?:  5* [with-input-from-port #<input: standard input 0> #<procedure #f ()>]
   ?:  6  (let ((swaports (lambda () #))) (dynamic-wind swaports thunk 
swaports))
   ?:  7  [dynamic-wind #<procedure #f ()> #<procedure #f ()> #<procedure #f 
()>]
   ?:  8* [#<procedure #f ()>]
In ./make-prototype:
 149:  9* (let ((m #)) (with-output-to-file output (lambda () #)) ...)
 150: 10* [with-output-to-file "../../licenses/po/quick-guide-gplv3.proto" ...]
In unknown file:
   ?: 11  (let* ((nport #) (ans #)) (close-port nport) ans)
   ?: 12* [with-output-to-port #<output: standard output 1> #<procedure #f ()>]
   ?: 13  (let ((swaports (lambda () #))) (dynamic-wind swaports thunk 
swaports))
   ?: 14  [dynamic-wind #<procedure #f ()> #<procedure #f ()> #<procedure #f 
()>]
   ?: 15* [#<procedure #f ()>]
In ./make-prototype:
 152: 16* [display ...
 153: 17* [string-append ...
 153: 18* [match:substring #f 1]
In /usr/share/guile/1.6/ice-9/regex.scm:
 159: 19  (let* ((matchnum #) (start #) (end #)) (and start end ...))
 162: 20* [match:start #f 1]
 145: 21  (let* ((matchnum (if # # 1)) (start (car #))) (if (= start -1) #f 
start))
 148: 22* [car ...
 148: 23* [vector-ref #f 2]

/usr/share/guile/1.6/ice-9/regex.scm:148:22: In procedure vector-ref in 
expression (vector-ref match matchnum):
/usr/share/guile/1.6/ice-9/regex.scm:148:22: Wrong type argument in position 1: 
#f