home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #19 / NN_1992_19.iso / spool / comp / lang / perl / 5694 < prev    next >
Encoding:
Text File  |  1992-09-02  |  1.4 KB  |  55 lines
  1. Path: sparky!uunet!haven.umd.edu!mimsy!folta
  2. From: folta@cs.umd.edu (Wayne Folta)
  3. Newsgroups: comp.lang.perl
  4. Subject: perl on dgux
  5. Message-ID: <60061@mimsy.umd.edu>
  6. Date: 3 Sep 92 04:29:50 GMT
  7. Sender: news@mimsy.umd.edu
  8. Distribution: usa
  9. Organization: U of Maryland, Dept. of Computer Science, Coll. Pk., MD 20742
  10. Lines: 43
  11.  
  12. I took perl 4.035 to my nearest AViiON machine and compiled it. The configure
  13. routine had hints for dgux, and I accepted them. It passed all tests with
  14. flying colors. But... but it core dumps on syntax errors in perl scripts.
  15.  
  16. Anyone else had luck with dgux?
  17.  
  18. The facts I know:
  19.  
  20.    dgux 5.4 AViiON mc88100
  21.    gcc DG 1.37 OCS/BCS DG-1.37.31 Apr 25 1991
  22.    perl 4.035
  23.  
  24.    dbx stack traceback:
  25.  
  26.    Stack level 0: 0x57e44 in __doprnt()
  27.                  vsprintf()
  28.                  mess()
  29.                  Myfatal()
  30.                  main()
  31.                  _start()
  32.    
  33.    When perl encounters the syntax error, it prints:
  34.  
  35.       Syntax error in file foo.p at line 2, next 2 tokens "id ("
  36.       Segmentation Fault - core dumped
  37.    
  38.    When it should have printed a second line: "Execution of foo.p aborted due to
  39.    compilation errors". It evidently dies trying to print this. Same problem
  40.    when I use the "-c" option of perl.
  41.  
  42. Anyhow, I can get more facts, if I know what to look for. The perl script I
  43. was trying to compile had:
  44.  
  45.    #!/u2/tester5/bin/perl
  46.    id ($foo) { $x = $foo ; }
  47.  
  48. where the "id" would be correct if "if".
  49.  
  50.    Wayne
  51. -- 
  52.  
  53.  
  54. Wayne Folta          (folta@cs.umd.edu  128.8.128.8)
  55.