bslathi19/cc65
1
0
Fork 0
Code Issues Pull Requests Actions 1 Packages Projects Releases Wiki Activity

New DumpExpr signature

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@2640 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
cuz
2003-11-11 13:59:19 +00:00
parent e87bec47d7
commit 8a49256df9
2 changed files with 12 additions and 15 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
src/ld65/expr.h
View File

@@ -86,9 +86,6 @@ ExprNode* SegmentExpr (Segment* Seg, long Offs, ObjData* O);
ExprNode* SectionExpr (Section* Sec, long Offs, ObjData* O); ExprNode* SectionExpr (Section* Sec, long Offs, ObjData* O);
/* Return an expression tree that encodes an offset into a section */ /* Return an expression tree that encodes an offset into a section */
void DumpExpr (const ExprNode* Expr);
/* Dump an expression tree to stdout */
ExprNode* ReadExpr (FILE* F, ObjData* O); ExprNode* ReadExpr (FILE* F, ObjData* O);
/* Read an expression from the given file */ /* Read an expression from the given file */

24
src/ld65/segments.c
View File

@@ -385,13 +385,13 @@ void SegDump (void)
case FRAG_EXPR: case FRAG_EXPR:
printf (" Expression (%u bytes):\n", F->Size); printf (" Expression (%u bytes):\n", F->Size);
printf (" "); printf (" ");
DumpExpr (F->Expr); DumpExpr (F->Expr, 0);
break; break;
case FRAG_SEXPR: case FRAG_SEXPR:
printf (" Signed expression (%u bytes):\n", F->Size); printf (" Signed expression (%u bytes):\n", F->Size);
printf (" "); printf (" ");
DumpExpr (F->Expr); DumpExpr (F->Expr, 0);
break; break;
case FRAG_FILL: case FRAG_FILL:
@@ -493,18 +493,18 @@ void SegWrite (FILE* Tgt, Segment* S, SegWriteFunc F, void* Data)
/* Call the users function and evaluate the result */ /* Call the users function and evaluate the result */
switch (F (Frag->Expr, Sign, Frag->Size, Offs, Data)) { switch (F (Frag->Expr, Sign, Frag->Size, Offs, Data)) {
case SEG_EXPR_OK: case SEG_EXPR_OK:
break; break;
case SEG_EXPR_RANGE_ERROR: case SEG_EXPR_RANGE_ERROR:
Error ("Range error in module `%s', line %lu", Error ("Range error in module `%s', line %lu",
GetSourceFileName (Frag->Obj, Frag->Pos.Name), GetSourceFileName (Frag->Obj, Frag->Pos.Name),
Frag->Pos.Line); Frag->Pos.Line);
break; break;
case SEG_EXPR_TOO_COMPLEX: case SEG_EXPR_TOO_COMPLEX:
Error ("Expression too complex in module `%s', line %lu", Error ("Expression too complex in module `%s', line %lu",
GetSourceFileName (Frag->Obj, Frag->Pos.Name), GetSourceFileName (Frag->Obj, Frag->Pos.Name),
Frag->Pos.Line); Frag->Pos.Line);
break; break;