diff options
Diffstat (limited to 'src/mds-kbdc')
-rw-r--r-- | src/mds-kbdc/mds-kbdc.c | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/src/mds-kbdc/mds-kbdc.c b/src/mds-kbdc/mds-kbdc.c index 3fd0d82..da1d9a4 100644 --- a/src/mds-kbdc/mds-kbdc.c +++ b/src/mds-kbdc/mds-kbdc.c @@ -95,7 +95,11 @@ int main(int argc_, char** argv_) \set(\6 \8 \add(\rsh(\get(\6 \8) \8) \mul(2 \rsh(\get(\7 \8))))) end for - if \and(\1 128) = 128 + if \equals(\and(\1 128)) + let \2 : \or(\2 64) + end if + + if \and(\1 128) ## a number is true iff it is not zero let \2 : \or(\2 64) end if |