Prune undefined arguments in final position of calls.

diff --git a/Parser.hpp b/Parser.hpp
index 5e3bfed2680503f9c448b9c7b0999094379c3fb1..3860caa04a891e659b1b8e8a15eae0d59683cb60 100644 (file)
--- a/Parser.hpp
+++ b/Parser.hpp
@@ -1069,7 +1069,7 @@ struct CYArgument :
     {
     }
 
     {
     }
 

-    void Replace(CYContext &context);
+    CYArgument *Replace(CYContext &context);

     void Output(CYOutput &out) const;
 };
 
     void Output(CYOutput &out) const;
 };
 

diff --git a/Replace.cpp b/Replace.cpp
index 3565f66876da7a29a16085ced4206d94ef760b14..d508db0e252b2dd15aea7a9f6c13ce781968cdfd 100644 (file)
--- a/Replace.cpp
+++ b/Replace.cpp
@@ -63,9 +63,18 @@ CYExpression *CYAddressOf::Replace(CYContext &context) {
     return $C0($M(rhs_, $S("$cya")));
 }
 
     return $C0($M(rhs_, $S("$cya")));
 }
 

-void CYArgument::Replace(CYContext &context) { $T()
+CYArgument *CYArgument::Replace(CYContext &context) { $T(NULL)

     context.Replace(value_);
     context.Replace(value_);

-    next_->Replace(context);
+    next_ = next_->Replace(context);
+
+    if (value_ == NULL) {
+        if (next_ == NULL)
+            return NULL;
+        else
+            value_ = $U;
+    }
+
+    return this;

 }
 
 CYExpression *CYArray::Replace(CYContext &context) {
 }
 
 CYExpression *CYArray::Replace(CYContext &context) {


@@ -228,7 +237,7 @@ void CYDeclarations::Replace(CYContext &context) { $T()
 }
 
 CYProperty *CYDeclarations::Property(CYContext &context) { $T(NULL)
 }
 
 CYProperty *CYDeclarations::Property(CYContext &context) { $T(NULL)

-    return $ CYProperty(declaration_->identifier_, declaration_->initialiser_ ?: $U, next_->Property(context));
+    return $ CYProperty(declaration_->identifier_, declaration_->initialiser_, next_->Property(context));

 }
 
 CYFunctionParameter *CYDeclarations::Parameter(CYContext &context) { $T(NULL)
 }
 
 CYFunctionParameter *CYDeclarations::Parameter(CYContext &context) { $T(NULL)


@@ -236,7 +245,7 @@ CYFunctionParameter *CYDeclarations::Parameter(CYContext &context) { $T(NULL)
 }
 
 CYArgument *CYDeclarations::Argument(CYContext &context) { $T(NULL)
 }
 
 CYArgument *CYDeclarations::Argument(CYContext &context) { $T(NULL)

-    return $ CYArgument(declaration_->initialiser_ ?: $U, next_->Argument(context));
+    return $ CYArgument(declaration_->initialiser_, next_->Argument(context));

 }
 
 CYCompound *CYDeclarations::Compound(CYContext &context) { $T(NULL)
 }
 
 CYCompound *CYDeclarations::Compound(CYContext &context) { $T(NULL)


@@ -616,6 +625,8 @@ void CYProgram::Replace(CYContext &context) {
 void CYProperty::Replace(CYContext &context) { $T()
     context.Replace(value_);
     next_->Replace(context);
 void CYProperty::Replace(CYContext &context) { $T()
     context.Replace(value_);
     next_->Replace(context);

+    if (value_ == NULL)
+        value_ = $U;

 }
 
 CYStatement *CYReturn::Replace(CYContext &context) {
 }
 
 CYStatement *CYReturn::Replace(CYContext &context) {