Search
21:01:08
fittestbits
froggey - I'm running into an interesting problem with hashtables. I'm using a pathname as a key, with the equal test.
21:01:57
fittestbits
If I do maphash and do equal with a path and the key, I get a match, but if I use gethash with the path I get NIL NIL.
21:07:05
fittestbits
Here's a simple test I ran at the REPL:
21:07:12
fittestbits
(let ((path #P"TFS|MAIN:>test-file.txt"))
21:07:30
fittestbits
(maphash #'(lambda (key value)
21:07:36
fittestbits
(when (equal path key)
21:07:43
fittestbits
(format t "~S%" value)))
21:07:47
fittestbits
(tag-fs::pathname->file tfs-host))
21:07:56
fittestbits
(gethash path (tag-fs::pathname->file tfs-host))
21:08:15
fittestbits
#<Mezzano.File-System.Tag-Fs::Tfs-File "test-file.txt" 400017E45009>%