33 lines
1.1 KiB
Nim
33 lines
1.1 KiB
Nim
# Stint
|
|
# Copyright 2018 Status Research & Development GmbH
|
|
# Licensed under either of
|
|
#
|
|
# * Apache License, version 2.0, ([LICENSE-APACHE](LICENSE-APACHE) or http://www.apache.org/licenses/LICENSE-2.0)
|
|
# * MIT license ([LICENSE-MIT](LICENSE-MIT) or http://opensource.org/licenses/MIT)
|
|
#
|
|
# at your option. This file may not be copied, modified, or distributed except according to those terms.
|
|
|
|
import ../stint, unittest
|
|
|
|
suite "Testing bitops2":
|
|
test "Bitops give sane results":
|
|
|
|
check:
|
|
countOnes(0b01000100'u8.stuint(128)) == 2
|
|
countOnes(0b01000100'u8.stuint(128) shl 100) == 2
|
|
|
|
parity(0b00000001'u8.stuint(128)) == 1
|
|
parity(0b00000001'u8.stuint(128) shl 100) == 1
|
|
|
|
firstOne(0b00000010'u8.stuint(128)) == 2
|
|
firstOne(0b00000010'u8.stuint(128) shl 100) == 102
|
|
firstOne(0'u8.stuint(128)) == 0
|
|
|
|
leadingZeros(0'u8.stuint(128)) == 128
|
|
leadingZeros(0b00100000'u8.stuint(128)) == 128 - 6
|
|
leadingZeros(0b00100000'u8.stuint(128) shl 100) == 128 - 106
|
|
|
|
trailingZeros(0b00100000'u8.stuint(128)) == 5
|
|
trailingZeros(0b00100000'u8.stuint(128) shl 100) == 105
|
|
trailingZeros(0'u8.stuint(128)) == 128
|