[MacPerl]: timelocal infinite loops???

[bcox@gmu.edu (Brad Cox)]

Does anyone know if the time cache business in timelocal/cheat works
properly with the mac's notion of date bases? Everything I've tried, using
both MacPerl 4 and 5, leads to an infinite loop inside the &cheat routine.
Here's a recent printout of variables from inside the while ($diff = $year
- $g[5]) loop inside &cheat.

timelocal(00, 30, 16, 23, 0, 1996)
year=1996 guess=-1391193353 YearFix=0 epoch5=4
guess=58198886647 this=39 16 22 2 11 78 6 335 0 diff=1900
guess=118353504247 this=55 40 3 19 8 79 3 261 0 diff=1918
guess=178476758647 this=11 5 9 8 6 79 0 188 0 diff=1917
guess=238600013047 this=27 29 14 26 3 79 4 115 0 diff=1917
guess=298723267447 this=43 53 19 12 1 79 1 42 0 diff=1917

The diff=1917 constancy might hold the key


--
    Brad Cox; bcox@gmu.edu; GMU Pgm on Social and Organizational Learning
Fone (703) 968-8229 Fax (703) 934 1578; Web https://virtualschool.edu/mon
       The Middle of Nowhere Web, a project with paradoxical goals