summary refs log blame commit diff stats
path: root/tests/overflw/toverflw.nim
blob: 20bc56a535e6594e65acd2ce6846679926831947 (plain) (tree)
1
2
3
4
5
6
7
8
9
10
11

                      


                                              
   




                                         



                          


                          
                         

                        



























































                                                       

 
         
discard """
  file: "toverflw.nim"
  output: "ok"
  cmd: "nim $target -d:release $options $file"

"""
# Tests nim's ability to detect overflows

{.push overflowChecks: on.}

var
  a = high(int)
  b = -2
  overflowDetected = false

try:
  writeLine(stdout, b - a)
except OverflowError:
  overflowDetected = true

{.pop.} # overflow check

doAssert(overflowDetected)

block: # Overflow checks in a proc
  var
    a = high(int)
    b = -2
    overflowDetected = false

  {.push overflowChecks: on.}
  proc foo() =
    let c = b - a
  {.pop.}

  try:
    foo()
  except OverflowError:
    overflowDetected = true

  doAssert(overflowDetected)

block: # Overflow checks in a forward declared proc
  var
    a = high(int)
    b = -2
    overflowDetected = false

  proc foo()

  {.push overflowChecks: on.}
  proc foo() =
    let c = b - a
  {.pop.}

  try:
    foo()
  except OverflowError:
    overflowDetected = true

  doAssert(overflowDetected)

block: # Overflow checks doesn't affect fwd declaration
  var
    a = high(int)
    b = -2
    overflowDetected = false

  {.push overflowChecks: on.}
  proc foo()
  {.pop.}

  proc foo() =
    let c = b - a

  try:
    foo()
  except OverflowError:
    overflowDetected = true

  doAssert(not overflowDetected)


echo "ok"