From 7a88f6a05f3fed1f00b0e93a9c3779944e1e3d48 Mon Sep 17 00:00:00 2001
From: Nikolay Puzanov <np@embddr.com>
Date: Wed, 7 Dec 2022 12:50:59 +0300
Subject: [PATCH] Fix bug

---
 embddr/vcd.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/embddr/vcd.scm b/embddr/vcd.scm
index b4ffabc..df39352 100644
--- a/embddr/vcd.scm
+++ b/embddr/vcd.scm
@@ -258,7 +258,7 @@
 
                            ;; Update register values list
                            (let ((sigs (hash-table-ref/default tags+signals-ht tag #f)))
-                             (unless (null? sigs)
+                             (when sigs
                                (for-each
                                 (lambda (sig)
                                   (signal-add!