Fix bug
This commit is contained in:
parent
4d27f16630
commit
7a88f6a05f
@ -258,7 +258,7 @@
|
|||||||
|
|
||||||
;; Update register values list
|
;; Update register values list
|
||||||
(let ((sigs (hash-table-ref/default tags+signals-ht tag #f)))
|
(let ((sigs (hash-table-ref/default tags+signals-ht tag #f)))
|
||||||
(unless (null? sigs)
|
(when sigs
|
||||||
(for-each
|
(for-each
|
||||||
(lambda (sig)
|
(lambda (sig)
|
||||||
(signal-add!
|
(signal-add!
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user