rev 272 - trunk/src
SVN User <[email protected]>
| Newsgroups | gmane.comp.lang.prothon.cvs |
|---|---|
| Message-ID | <[email protected]> |
Author: bcollins
Date: 2004-04-04 11:08:09 -0400 (Sun, 04 Apr 2004)
New Revision: 272
Modified:
trunk/src/builtins-list.c
Log:
Use correct format and casting for 64-bit type.
Modified: trunk/src/builtins-list.c
===================================================================
--- trunk/src/builtins-list.c 2004-04-04 06:37:55 UTC (rev 271)
+++ trunk/src/builtins-list.c 2004-04-04 15:08:09 UTC (rev 272)
@@ -136,7 +136,8 @@
index1 = (int)(slice_item1->data.i64);
if (index1 < 0) index1 += self_len;
if (index1 < 0 || index1 >= self_len) {
- raise_exception(ist, OBJ(INDEX_EXC), "Index (%d) out of range", index1);
+ raise_exception(ist, OBJ(INDEX_EXC), "Index ("LONG_LONG_FMT") out of range",
+ (LONG_LONG_CAST)index1);
write_unlock(ist, self); read_lock(ist, self);
return NULL;
}
@@ -182,7 +183,8 @@
index2 = (int)(slice_item2->data.i64);
if (index2 < 0) index2 += self_len;
if (index2 < 0 || index2 > self_len) {
- raise_exception(ist, OBJ(INDEX_EXC), "Second index (%d) out of range", index2);
+ raise_exception(ist, OBJ(INDEX_EXC), "Second index ("LONG_LONG_FMT") out of range",
+ (LONG_LONG_CAST)index2);
write_unlock(ist, self); read_lock(ist, self);
return NULL;
}
@@ -248,7 +250,8 @@
index1 = (int)(slice_item1->data.i64);
if (index1 < 0) index1 += self_len;
if (index1 < 0 || index1 >= self_len) {
- raise_exception(ist, OBJ(INDEX_EXC), "Index (%d) out of range", index1);
+ raise_exception(ist, OBJ(INDEX_EXC), "Index ("LONG_LONG_FMT") out of range",
+ (LONG_LONG_CAST)index1);
write_unlock(ist, self); read_lock(ist, self);
return NULL;
}
@@ -291,7 +294,8 @@
index2 = (int)(slice_item2->data.i64);
if (index2 < 0) index2 += self_len;
if (index2 < 0 || index2 > self_len) {
- raise_exception(ist, OBJ(INDEX_EXC), "Second index (%d) out of range", index2);
+ raise_exception(ist, OBJ(INDEX_EXC), "Second index ("LONG_LONG_FMT") out of range",
+ (LONG_LONG_CAST)index2);
write_unlock(ist, self); read_lock(ist, self);
return NULL;
}