Annotation of /branches/vis12/bugs/resolved/bug003.diderot

Parent Directory | Revision Log

---

Revision 2146 - (view) (download)
Original Path: branches/vis12/bugs/bug003.diderot

1 :	glk	2146	/*
2 :
3 :			BUG: Try commenting out the global declaration "real bogus = 0.001;"
4 :			and you'll get an "uncaught exception Fail" (below), even though bogus
5 :			is never needed in the program. Why is it required to have globals?
6 :
7 :			[sqr-bug03.diderot:34.49] Error: syntax error at ;
8 :			[sqr-bug03.diderot:34.43] Error: syntax error; try substituting "[" for ".."
9 :			[sqr-bug03.diderot:34.39] Error: syntax error; try substituting ":" for "in"
10 :			[sqr-bug03.diderot:34.29] Error: syntax error; try inserting ":"
11 :			[sqr-bug03.diderot:30.10] Error: syntax error; try deleting "stabilize ; } } initially"
12 :			[sqr-bug03.diderot:28.33] Error: syntax error; try deleting ";"
13 :			[sqr-bug03.diderot:28.7] Error: syntax error; try inserting "vec4"
14 :			[sqr-bug03.diderot:25.26] Error: syntax error; try deleting "; update { print"
15 :			[sqr-bug03.diderot:24.1] Error: syntax error; try deleting "strand sqroot ( real val ) { output"
16 :			uncaught exception Fail [Fail: Error in compiling sqr-bug03.diderot]
17 :			raised at common/phase-timer.sml:76.50-76.52
18 :			raised at common/phase-timer.sml:76.50-76.52
19 :			raised at common/phase-timer.sml:76.50-76.52
20 :			raised at driver/main.sml:27.39-27.76
21 :			*/
22 :
23 :			//real bogus = 0.001;
24 :			strand sqroot(real val) {
25 :			output real root = val;
26 :			update {
27 :			print("(", val, ") root = ", root, "\n");
28 :			root = (root + val/root)/2;
29 :			if (|root^2 - val|/val < 0.1)
30 :			stabilize;
31 :			}
32 :			}
33 :			// Strand initialization
34 :			initially [ sqroot(realIdx) | realIdx in 1..20 ];

---

root@smlnj-gforge.cs.uchicago.edu	ViewVC Help
Powered by ViewVC 1.0.0