Minor changes.

gvanrossum · gvanrossum · commit a9df32ab2aaa · 1991-12-31T13:13:35.000Z
diff --git a/Python/compile.c b/Python/compile.c
@@ -329,7 +329,7 @@ com_backpatch(c, anchor)
 	}
 }
 
-/* Handle constants and names uniformly */
+/* Handle literals and names uniformly */
 
 static int
 com_add(c, list, v)
@@ -423,18 +423,23 @@ parsenumber(s)
 	if (*end == '\0') {
 		if (errno != 0) {
 			err_setstr(OverflowError,
-				   "integer constant too large");
+				   "integer literal too large");
 			return NULL;
 		}
 		return newintobject(x);
 	}
 	errno = 0;
 	xx = strtod(s, &end);
 	if (*end == '\0') {
+#ifndef BROKEN_STRTOD
+		/* Some strtod() versions (e.g., in older SunOS systems)
+		   set errno incorrectly; better to ignore overflows
+		   than not to be able to use float literals at all! */
 		if (errno != 0) {
-			err_setstr(OverflowError, "float constant too large");
+			err_setstr(OverflowError, "float literal too large");
 			return NULL;
 		}
+#endif
 		return newfloatobject(xx);
 	}
 	err_setstr(SystemError, "bad number syntax?!?!");
@@ -1258,7 +1263,7 @@ com_assign(c, n, assigning)
 				return;
 			default:
 				err_setstr(TypeError,
-						"can't assign to constant");
+						"can't assign to literal");
 				c->c_errors++;
 				return;
 			}
@@ -1938,7 +1943,7 @@ com_fplist(c, n)
 	struct compiling *c;
 	node *n;
 {
-	REQ(n, fplist); /* fplist: fpdef (',' fpdef)* */
+	REQ(n, fplist); /* fplist: fpdef (',' fpdef)* [','] */
 	if (NCH(n) == 1) {
 		com_fpdef(c, CHILD(n, 0));
 	}

Original file line number	Diff line number	Diff line change
`@@ -329,7 +329,7 @@ com_backpatch(c, anchor)`
`329`	`329`	`}`
`330`	`330`	`}`
`331`	`331`
`332`		`-/* Handle constants and names uniformly */`
	`332`	`+/* Handle literals and names uniformly */`
`333`	`333`
`334`	`334`	`static int`
`335`	`335`	`com_add(c, list, v)`
`@@ -423,18 +423,23 @@ parsenumber(s)`
`423`	`423`	`if (*end == '\0') {`
`424`	`424`	`if (errno != 0) {`
`425`	`425`	`err_setstr(OverflowError,`
`426`		`- "integer constant too large");`
	`426`	`+ "integer literal too large");`
`427`	`427`	`return NULL;`
`428`	`428`	`}`
`429`	`429`	`return newintobject(x);`
`430`	`430`	`}`
`431`	`431`	`errno = 0;`
`432`	`432`	`xx = strtod(s, &end);`
`433`	`433`	`if (*end == '\0') {`
	`434`	`+#ifndef BROKEN_STRTOD`
	`435`	`+ /* Some strtod() versions (e.g., in older SunOS systems)`
	`436`	`+ set errno incorrectly; better to ignore overflows`
	`437`	`+ than not to be able to use float literals at all! */`
`434`	`438`	`if (errno != 0) {`
`435`		`- err_setstr(OverflowError, "float constant too large");`
	`439`	`+ err_setstr(OverflowError, "float literal too large");`
`436`	`440`	`return NULL;`
`437`	`441`	`}`
	`442`	`+#endif`
`438`	`443`	`return newfloatobject(xx);`
`439`	`444`	`}`
`440`	`445`	`err_setstr(SystemError, "bad number syntax?!?!");`
`@@ -1258,7 +1263,7 @@ com_assign(c, n, assigning)`
`1258`	`1263`	`return;`
`1259`	`1264`	`default:`
`1260`	`1265`	`err_setstr(TypeError,`
`1261`		`- "can't assign to constant");`
	`1266`	`+ "can't assign to literal");`
`1262`	`1267`	`c->c_errors++;`
`1263`	`1268`	`return;`
`1264`	`1269`	`}`
`@@ -1938,7 +1943,7 @@ com_fplist(c, n)`
`1938`	`1943`	`struct compiling *c;`
`1939`	`1944`	`node *n;`
`1940`	`1945`	`{`
`1941`		`- REQ(n, fplist); /* fplist: fpdef (',' fpdef)* */`
	`1946`	`+ REQ(n, fplist); /* fplist: fpdef (',' fpdef)* [','] */`
`1942`	`1947`	`if (NCH(n) == 1) {`
`1943`	`1948`	`com_fpdef(c, CHILD(n, 0));`
`1944`	`1949`	`}`