gistfile1.nim

proc openAudioFile*(path: string): ref PAudioFile =
  debug("Allocating TOggVorbisFile memory")
  var fileptr = cast[ptr TOggVorbisFile](alloc0(sizeof(TOggVorbisFile)))
  debug("Creating new PAudioFile object")
  new(result, close)
  result.file = fileptr
  debug("Opening vorbis file")
  if fopen(cstring(path), result.file) != 0:
    error("Opening file $1 failed!", path)
    raise newException(EIO, "Failed to open file ")