const LineInfo* LI;
const char* Module;
- unsigned long Line;
+ unsigned Line;
/* Get the assertion */
Assertion* A = CollAtUnchecked (&Assertions, I);
/* If the expression is not constant, we're not able to handle it */
if (!IsConstExpr (A->Expr)) {
- Warning ("Cannot evaluate assertion in module `%s', line %lu",
+ Warning ("Cannot evaluate assertion in module `%s', line %u",
Module, Line);
} else if (GetExprVal (A->Expr) == 0) {
case ASSERT_ACT_WARN:
case ASSERT_ACT_LDWARN:
- Warning ("%s(%lu): %s", Module, Line, Message);
+ Warning ("%s(%u): %s", Module, Line, Message);
break;
case ASSERT_ACT_ERROR:
case ASSERT_ACT_LDERROR:
- Error ("%s(%lu): %s", Module, Line, Message);
+ Error ("%s(%u): %s", Module, Line, Message);
break;
default:
Internal ("Invalid assertion action (%u) in module `%s', "
- "line %lu (file corrupt?)",
+ "line %u (file corrupt?)",
A->Action, Module, Line);
break;
}
*/
if (ObjHasFiles (I->Obj)) {
const LineInfo* LI = GetImportPos (I);
- Error ("Invalid import size in for `%s', imported from %s(%lu): 0x%02X",
+ Error ("Invalid import size in for `%s', imported from %s(%u): 0x%02X",
GetString (I->Name),
GetSourceName (LI),
GetSourceLine (LI),
*/
if (ObjHasFiles (I->Obj)) {
const LineInfo* LI = GetImportPos (I);
- Error ("Invalid import size in for `%s', imported from %s(%lu): 0x%02X",
+ Error ("Invalid import size in for `%s', imported from %s(%u): 0x%02X",
GetString (I->Name),
GetSourceName (LI),
GetSourceLine (LI),
*/
if (E->Obj) {
/* The export comes from an object file */
- SB_Printf (&ExportLoc, "%s, %s(%lu)",
+ SB_Printf (&ExportLoc, "%s, %s(%u)",
GetString (E->Obj->Name),
GetSourceName (ExportLI),
GetSourceLine (ExportLI));
} else {
- SB_Printf (&ExportLoc, "%s(%lu)",
+ SB_Printf (&ExportLoc, "%s(%u)",
GetSourceName (ExportLI),
GetSourceLine (ExportLI));
}
if (I->Obj) {
/* The import comes from an object file */
- SB_Printf (&ImportLoc, "%s, %s(%lu)",
+ SB_Printf (&ImportLoc, "%s, %s(%u)",
GetString (I->Obj->Name),
GetSourceName (ImportLI),
GetSourceLine (ImportLI));
} else {
- SB_Printf (&ImportLoc, "%s(%lu)",
+ SB_Printf (&ImportLoc, "%s(%u)",
GetSourceName (ImportLI),
GetSourceLine (ImportLI));
}
for (J = 0; J < CollCount (&Imp->RefLines); ++J) {
const LineInfo* LI = CollConstAt (&Imp->RefLines, J);
fprintf (stderr,
- " %s(%lu)\n",
+ " %s(%u)\n",
GetSourceName (LI),
GetSourceLine (LI));
}
/* Print the import */
const LineInfo* LI = GetImportPos (Imp);
fprintf (F,
- " %-25s %s(%lu)\n",
+ " %-25s %s(%u)\n",
GetObjFileName (Imp->Obj),
GetSourceName (LI),
GetSourceLine (LI));
/* Print an error about a circular reference using to define the given export */
{
const LineInfo* LI = GetExportPos (E);
- Error ("Circular reference for symbol `%s', %s(%lu)",
+ Error ("Circular reference for symbol `%s', %s(%u)",
GetString (E->Name),
GetSourceName (LI),
GetSourceLine (LI));
#endif
#if defined(HAVE_INLINE)
-INLINE unsigned long GetFragmentSourceLine (const Fragment* F)
+INLINE unsigned GetFragmentSourceLine (const Fragment* F)
/* Return the source file line for this fragment */
-{
+{
return GetSourceLineFromList (&F->LineInfos);
}
#else
/* Print the start of the line */
fprintf (F,
- "line\tid=%u,file=%u,line=%lu",
+ "line\tid=%u,file=%u,line=%u",
LI->Id, LI->File->Id, GetSourceLine (LI));
/* Print type if not LI_TYPE_ASM and count if not zero */
#endif
#if defined(HAVE_INLINE)
-INLINE unsigned long GetSourceLine (const LineInfo* LI)
+INLINE unsigned GetSourceLine (const LineInfo* LI)
/* Return the source file line from the given line info */
{
return LI->Pos.Line;
#endif
#if defined(HAVE_INLINE)
-INLINE unsigned long GetSourceLineFromList (const Collection* LineInfos)
+INLINE unsigned GetSourceLineFromList (const Collection* LineInfos)
/* Return the source file line from a list of line infos */
{
/* The relevant entry is in slot zero */
#
CC = gcc
-CFLAGS = -g -O2 -Wall -W -std=c89
+CFLAGS = -g -Wall -W -std=c89
override CFLAGS += -I$(COMMON)
override CFLAGS += -DLD65_LIB=$(LD65_LIB) -DLD65_OBJ=$(LD65_OBJ) -DLD65_CFG=$(LD65_CFG)
EBIND = emxbind
break;
case SEG_EXPR_RANGE_ERROR:
- Error ("Range error in module `%s', line %lu",
+ Error ("Range error in module `%s', line %u",
GetFragmentSourceName (Frag),
GetFragmentSourceLine (Frag));
break;
case SEG_EXPR_TOO_COMPLEX:
- Error ("Expression too complex in module `%s', line %lu",
+ Error ("Expression too complex in module `%s', line %u",
GetFragmentSourceName (Frag),
GetFragmentSourceLine (Frag));
break;
case SEG_EXPR_INVALID:
- Error ("Invalid expression in module `%s', line %lu",
+ Error ("Invalid expression in module `%s', line %u",
GetFragmentSourceName (Frag),
GetFragmentSourceLine (Frag));
break;