Date: Mon, 17 Jun 2013 15:40:18 -0400 From: Greg Larkin <glarkin@FreeBSD.org> To: Chris Maness <chris@chrismaness.com> Cc: "freebsd-questions@freebsd.org" <freebsd-questions@freebsd.org> Subject: Re: Any BASIC Gurus around? Message-ID: <51BF6622.7050209@FreeBSD.org> In-Reply-To: <CANnsUME-1iYSMHSVyMZW2dpt-mzNbp6R-eBRFAM06duvg9FWkQ@mail.gmail.com> References: <CANnsUMG-2yaGgY-_aXtt2UTTRPCGFgFzhE0_sF74%2B%2Bsaw5Uy1g@mail.gmail.com> <51BF4CF2.4060403@FreeBSD.org> <CANnsUMGtYibAYkn-e2_83PMEvJ=p0JpPjchAkvVZhzBLT4pMkA@mail.gmail.com> <CANnsUME-1iYSMHSVyMZW2dpt-mzNbp6R-eBRFAM06duvg9FWkQ@mail.gmail.com>
next in thread | previous in thread | raw e-mail | index | archive | help
-----BEGIN PGP SIGNED MESSAGE----- Hash: SHA1 On 6/17/13 3:03 PM, Chris Maness wrote: > Oops, here is another patch that includes a correction for the > missing parenthesis that Michael Ross pointed out: > > --- sun.bas.orig2013-06-17 11:51:00.000000000 -0700 +++ > sun.bas2013-06-17 11:57:55.000000000 -0700 @@ -104,7 +104,7 @@ 1020 > ON N GOTO 1030, 1090 1030 IS=133775.*M/SK 1040 PRINT "SUN AZIMUTH > (DEG.) ";AZ -1050 PRINT "SUN ALTITUDE (DOG.) ";HA +1050 PRINT "SUN > ALTITUDE (DEG.) ";HA 1060 PRINT "SUN ILLUMINANCE (LUX) ";IS 1070 > N=2 1080 GOTO 940 @@ -200,7 +200,7 @@ 1980 DS=FNARCSIN(SD) 1990 > RETURN 2000 H=(A(L)-SI*SD)/(CI*COS(D))S -2010 IF ABS(H>1. THEN GOTO > 2040 +2010 IF ABS(H)>1. THEN GOTO 2040 2020 H=FNARCOS(H)*RD/C 2030 > RETURN 2040 H=1.5 > > Thanks, guys. It will be cool if I can figure out why the > interpreter is core dumping. > > Chris Maness Hi Chris, I prepared a new patch that incorporates my fixes, yours and Michael's. I found the coredump - multiple missing right parens on line 1170. Then I ran into another problem on line 430 and made an educated guess with the fix. The new patch is here, and you'll need to apply it to the original version of the program: http://people.freebsd.org/~glarkin/diffs/prog.bas.2.diff Hope that works, Greg - -- Greg Larkin http://www.FreeBSD.org/ - The Power To Serve http://www.sourcehosting.net/ - Ready. Set. Code. http://twitter.com/cpucycle/ - Follow you, follow me -----BEGIN PGP SIGNATURE----- Version: GnuPG v1.4.13 (Darwin) Comment: Using GnuPG with Thunderbird - http://www.enigmail.net/ iEYEARECAAYFAlG/ZiIACgkQ0sRouByUApAjVQCfYAWvfi7sJwa6+og+jcJDsrno jaYAn1vqRecRUn8e1dqU9uI+TMlvjU3Q =9Tnl -----END PGP SIGNATURE-----
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?51BF6622.7050209>