New DumpExpr signature

git-svn-id: svn://svn.cc65.org/cc65/trunk@2640 b7a2c559-68d2-44c3-8de9-860c34a00d81

diff --git a/src/ld65/expr.h b/src/ld65/expr.h
index 03b9a47861bfbccd30649cd968eb8b33688d684d..536f08c41b0fe5bf0a06c8bf1809982df6b63cb7 100644 (file)
--- a/src/ld65/expr.h
+++ b/src/ld65/expr.h
@@ -86,9 +86,6 @@ ExprNode* SegmentExpr (Segment* Seg, long Offs, ObjData* O);
 ExprNode* SectionExpr (Section* Sec, long Offs, ObjData* O);
 /* 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);
 /* Read an expression from the given file */
 

diff --git a/src/ld65/segments.c b/src/ld65/segments.c
index d42320dc8881ee0fac6124a6cdbeda90b3e12ac5..8c8645a8d7425f7761b06860f0f9515a1e939398 100644 (file)
--- a/src/ld65/segments.c
+++ b/src/ld65/segments.c
@@ -385,13 +385,13 @@ void SegDump (void)
                    case FRAG_EXPR:
                        printf ("    Expression (%u bytes):\n", F->Size);
                        printf ("    ");
-                       DumpExpr (F->Expr);
+                       DumpExpr (F->Expr, 0);
                        break;
 
                    case FRAG_SEXPR:
                        printf ("    Signed expression (%u bytes):\n", F->Size);
                        printf ("      ");
-                       DumpExpr (F->Expr);
+                       DumpExpr (F->Expr, 0);
                        break;
 
                    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 */
                    switch (F (Frag->Expr, Sign, Frag->Size, Offs, Data)) {
 
-                       case SEG_EXPR_OK:
-                           break;
+                       case SEG_EXPR_OK:
+                           break;
 
-                       case SEG_EXPR_RANGE_ERROR:
-                           Error ("Range error in module `%s', line %lu",
-                                  GetSourceFileName (Frag->Obj, Frag->Pos.Name),
-                                  Frag->Pos.Line);
-                           break;
+                       case SEG_EXPR_RANGE_ERROR:
+                           Error ("Range error in module `%s', line %lu",
+                                  GetSourceFileName (Frag->Obj, Frag->Pos.Name),
+                                  Frag->Pos.Line);
+                           break;
 
-                       case SEG_EXPR_TOO_COMPLEX:
-                           Error ("Expression too complex in module `%s', line %lu",
-                                  GetSourceFileName (Frag->Obj, Frag->Pos.Name),
+                       case SEG_EXPR_TOO_COMPLEX:
+                           Error ("Expression too complex in module `%s', line %lu",
+                                  GetSourceFileName (Frag->Obj, Frag->Pos.Name),
                                   Frag->Pos.Line);
                            break;