brmlab/hackerbase
4
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Fixup for compiling new table module.

Browse source
This commit is contained in:
Dominik Pantůček 2023-06-15 14:35:11 +02:00
parent 3f7f1356a4
commit 3e4e8c4672
4 changed files with 7 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/sgr-state.scm
View file

@ -117,7 +117,7 @@
(= (bitwise-and v (bitwise-not sgr-state-bit-mask)) 0))
(and (pair? v)
(fixnum? (car v))
(= (bitwise-and v (bitwise-not sgr-state-bit-mask)) 0)
(= (bitwise-and (car v) (bitwise-not sgr-state-bit-mask)) 0)
(pair? (cdr v))
(or (not (cadr v))
(and (fixnum? (cadr v))