#include <map>
#include <set>
+#include <cstdio>
#include <cstdlib>
#include "location.hh"
CYProgram *program_;
Errors errors_;
+ bool auto_;
+
+ struct Context {
+ CYExpression *context_;
+
+ Context(CYExpression *context) :
+ context_(context)
+ {
+ }
+
+ typedef std::vector<CYWord *> Words;
+ Words words_;
+ };
+
+ typedef std::vector<Context> Contexts;
+ Contexts contexts_;
+
+ CYExpression *context_;
+
+ enum Mode {
+ AutoNone,
+ AutoPrimary,
+ AutoDirect,
+ AutoIndirect,
+ AutoMessage
+ } mode_;
+
private:
void ScannerInit();
void ScannerDestroy();
public:
- CYDriver(const std::string &filename);
+ CYDriver(apr_pool_t *pool = NULL, const std::string &filename = "");
~CYDriver();
Condition GetCondition();
virtual const char *ForEachIn() const;
virtual CYExpression *ForEachIn(CYContext &out);
+ virtual CYExpression *AddArgument(CYContext &context, CYExpression *value);
+
virtual void Output(CYOutput &out) const;
virtual void Output(CYOutput &out, CYFlags flags) const = 0;
void Output(CYOutput &out, unsigned precedence, CYFlags flags) const;
{
}
- void Replace(CYContext &context);
+ virtual CYFunctionParameter *Replace(CYContext &context, CYBlock &code);
+ virtual void Output(CYOutput &out) const;
+};
+
+struct CYOptionalFunctionParameter :
+ CYFunctionParameter
+{
+ CYExpression *initializer_;
+
+ CYOptionalFunctionParameter(CYIdentifier *name, CYExpression *initializer, CYFunctionParameter *next = NULL) :
+ CYFunctionParameter(name, next),
+ initializer_(initializer)
+ {
+ }
+
+ virtual CYFunctionParameter *Replace(CYContext &context, CYBlock &code);
virtual void Output(CYOutput &out) const;
};
virtual CYExpression *Replace(CYContext &context);
virtual void Output(CYOutput &out, CYFlags flags) const;
+
+ virtual CYExpression *AddArgument(CYContext &context, CYExpression *value);
};
struct CYCall :
virtual CYExpression *Replace(CYContext &context);
virtual void Output(CYOutput &out, CYFlags flags) const;
+
+ virtual CYExpression *AddArgument(CYContext &context, CYExpression *value);
+};
+
+struct CYRubyProc;
+
+struct CYRubyBlock :
+ CYExpression
+{
+ CYExpression *call_;
+ CYRubyProc *proc_;
+
+ CYRubyBlock(CYExpression *call, CYRubyProc *proc) :
+ call_(call),
+ proc_(proc)
+ {
+ }
+
+ CYPrecedence(1)
+ CYRightHand(false)
+
+ virtual CYExpression *Replace(CYContext &context);
+ virtual void Output(CYOutput &out, CYFlags flags) const;
};
struct CYIf :
virtual void Output(CYOutput &out, CYFlags flags) const;
};
+// XXX: this should be split up into CYAnonymousFunction and CYNamedFunction (subclass)
struct CYFunction {
CYIdentifier *name_;
CYFunctionParameter *parameters_;
virtual void Output(CYOutput &out, CYFlags flags) const;
};
+// XXX: this should be split up into CYAnonymousFunctionExpression and CYNamedFunctionExpression
struct CYFunctionExpression :
CYFunction,
CYExpression
virtual void Output(CYOutput &out, CYFlags flags) const;
};
+// XXX: this should derive from CYAnonymousFunctionExpression
+struct CYRubyProc :
+ CYFunctionExpression
+{
+ CYRubyProc(CYFunctionParameter *parameters, CYStatement *statements) :
+ CYFunctionExpression(NULL, parameters, statements)
+ {
+ }
+
+ virtual CYExpression *Replace(CYContext &context);
+ virtual void Output(CYOutput &out, CYFlags flags) const;
+};
+
+// XXX: this should derive from CYNamedFunction
struct CYFunctionStatement :
CYFunction,
CYStatement