home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1993 #1 / NN_1993_1.iso / spool / comp / lang / c / 19348 < prev    next >
Encoding:
Internet Message Format  |  1993-01-07  |  1.9 KB
  1. Xref: sparky comp.lang.c:19348 comp.os.vms:20489
  2. Newsgroups: local.unix.help,comp.lang.c,comp.os.vms
  3. Path: sparky!uunet!haven.umd.edu!decuac!pa.dec.com!engage.pko.dec.com!e2big.mko.dec.com!dbased.nuo.dec.com!quark.enet.dec.com!lionel
  4. From: lionel@quark.enet.dec.com (Steve Lionel)
  5. Subject: Re: Using C to read Fortran Files
  6. Message-ID: <1993Jan7.030702.4174@dbased.nuo.dec.com>
  7. Sender: news@dbased.nuo.dec.com (USENET News System)
  8. Organization: Digital Equipment Corporation
  9. References: <C0Fyo3.70D@ccu.umanitoba.ca> <C0G1rw.81L@ccu.umanitoba.ca> <C0GHCC.Cwp@ccu.umanitoba.ca>
  10. Date: Thu, 7 Jan 1993 02:59:23 GMT
  11. Lines: 43
  12.  
  13.  
  14. In article <C0GHCC.Cwp@ccu.umanitoba.ca>, kaarts@ccu.umanitoba.ca 
  15. (Kenneth John Aarts) writes...
  16. > 
  17. >>I have a fortran program that does essentially
  18. > 
  19. >>    open(unit=1,"test",status='new')
  20. >>    write(1,10) 'cArt'
  21. >>10    format(a4)
  22. >>    end
  23. > 
  24. >>and then a C program that reads it:
  25. > 
  26. >>    int d1,d2,d3,d4,d5;
  27. >>    FILE *fp;
  28. >>    fp=fopen("test","r");
  29. >>    fscanf(fp,"%c%c%c%c%c",&d1,&d2,&d3,&d4,&d5);
  30. >>    printf("%d %d %d %d %d\n",d1,d2,d3,d4,d5);
  31. > 
  32. >>The output of the C program is:
  33. > 
  34. >>  10  65  114  116   13
  35. > 
  36. >>  LF  A    r   t    CR
  37. > 
  38. >>However, a fortran program reading the test program does see cArt.
  39. > 
  40.  
  41. It is the VAX C Run-Time Library which is doing this to you; it "interprets"
  42. the FORTRAN carriage control, turning the leading "c" into an LF, as that's
  43. what would happen if you printed the line on a terminal or printer.  WHY
  44. it does this I don't know, nor do I know how to stop it, but I thought
  45. that at the least you should know where the problem is located.  
  46.  
  47. All I can suggest is that, if possible, open the file from FORTRAN
  48. specifying CARRIAGECONTROL='LIST'.  I'll see what I can dig up about
  49. solutions from the VAX C end.
  50.  
  51. Steve Lionel                    lionel@quark.enet.dec.com
  52. SDT Languages Group
  53. Digital Equipment Corporation
  54. 110 Spit Brook Road
  55. Nashua, NH 03062
  56.