Obarray changes hork apropos

[Dale P. Smith]

You guys are probably aware of this, but just in case you're not:

address@hidden:~/src/guile/guile-core$ guile --debug
guile> (apropos "read")

Backtrace:
0* [apropos "read"]
1  (if (zero? (string-length rgx)) "Empty string not allowed" ...)
   ...
2  [for-each #<procedure (module)> (# # # # ...)]
3* [#<procedure (module)> #<interface (guile) 8081190>]
4* (let* (# # # #) (for-each # obarrays get-refs))
5  [for-each #<procedure (obarray get-ref)> (#(# # # ...)) ...]

/usr/local/share/guile/1.4.1/ice-9/session.scm:208:14: In procedure
for-each in expression (for-each (lambda # #) obarrays ...):
/usr/local/share/guile/1.4.1/ice-9/session.scm:208:14: Argument out of
range: (#<procedure id (x)> #<procedure id (x)>)
ABORT: (out-of-range)
guile> 

-- 
Dale P. Smith
Altus Technologies Corporation
address@hidden
440-746-9000 x309