jyapayne/Nim
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fixes factorial's bug

Browse source
This commit is contained in:
data-man 2018-05-17 19:54:41 +03:00
commit 173c92d374
1 changed files with 12 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

13
lib/pure/math.nim
View file

@ -41,7 +41,7 @@ proc fac*(n: int): int =
createFactTable[13]() createFactTable[13]()
else: else:
createFactTable[21]() createFactTable[21]()
assert(n > 0, $n & " must not be negative.") assert(n >= 0, $n & " must not be negative.")
assert(n < factTable.len, $n & " is too large to look up in the table") assert(n < factTable.len, $n & " is too large to look up in the table")
factTable[n] factTable[n]
@ -560,3 +560,14 @@ when isMainModule:
assert sgn(Inf) == 1 assert sgn(Inf) == 1
assert sgn(NaN) == 0 assert sgn(NaN) == 0
block: # fac() tests
try:
discard fac(-1)
except AssertionError:
discard
doAssert fac(0) == 1
doAssert fac(1) == 1
doAssert fac(2) == 2
doAssert fac(3) == 6
doAssert fac(4) == 24