home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #27 / NN_1992_27.iso / spool / comp / lang / perl / 7001 < prev    next >
Encoding:
Internet Message Format  |  1992-11-17  |  2.3 KB
  1. Path: sparky!uunet!ukma!wupost!usc!news!netlabs!lwall
  2. From: lwall@netlabs.com (Larry Wall)
  3. Newsgroups: comp.lang.perl
  4. Subject: Re: Questions on Perl Source Code.
  5. Message-ID: <1992Nov16.191456.21565@netlabs.com>
  6. Date: 16 Nov 92 19:14:56 GMT
  7. References: <5444@daily-planet.concordia.ca> <5445@daily-planet.concordia.ca>
  8. Sender: news@netlabs.com
  9. Organization: NetLabs, Inc.
  10. Lines: 50
  11. Nntp-Posting-Host: scalpel.netlabs.com
  12.  
  13. In article <5445@daily-planet.concordia.ca> marcap@cs.concordia.ca (PAWLOWSKY marc) writes:
  14. : 
  15. : Due to a nasty gotch'a in the 80486 my port of PERL has trouble
  16. : with integers.  In particular 1 becomes 1.000000000000000056.
  17.  
  18. I'd say your sprintf is badly busted...
  19.  
  20. : Now this little beast cause trouble on unformatted outputs, and
  21. : when lists are joined, and even trouble with boolean operators.
  22.  
  23. Certainly.
  24.  
  25. : Now the question is can anybody tell me where are doubles converted
  26. : to strings (is it in sprintf statements allover?)
  27.  
  28. Only one place matters for your purposes.  Look for sprintf() in str.c.
  29.  
  30. : Can anybody
  31. : tell mhere are the logical operators implemented (e.g. ||, &&, ...).
  32.  
  33. Those are in eval.c, but I don't think you'll need to touch them.
  34.  
  35. : Is there a document somewhere that helps explan the C source code.
  36. : I'm looking for some type of overview, explaining what the data 
  37. : structures are, flow control, tht type of thing.
  38.  
  39. An internals document?  Yikes.  If I did that, Perl would now be 582
  40. languages instead of one language.
  41.  
  42. Besides, it'd all be obsolete now anyway.  Perl 5 doesn't even have
  43. str.c or eval.c!  I recommend that you not spend too much time cozying
  44. up to my old code, unless perhaps you're a psychologist, or need one.
  45.  
  46. : Thanks
  47.  
  48. You're welcome.
  49.  
  50. : P.S.  Hint for next version of PERL, include an integer type
  51. : that is freely converted between doubles, strings, and integers
  52. : so this type of portability problem disappears.
  53.  
  54. The ideal in a language like Perl is that scalars always look like
  55. strings to the casual observer, with numeric optimizations occurring
  56. internally.  Though it doesn't currently, Perl 5's compiler could
  57. easily analyze return types and arguments to see where integers can be
  58. substituted for doubles.  Perl 4's compiler simply can't do this,
  59. because it needlessly defers too many decisions to run-time.  It's
  60. one of the reasons I completely scrapped the old compiler.
  61.  
  62. Larry
  63.