🚀 go-pugleaf

Are there any particular problems with linking Turbo C with Summer '87 
Clipper, apart from using large memory model.  After calling a Turbo C routine 
in the procedure start, the following piece of code will run...

do start

seek user
if found()
  if file(alltrim(maildir)+"\*.new")
    ? cr                             && The program crashs without this line.
    tone(150,8)
    tone(130,10)
    wait "You have electronic mail, do you want to read it? (Y/N) " to answer
    ? cr
    if answer$"YyTtGgHhJjUu&7^6%5"
      do newmail
    endif
  endif
endif


..but this piece...


do start

seek user
if found()
  if file(alltrim(maildir)+"\*.new")
    tone(150,8)
    tone(130,10)
    wait "You have electronic mail, do you want to read it? (Y/N) " to answer
    ? cr
    if answer$"YyTtGgHhJjUu&7^6%5"
      do newmail
    endif
  endif
endif


.. will crash before giving the tone if the file() function evaluates true.

There _appear_ to be no problems at any point later with the write statement 
in, but I have grave concerns about giving the program to users.

The second routine ran fine without the Turbo C routines.

Any ideas anyone?

Thanks,

Peter Summers