path: root/tests/arc/topt_cursor.nim

discard """
  output: '''("string here", 80)'''
  cmd: '''nim c --gc:arc --expandArc:main --expandArc:sio --hint:Performance:off $file'''
  nimout: '''--expandArc: main

var
  x_cursor
  :tmpD
try:
  x_cursor = ("hi", 5)
  if cond:
    x_cursor = ("different", 54) else:
    x_cursor = ("string here", 80)
  echo [
    :tmpD = `$`(x_cursor)
    :tmpD]
finally:
  `=destroy`(:tmpD)
-- end of expandArc ------------------------
--expandArc: sio

block :tmp:
  var x_cursor
  var f = open("debug.txt", fmRead, 8000)
  try:
    var res
    try:
      res = newStringOfCap(80)
      block :tmp_1:
        while readLine(f, res):
          x_cursor = res
          echo [x_cursor]
    finally:
      `=destroy`(res)
  finally:
    close(f)
-- end of expandArc ------------------------'''
"""

proc main(cond: bool) =
  var x = ("hi", 5) # goal: computed as cursor

  x = if cond:
        ("different", 54)
      else:
        ("string here", 80)

  echo x

main(false)

proc sio =
  for x in lines("debug.txt"):
    echo x

if false:
  sio()