X-Git-Url: https://git.saurik.com/cycript.git/blobdiff_plain/62014ea9ffc6c31f053863a89d783475a3937d74..1d5e845a26a006ed88985816d86a5769b6a713b0:/Parser.hpp diff --git a/Parser.hpp b/Parser.hpp index b848c7b..7602a63 100644 --- a/Parser.hpp +++ b/Parser.hpp @@ -1,61 +1,232 @@ -#ifndef CYPARSER_HPP -#define CYPARSER_HPP - -#include +/* Cycript - Optimizing JavaScript Compiler/Runtime + * Copyright (C) 2009-2015 Jay Freeman (saurik) +*/ + +/* GNU Affero General Public License, Version 3 {{{ */ +/* + * This program is free software: you can redistribute it and/or modify + * it under the terms of the GNU Affero General Public License as published by + * the Free Software Foundation, either version 3 of the License, or + * (at your option) any later version. + + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU Affero General Public License for more details. + + * You should have received a copy of the GNU Affero General Public License + * along with this program. If not, see . +**/ +/* }}} */ + +#ifndef CYCRIPT_PARSER_HPP +#define CYCRIPT_PARSER_HPP + +#include #include #include +#include +#include + +#include +#include -#include "location.hh" +#include "List.hpp" +#include "Location.hpp" #include "Pooling.hpp" +#include "Options.hpp" -template -struct CYNext { - Type_ *next_; +struct CYContext; - CYNext() : - next_(NULL) +struct CYThing { + virtual void Output(struct CYOutput &out) const = 0; +}; + +struct CYOutput { + std::streambuf &out_; + CYPosition position_; + + CYOptions &options_; + bool pretty_; + unsigned indent_; + unsigned recent_; + bool right_; + + enum { + NoMode, + NoLetter, + NoPlus, + NoHyphen, + Terminated + } mode_; + + CYOutput(std::streambuf &out, CYOptions &options) : + out_(out), + options_(options), + pretty_(false), + indent_(0), + recent_(0), + right_(false), + mode_(NoMode) { } - CYNext(Type_ *next) : - next_(next) - { + void Check(char value); + void Terminate(); + + _finline void operator ()(char value) { + _assert(out_.sputc(value) != EOF); + recent_ = indent_; + if (value == '\n') + position_.lines(1); + else + position_.columns(1); } - void SetNext(Type_ *next) { - next_ = next; + _finline void operator ()(const char *data, std::streamsize size) { + _assert(out_.sputn(data, size) == size); + recent_ = indent_; + position_.columns(size); + } + + _finline void operator ()(const char *data) { + return operator ()(data, strlen(data)); + } + + CYOutput &operator <<(char rhs); + CYOutput &operator <<(const char *rhs); + + _finline CYOutput &operator <<(const CYThing *rhs) { + if (rhs != NULL) + rhs->Output(*this); + return *this; + } + + _finline CYOutput &operator <<(const CYThing &rhs) { + rhs.Output(*this); + return *this; } }; -struct CYThing { - virtual void Output(std::ostream &out) const = 0; +struct CYPropertyName { + virtual void PropertyName(CYOutput &out) const = 0; }; -_finline std::ostream &operator <<(std::ostream &out, const CYThing &rhs) { - rhs.Output(out); - return out; -} +struct CYExpression; +struct CYAssignment; -struct CYPart { - virtual void Part(std::ostream &out) const = 0; +enum CYNeeded { + CYNever = -1, + CYSometimes = 0, + CYAlways = 1, }; -struct CYSource : - CYNext -{ - virtual void Show(std::ostream &out) const; - virtual void Output(std::ostream &out) const = 0; - virtual void Output(std::ostream &out, bool block) const; +enum CYFlags { + CYNoFlags = 0, + CYNoBrace = (1 << 0), + CYNoFunction = (1 << 1), + CYNoIn = (1 << 2), + CYNoCall = (1 << 3), + CYNoRightHand = (1 << 4), + CYNoDangle = (1 << 5), + CYNoInteger = (1 << 6), + CYNoBF = (CYNoBrace | CYNoFunction), +}; + +_finline CYFlags operator ~(CYFlags rhs) { + return static_cast(~static_cast(rhs)); +} + +_finline CYFlags operator &(CYFlags lhs, CYFlags rhs) { + return static_cast(static_cast(lhs) & static_cast(rhs)); +} + +_finline CYFlags operator |(CYFlags lhs, CYFlags rhs) { + return static_cast(static_cast(lhs) | static_cast(rhs)); +} + +_finline CYFlags &operator |=(CYFlags &lhs, CYFlags rhs) { + return lhs = lhs | rhs; +} + +_finline CYFlags CYLeft(CYFlags flags) { + return flags & ~(CYNoDangle | CYNoInteger); +} + +_finline CYFlags CYRight(CYFlags flags) { + return flags & ~CYNoBF; +} + +_finline CYFlags CYCenter(CYFlags flags) { + return CYLeft(CYRight(flags)); +} + +enum CYCompactType { + CYCompactNone, + CYCompactLong, + CYCompactShort, }; -struct CYName : +#define CYCompact(type) \ + virtual CYCompactType Compact() const { \ + return CYCompact ## type; \ + } + +struct CYStatement : + CYNext, CYThing { - virtual const char *Name() const = 0; + void Single(CYOutput &out, CYFlags flags, CYCompactType request) const; + void Multiple(CYOutput &out, CYFlags flags = CYNoFlags) const; + virtual void Output(CYOutput &out) const; + + virtual CYStatement *Replace(CYContext &context) = 0; + + virtual CYCompactType Compact() const = 0; + virtual CYStatement *Return(); + + private: + virtual void Output(CYOutput &out, CYFlags flags) const = 0; +}; + +struct CYStatements { + CYStatement *first_; + CYStatement *last_; + + CYStatements() : + first_(NULL), + last_(NULL) + { + } + + operator CYStatement *() const { + return first_; + } + + CYStatements &operator ->*(CYStatement *next) { + if (next != NULL) + if (first_ == NULL) { + first_ = next; + last_ = next; + } else for (;; last_ = last_->next_) + if (last_->next_ == NULL) { + last_->next_ = next; + last_ = next; + break; + } + return *this; + } +}; + +struct CYClassName { + virtual CYExpression *ClassName(CYContext &context, bool object) = 0; + virtual void ClassName(CYOutput &out, bool object) const = 0; }; struct CYWord : - CYName + CYThing, + CYPropertyName, + CYClassName { const char *word_; @@ -64,748 +235,1871 @@ struct CYWord : { } - const char *Value() const { - return word_; + void Set(const char *value) { + word_ = value; } - virtual const char *Name() const { - return Value(); - } + virtual const char *Word() const; + virtual void Output(CYOutput &out) const; - virtual void Output(std::ostream &out) const; + virtual CYExpression *ClassName(CYContext &context, bool object); + virtual void ClassName(CYOutput &out, bool object) const; + virtual void PropertyName(CYOutput &out) const; }; +_finline std::ostream &operator <<(std::ostream &lhs, const CYWord &rhs) { + lhs << &rhs << '='; + return lhs << rhs.Word(); +} + struct CYIdentifier : + CYNext, CYWord { + CYIdentifier *replace_; + size_t offset_; + size_t usage_; + CYIdentifier(const char *word) : - CYWord(word) + CYWord(word), + replace_(NULL), + offset_(0), + usage_(0) { } + + virtual const char *Word() const; + CYIdentifier *Replace(CYContext &context); }; struct CYLabel : - CYNext + CYStatement { - CYIdentifier *identifier_; + CYIdentifier *name_; + CYStatement *statement_; - CYLabel(CYIdentifier *identifier, CYLabel *next) : - CYNext(next), - identifier_(identifier) + CYLabel(CYIdentifier *name, CYStatement *statement) : + name_(name), + statement_(statement) { } + + CYCompact(Short) + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; }; -struct CYStatement : - CYSource +struct CYCStringLess : + std::binary_function { - CYLabel *label_; - - void AddLabel(CYIdentifier *identifier) { - label_ = new CYLabel(identifier, label_); + _finline bool operator ()(const char *lhs, const char *rhs) const { + return strcmp(lhs, rhs) < 0; } }; -enum CYState { - CYClear, - CYRestricted, - CYNewLine +struct CYIdentifierValueLess : + std::binary_function +{ + _finline bool operator ()(CYIdentifier *lhs, CYIdentifier *rhs) const { + return CYCStringLess()(lhs->Word(), rhs->Word()); + } }; -class CYDriver { - public: - CYPool pool_; - - CYState state_; - void *scanner_; +enum CYIdentifierFlags { + CYIdentifierArgument, + CYIdentifierVariable, + CYIdentifierOther, + CYIdentifierMagic, + CYIdentifierCatch, +}; - const char *data_; - size_t size_; +typedef std::set CYCStringSet; +typedef std::set CYIdentifierValueSet; +typedef std::map CYIdentifierAddressFlagsMap; - std::string filename_; +struct CYIdentifierUsage { + CYIdentifier *identifier_; + size_t usage_; +}; - struct Error { - cy::location location_; - std::string message_; - }; +typedef std::vector CYIdentifierUsageVector; - typedef std::vector Errors; +struct CYScope { + bool transparent_; + CYScope *parent_; - CYSource *source_; - Errors errors_; + CYIdentifierAddressFlagsMap internal_; + CYIdentifierValueSet identifiers_; - private: - void ScannerInit(); - void ScannerDestroy(); + CYScope(bool transparent, CYContext &context); - public: - CYDriver(const std::string &filename); - ~CYDriver(); + void Declare(CYContext &context, CYIdentifier *identifier, CYIdentifierFlags flags); + virtual CYIdentifier *Lookup(CYContext &context, CYIdentifier *identifier); + void Merge(CYContext &context, CYIdentifier *identifier); + void Close(CYContext &context, CYStatement *&statements); }; -struct CYForInitialiser : - CYPart +struct CYScript : + CYThing { -}; + CYStatement *code_; -struct CYForInInitialiser : - CYPart -{ + CYScript(CYStatement *code) : + code_(code) + { + } + + virtual void Replace(CYContext &context); + virtual void Output(CYOutput &out) const; }; -struct CYExpression : - CYNext, - CYForInitialiser, - CYForInInitialiser -{ - virtual void Part(std::ostream &out) const; - virtual void Output(std::ostream &out) const = 0; - void Output(std::ostream &out, bool raw) const; +struct CYNonLocal; +struct CYThisScope; + +struct CYContext { + CYOptions &options_; + + CYScope *scope_; + CYThisScope *this_; + + CYIdentifierUsageVector rename_; + + CYNonLocal *nonlocal_; + CYNonLocal *nextlocal_; + unsigned unique_; + + CYContext(CYOptions &options) : + options_(options), + scope_(NULL), + this_(NULL), + nonlocal_(NULL), + nextlocal_(NULL), + unique_(0) + { + } + + void ReplaceAll(CYStatement *&statement) { + if (statement == NULL) + return; + CYStatement *next(statement->next_); + + Replace(statement); + ReplaceAll(next); + + if (statement == NULL) + statement = next; + else + statement->SetNext(next); + } + + template + void Replace(Type_ *&value) { + for (;;) if (value == NULL) + break; + else { + Type_ *replace(value->Replace(*this)); + if (replace != value) + value = replace; + else break; + } + } + + void NonLocal(CYStatement *&statements); + CYIdentifier *Unique(); }; -_finline std::ostream &operator <<(std::ostream &out, const CYExpression &rhs) { - rhs.Output(out, false); - return out; -} +struct CYNonLocal { + CYIdentifier *identifier_; -struct CYLiteral : - CYExpression -{ + CYNonLocal() : + identifier_(NULL) + { + } + + CYIdentifier *Target(CYContext &context) { + if (identifier_ == NULL) + identifier_ = context.Unique(); + return identifier_; + } }; -struct CYSelectorPart : - CYNext +struct CYThisScope : + CYNext { - CYWord *name_; - bool value_; + CYIdentifier *identifier_; - CYSelectorPart(CYWord *name, bool value, CYSelectorPart *next) : - CYNext(next), - name_(name), - value_(value) + CYThisScope() : + identifier_(NULL) { } - virtual void Output(std::ostream &out) const; + CYIdentifier *Identifier(CYContext &context) { + if (next_ != NULL) + return next_->Identifier(context); + if (identifier_ == NULL) + identifier_ = context.Unique(); + return identifier_; + } }; -struct CYSelector : - CYLiteral +struct CYBlock : + CYStatement { - CYSelectorPart *name_; + CYStatement *code_; - CYSelector(CYSelectorPart *name) : - name_(name) + CYBlock(CYStatement *code) : + code_(code) { } - virtual void Output(std::ostream &out) const; + CYCompact(Short) + + virtual CYStatement *Replace(CYContext &context); + + virtual void Output(CYOutput &out, CYFlags flags) const; + + virtual CYStatement *Return(); }; -struct CYString : - CYLiteral, - CYName +struct CYForInitializer { + virtual CYExpression *Replace(CYContext &context) = 0; + virtual void Output(CYOutput &out, CYFlags flags) const = 0; +}; + +struct CYForInInitializer { + virtual void ForIn(CYOutput &out, CYFlags flags) const = 0; + virtual CYStatement *ForEachIn(CYContext &out, CYExpression *value) = 0; + + virtual CYExpression *Replace(CYContext &context) = 0; + virtual CYAssignment *Assignment(CYContext &context) = 0; + + virtual void Output(CYOutput &out, CYFlags flags) const = 0; +}; + +struct CYFunctionParameter; + +struct CYNumber; +struct CYString; + +struct CYExpression : + CYForInitializer, + CYForInInitializer, + CYClassName, + CYThing { - const char *value_; - size_t size_; + virtual int Precedence() const = 0; - CYString(const char *value, size_t size) : - value_(value), - size_(size) - { + virtual bool RightHand() const { + return true; } - CYString(const CYIdentifier *identifier) : - value_(identifier->Value()), - size_(strlen(value_)) - { + virtual void ForIn(CYOutput &out, CYFlags flags) const; + virtual CYStatement *ForEachIn(CYContext &out, CYExpression *value); + + 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, int precedence, CYFlags flags) const; + + virtual CYExpression *ClassName(CYContext &context, bool object); + virtual void ClassName(CYOutput &out, bool object) const; + + virtual CYExpression *Replace(CYContext &context) = 0; + virtual CYAssignment *Assignment(CYContext &context); + + virtual CYExpression *Primitive(CYContext &context) { + return NULL; } - const char *Value() const { - return value_; + virtual CYFunctionParameter *Parameter() const; + + virtual CYNumber *Number(CYContext &context) { + return NULL; } - virtual const char *Name() const { - return Value(); + virtual CYString *String(CYContext &context) { + return NULL; } - virtual void Output(std::ostream &out) const; + virtual const char *Word() const { + return NULL; + } }; -struct CYNumber : - CYLiteral, - CYName +#define CYAlphabetic(value) \ + virtual bool Alphabetic() const { \ + return value; \ + } + +#define CYPrecedence(value) \ + static const int Precedence_ = value; \ + virtual int Precedence() const { \ + return Precedence_; \ + } + +#define CYRightHand(value) \ + virtual bool RightHand() const { \ + return value; \ + } + +struct CYCompound : + CYExpression { - double value_; + CYExpression *expression_; + CYExpression *next_; - CYNumber(double value) : - value_(value) + CYCompound(CYExpression *expression, CYExpression *next) : + expression_(expression), + next_(next) { + _assert(expression_ != NULL); + _assert(next != NULL); } - double Value() const { - return value_; - } + CYPrecedence(17) - virtual const char *Name() const { - throw; + virtual CYExpression *Replace(CYContext &context); + void Output(CYOutput &out, CYFlags flags) const; + + virtual CYFunctionParameter *Parameter() const; +}; + +struct CYParenthetical : + CYExpression +{ + CYExpression *expression_; + + CYParenthetical(CYExpression *expression) : + expression_(expression) + { } - virtual void Output(std::ostream &out) const; + CYPrecedence(0) + + virtual CYExpression *Replace(CYContext &context); + void Output(CYOutput &out, CYFlags flags) const; }; -struct CYNull : - CYWord, - CYLiteral +struct CYDeclaration; + +struct CYFunctionParameter : + CYNext, + CYThing { - CYNull() : - CYWord("null") + CYForInInitializer *initialiser_; + + CYFunctionParameter(CYForInInitializer *initialiser, CYFunctionParameter *next = NULL) : + CYNext(next), + initialiser_(initialiser) { } - virtual void Output(std::ostream &out) const; + void Replace(CYContext &context, CYStatement *&statements); + void Output(CYOutput &out) const; }; -struct CYThis : - CYWord, - CYExpression +struct CYComprehension : + CYNext, + CYThing { - CYThis() : - CYWord("this") + CYComprehension(CYComprehension *next = NULL) : + CYNext(next) { } - virtual void Output(std::ostream &out) const; + CYComprehension *Modify(CYComprehension *next) { + next_ = next; + return this; + } + + virtual const char *Name() const = 0; + + virtual CYFunctionParameter *Parameter(CYContext &context) const = 0; + CYFunctionParameter *Parameters(CYContext &context) const; + virtual CYStatement *Replace(CYContext &context, CYStatement *statement) const; + virtual void Output(CYOutput &out) const = 0; }; -struct CYBoolean : - CYLiteral +struct CYForInComprehension : + CYComprehension { - virtual bool Value() const = 0; - virtual void Output(std::ostream &out) const; + CYIdentifier *name_; + CYExpression *set_; + + CYForInComprehension(CYIdentifier *name, CYExpression *set, CYComprehension *next = NULL) : + CYComprehension(next), + name_(name), + set_(set) + { + } + + virtual const char *Name() const { + return name_->Word(); + } + + virtual CYFunctionParameter *Parameter(CYContext &context) const; + virtual CYStatement *Replace(CYContext &context, CYStatement *statement) const; + virtual void Output(CYOutput &out) const; }; -struct CYFalse : - CYWord, - CYBoolean +struct CYForOfComprehension : + CYComprehension { - CYFalse() : - CYWord("false") + CYIdentifier *name_; + CYExpression *set_; + + CYForOfComprehension(CYIdentifier *name, CYExpression *set, CYComprehension *next = NULL) : + CYComprehension(next), + name_(name), + set_(set) { } - virtual bool Value() const { - return false; + virtual const char *Name() const { + return name_->Word(); } + + virtual CYFunctionParameter *Parameter(CYContext &context) const; + virtual CYStatement *Replace(CYContext &context, CYStatement *statement) const; + virtual void Output(CYOutput &out) const; }; -struct CYTrue : - CYWord, - CYBoolean +struct CYIfComprehension : + CYComprehension { - CYTrue() : - CYWord("true") + CYExpression *test_; + + CYIfComprehension(CYExpression *test, CYComprehension *next = NULL) : + CYComprehension(next), + test_(test) { } - virtual bool Value() const { - return true; + virtual const char *Name() const { + return NULL; } + + virtual CYFunctionParameter *Parameter(CYContext &context) const; + virtual CYStatement *Replace(CYContext &context, CYStatement *statement) const; + virtual void Output(CYOutput &out) const; }; -struct CYVariable : +struct CYArrayComprehension : CYExpression { - CYIdentifier *name_; + CYExpression *expression_; + CYComprehension *comprehensions_; - CYVariable(CYIdentifier *name) : - name_(name) + CYArrayComprehension(CYExpression *expression, CYComprehension *comprehensions) : + expression_(expression), + comprehensions_(comprehensions) { } - virtual void Output(std::ostream &out) const; + CYPrecedence(0) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; }; -struct CYPrefix : +struct CYLiteral : CYExpression { - CYExpression *rhs_; + CYPrecedence(0) + CYRightHand(false) + + virtual CYExpression *Primitive(CYContext &context) { + return this; + } +}; + +struct CYTrivial : + CYLiteral +{ + virtual CYExpression *Replace(CYContext &context); +}; + +struct CYMagic : + CYExpression +{ + CYPrecedence(0) + CYRightHand(false) +}; + +struct CYRange { + uint64_t lo_; + uint64_t hi_; + + CYRange(uint64_t lo, uint64_t hi) : + lo_(lo), hi_(hi) + { + } + + bool operator [](uint8_t value) const { + return !(value >> 7) && (value >> 6 ? hi_ : lo_) >> (value & 0x3f) & 0x1; + } + + void operator()(uint8_t value) { + if (value >> 7) + return; + (value >> 6 ? hi_ : lo_) |= uint64_t(0x1) << (value & 0x3f); + } +}; + +extern CYRange DigitRange_; +extern CYRange WordStartRange_; +extern CYRange WordEndRange_; + +struct CYString : + CYTrivial, + CYPropertyName +{ + const char *value_; + size_t size_; + + CYString() : + value_(NULL), + size_(0) + { + } + + CYString(const char *value) : + value_(value), + size_(strlen(value)) + { + } + + CYString(const char *value, size_t size) : + value_(value), + size_(size) + { + } + + CYString(const CYWord *word) : + value_(word->Word()), + size_(strlen(value_)) + { + } + + const char *Value() const { + return value_; + } + + virtual const char *Word() const; + + virtual CYNumber *Number(CYContext &context); + virtual CYString *String(CYContext &context); + + CYString *Concat(CYContext &out, CYString *rhs) const; + virtual void Output(CYOutput &out, CYFlags flags) const; + virtual void PropertyName(CYOutput &out) const; +}; + +struct CYElementValue; + +struct CYSpan : + CYNext +{ + CYExpression *expression_; + CYString *string_; + + CYSpan(CYExpression *expression, CYString *string, CYSpan *next) : + CYNext(next), + expression_(expression), + string_(string) + { + } + + CYElementValue *Replace(CYContext &context); +}; + +struct CYTemplate : + CYExpression +{ + CYString *string_; + CYSpan *spans_; + + CYTemplate(CYString *string, CYSpan *spans) : + string_(string), + spans_(spans) + { + } + + CYPrecedence(0) + CYRightHand(false) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYNumber : + CYTrivial, + CYPropertyName +{ + double value_; + + CYNumber(double value) : + value_(value) + { + } + + double Value() const { + return value_; + } + + virtual CYNumber *Number(CYContext &context); + virtual CYString *String(CYContext &context); + + virtual void Output(CYOutput &out, CYFlags flags) const; + virtual void PropertyName(CYOutput &out) const; +}; + +struct CYRegEx : + CYTrivial +{ + const char *value_; + + CYRegEx(const char *value) : + value_(value) + { + } + + const char *Value() const { + return value_; + } + + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYNull : + CYTrivial +{ + virtual CYNumber *Number(CYContext &context); + virtual CYString *String(CYContext &context); + + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYThis : + CYMagic +{ + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYBoolean : + CYTrivial +{ + virtual bool Value() const = 0; + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYFalse : + CYBoolean +{ + virtual bool Value() const { + return false; + } + + virtual CYNumber *Number(CYContext &context); + virtual CYString *String(CYContext &context); +}; + +struct CYTrue : + CYBoolean +{ + virtual bool Value() const { + return true; + } + + virtual CYNumber *Number(CYContext &context); + virtual CYString *String(CYContext &context); +}; + +struct CYVariable : + CYExpression +{ + CYIdentifier *name_; + + CYVariable(CYIdentifier *name) : + name_(name) + { + } + + CYVariable(const char *name) : + name_(new($pool) CYIdentifier(name)) + { + } + + CYPrecedence(0) + CYRightHand(false) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; + + virtual CYFunctionParameter *Parameter() const; +}; + +struct CYPrefix : + CYExpression +{ + CYExpression *rhs_; + + CYPrefix(CYExpression *rhs) : + rhs_(rhs) + { + } + + virtual bool Alphabetic() const = 0; + virtual const char *Operator() const = 0; + + CYPrecedence(4) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYInfix : + CYExpression +{ + CYExpression *lhs_; + CYExpression *rhs_; + + CYInfix(CYExpression *lhs, CYExpression *rhs) : + lhs_(lhs), + rhs_(rhs) + { + } + + void SetLeft(CYExpression *lhs) { + lhs_ = lhs; + } + + virtual bool Alphabetic() const = 0; + virtual const char *Operator() const = 0; + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYPostfix : + CYExpression +{ + CYExpression *lhs_; + + CYPostfix(CYExpression *lhs) : + lhs_(lhs) + { + } + + virtual const char *Operator() const = 0; + + CYPrecedence(3) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYAssignment : + CYExpression +{ + CYExpression *lhs_; + CYExpression *rhs_; + + CYAssignment(CYExpression *lhs, CYExpression *rhs) : + lhs_(lhs), + rhs_(rhs) + { + } + + void SetLeft(CYExpression *lhs) { + lhs_ = lhs; + } + + virtual const char *Operator() const = 0; + + CYPrecedence(16) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYArgument : + CYNext, + CYThing +{ + CYWord *name_; + CYExpression *value_; + + CYArgument(CYExpression *value, CYArgument *next = NULL) : + CYNext(next), + name_(NULL), + value_(value) + { + } + + CYArgument(CYWord *name, CYExpression *value, CYArgument *next = NULL) : + CYNext(next), + name_(name), + value_(value) + { + } + + CYArgument *Replace(CYContext &context); + void Output(CYOutput &out) const; +}; + +struct CYClause : + CYThing, + CYNext +{ + CYExpression *case_; + CYStatement *code_; + + CYClause(CYExpression *_case, CYStatement *code) : + case_(_case), + code_(code) + { + } + + void Replace(CYContext &context); + virtual void Output(CYOutput &out) const; +}; + +struct CYElement : + CYThing +{ + virtual bool Elision() const = 0; + + virtual void Replace(CYContext &context) = 0; +}; + +struct CYElementValue : + CYNext, + CYElement +{ + CYExpression *value_; + + CYElementValue(CYExpression *value, CYElement *next) : + CYNext(next), + value_(value) + { + } + + virtual bool Elision() const { + return value_ == NULL; + } + + virtual void Replace(CYContext &context); + virtual void Output(CYOutput &out) const; +}; + +struct CYElementSpread : + CYElement +{ + CYExpression *value_; + + CYElementSpread(CYExpression *value) : + value_(value) + { + } + + virtual bool Elision() const { + return false; + } + + virtual void Replace(CYContext &context); + virtual void Output(CYOutput &out) const; +}; + +struct CYArray : + CYLiteral +{ + CYElement *elements_; + + CYArray(CYElement *elements = NULL) : + elements_(elements) + { + } + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYProperty : + CYNext, + CYThing +{ + CYPropertyName *name_; + CYExpression *value_; + + CYProperty(CYPropertyName *name, CYExpression *value, CYProperty *next = NULL) : + CYNext(next), + name_(name), + value_(value) + { + } + + void Replace(CYContext &context); + virtual void Output(CYOutput &out) const; +}; + +struct CYDeclaration : + CYForInInitializer +{ + CYIdentifier *identifier_; + CYExpression *initialiser_; + + CYDeclaration(CYIdentifier *identifier, CYExpression *initialiser = NULL) : + identifier_(identifier), + initialiser_(initialiser) + { + } + + virtual void ForIn(CYOutput &out, CYFlags flags) const; + virtual CYStatement *ForEachIn(CYContext &out, CYExpression *value); + + virtual CYExpression *Replace(CYContext &context); + + virtual CYAssignment *Assignment(CYContext &context); + CYVariable *Variable(CYContext &context); + + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYDeclarations : + CYNext, + CYThing +{ + CYDeclaration *declaration_; + + CYDeclarations(CYDeclaration *declaration, CYDeclarations *next = NULL) : + CYNext(next), + declaration_(declaration) + { + } + + void Replace(CYContext &context); + + CYExpression *Expression(CYContext &context); + CYProperty *Property(CYContext &context); + CYArgument *Argument(CYContext &context); + CYFunctionParameter *Parameter(CYContext &context); + + virtual void Output(CYOutput &out) const; + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYForDeclarations : + CYForInitializer +{ + CYDeclarations *declarations_; + + CYForDeclarations(CYDeclarations *declarations) : + declarations_(declarations) + { + } + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYVar : + CYStatement +{ + CYDeclarations *declarations_; + + CYVar(CYDeclarations *declarations) : + declarations_(declarations) + { + } + + CYCompact(None) + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYLetStatement : + CYStatement +{ + CYDeclarations *declarations_; + CYStatement *code_; + + CYLetStatement(CYDeclarations *declarations, CYStatement *code) : + declarations_(declarations), + code_(code) + { + } + + CYCompact(Long) + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYFor : + CYStatement +{ + CYForInitializer *initialiser_; + CYExpression *test_; + CYExpression *increment_; + CYStatement *code_; + + CYFor(CYForInitializer *initialiser, CYExpression *test, CYExpression *increment, CYStatement *code) : + initialiser_(initialiser), + test_(test), + increment_(increment), + code_(code) + { + } + + CYCompact(Long) + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYForIn : + CYStatement +{ + CYForInInitializer *initialiser_; + CYExpression *set_; + CYStatement *code_; + + CYForIn(CYForInInitializer *initialiser, CYExpression *set, CYStatement *code) : + initialiser_(initialiser), + set_(set), + code_(code) + { + } + + CYCompact(Long) + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYForOf : + CYStatement +{ + CYForInInitializer *initialiser_; + CYExpression *set_; + CYStatement *code_; + + CYForOf(CYForInInitializer *initialiser, CYExpression *set, CYStatement *code) : + initialiser_(initialiser), + set_(set), + code_(code) + { + } + + CYCompact(Long) + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYObject : + CYLiteral +{ + CYProperty *properties_; + + CYObject(CYProperty *properties = NULL) : + properties_(properties) + { + } + + virtual CYExpression *Replace(CYContext &context); + void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYMember : + CYExpression +{ + CYExpression *object_; + CYExpression *property_; + + CYMember(CYExpression *object, CYExpression *property) : + object_(object), + property_(property) + { + } + + void SetLeft(CYExpression *object) { + object_ = object; + } +}; + +struct CYDirectMember : + CYMember +{ + CYDirectMember(CYExpression *object, CYExpression *property) : + CYMember(object, property) + { + } + + CYPrecedence(1) + CYRightHand(false) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYIndirectMember : + CYMember +{ + CYIndirectMember(CYExpression *object, CYExpression *property) : + CYMember(object, property) + { + } + + CYPrecedence(1) + CYRightHand(false) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +namespace cy { +namespace Syntax { + +struct New : + CYExpression +{ + CYExpression *constructor_; + CYArgument *arguments_; + + New(CYExpression *constructor, CYArgument *arguments) : + constructor_(constructor), + arguments_(arguments) + { + } + + virtual int Precedence() const { + return arguments_ == NULL ? 2 : 1; + } + + CYRightHand(false) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; + + virtual CYExpression *AddArgument(CYContext &context, CYExpression *value); +}; + +} } + +struct CYCall : + CYExpression +{ + CYExpression *function_; + CYArgument *arguments_; + + CYCall(CYExpression *function, CYArgument *arguments = NULL) : + function_(function), + arguments_(arguments) + { + } + + CYPrecedence(1) + CYRightHand(false) + + 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 : + CYStatement +{ + CYExpression *test_; + CYStatement *true_; + CYStatement *false_; + + CYIf(CYExpression *test, CYStatement *_true, CYStatement *_false = NULL) : + test_(test), + true_(_true), + false_(_false) + { + } + + CYCompact(Long) + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; + + virtual CYStatement *Return(); +}; + +struct CYDoWhile : + CYStatement +{ + CYExpression *test_; + CYStatement *code_; + + CYDoWhile(CYExpression *test, CYStatement *code) : + test_(test), + code_(code) + { + } + + CYCompact(None) + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYWhile : + CYStatement +{ + CYExpression *test_; + CYStatement *code_; + + CYWhile(CYExpression *test, CYStatement *code) : + test_(test), + code_(code) + { + } + + CYCompact(Long) + + virtual CYStatement *Replace(CYContext &context); + 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_; + CYStatement *code_; + + CYNonLocal *nonlocal_; + bool implicit_; + CYThisScope this_; + + CYFunction(CYIdentifier *name, CYFunctionParameter *parameters, CYStatement *code) : + name_(name), + parameters_(parameters), + code_(code), + nonlocal_(NULL), + implicit_(false) + { + } + + void Inject(CYContext &context); + virtual void Replace_(CYContext &context, bool outer); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +// XXX: this should be split up into CYAnonymousFunctionExpression and CYNamedFunctionExpression +struct CYFunctionExpression : + CYFunction, + CYExpression +{ + CYFunctionExpression(CYIdentifier *name, CYFunctionParameter *parameters, CYStatement *code) : + CYFunction(name, parameters, code) + { + } + + CYPrecedence(0) + CYRightHand(false) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +// XXX: this should derive from CYAnonymousFunction +struct CYFatArrow : + CYFunction, + CYExpression +{ + CYFatArrow(CYFunctionParameter *parameters, CYStatement *code) : + CYFunction(NULL, parameters, code) + { + } + + CYPrecedence(0) + CYRightHand(false) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +// XXX: this should derive from CYAnonymousFunctionExpression +struct CYRubyProc : + CYFunctionExpression +{ + CYRubyProc(CYFunctionParameter *parameters, CYStatement *code) : + CYFunctionExpression(NULL, parameters, code) + { + } + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; - CYPrefix(CYExpression *rhs) : - rhs_(rhs) +// XXX: this should derive from CYNamedFunction +struct CYFunctionStatement : + CYFunction, + CYStatement +{ + CYFunctionStatement(CYIdentifier *name, CYFunctionParameter *parameters, CYStatement *code) : + CYFunction(name, parameters, code) { } - virtual const char *Operator() const = 0; + CYCompact(None) - virtual void Output(std::ostream &out) const; + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; }; -struct CYInfix : - CYExpression +struct CYExpress : + CYStatement { - CYExpression *lhs_; - CYExpression *rhs_; + CYExpression *expression_; - CYInfix(CYExpression *lhs, CYExpression *rhs) : - lhs_(lhs), - rhs_(rhs) + CYExpress(CYExpression *expression) : + expression_(expression) { + if (expression_ == NULL) + throw; } - virtual const char *Operator() const = 0; + CYCompact(None) - virtual void Output(std::ostream &out) const; + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; + + virtual CYStatement *Return(); }; -struct CYPostfix : - CYExpression +struct CYContinue : + CYStatement { - CYExpression *lhs_; + CYIdentifier *label_; - CYPostfix(CYExpression *lhs) : - lhs_(lhs) + CYContinue(CYIdentifier *label) : + label_(label) { } - virtual const char *Operator() const = 0; + CYCompact(Short) - virtual void Output(std::ostream &out) const; + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; }; -struct CYAssignment : - CYInfix +struct CYBreak : + CYStatement { - CYAssignment(CYExpression *lhs, CYExpression *rhs) : - CYInfix(lhs, rhs) + CYIdentifier *label_; + + CYBreak(CYIdentifier *label) : + label_(label) { } - virtual const char *Operator() const = 0; + CYCompact(Short) + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; }; -struct CYArgument : - CYNext +struct CYReturn : + CYStatement { - CYWord *name_; CYExpression *value_; - CYArgument(CYWord *name, CYExpression *value, CYArgument *next = NULL) : - CYNext(next), - name_(name), + CYReturn(CYExpression *value) : value_(value) { } - void Output(std::ostream &out, bool send) const; + CYCompact(None) + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; }; -struct CYBlank : - public CYWord +struct CYEmpty : + CYStatement { - CYBlank() : - CYWord("") - { - } + CYCompact(Short) + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; }; -struct CYClause : - CYThing, - CYNext +struct CYFinally : + CYThing { - CYExpression *case_; CYStatement *code_; - CYClause(CYExpression *_case, CYStatement *code) : - case_(_case), + CYFinally(CYStatement *code) : code_(code) { } - virtual void Output(std::ostream &out) const; + void Replace(CYContext &context); + virtual void Output(CYOutput &out) const; }; -struct CYElement : - CYNext +struct CYTypeSpecifier : + CYThing { - CYExpression *value_; + virtual CYExpression *Replace(CYContext &context) = 0; +}; - CYElement(CYExpression *value, CYElement *next) : - CYNext(next), - value_(value) - { +struct CYTypeError : + CYTypeSpecifier +{ + CYTypeError() { } - void Output(std::ostream &out) const; + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out) const; }; -struct CYArray : - CYLiteral +struct CYTypeVoid : + CYTypeSpecifier { - CYElement *elements_; - - CYArray(CYElement *elements) : - elements_(elements) - { + CYTypeVoid() { } - virtual void Output(std::ostream &out) const; + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out) const; }; -struct CYDeclaration : - CYThing, - CYForInInitialiser +struct CYTypeVariable : + CYTypeSpecifier { - CYIdentifier *identifier_; - CYExpression *initialiser_; + CYIdentifier *name_; - CYDeclaration(CYIdentifier *identifier, CYExpression *initialiser) : - identifier_(identifier), - initialiser_(initialiser) + CYTypeVariable(CYIdentifier *name) : + name_(name) + { + } + + CYTypeVariable(const char *name) : + name_(new($pool) CYIdentifier(name)) { } - virtual void Part(std::ostream &out) const; - virtual void Output(std::ostream &out) const; + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out) const; }; -struct CYDeclarations : - CYStatement, - CYForInitialiser +struct CYTypeUnsigned : + CYTypeSpecifier { - CYDeclaration *declaration_; - CYDeclarations *next_; + CYTypeSpecifier *specifier_; - CYDeclarations(CYDeclaration *declaration, CYDeclarations *next) : - declaration_(declaration), - next_(next) + CYTypeUnsigned(CYTypeSpecifier *specifier) : + specifier_(specifier) { } - virtual void Part(std::ostream &out) const; - virtual void Output(std::ostream &out) const; + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out) const; }; -struct CYParameter : - CYNext, - CYThing +struct CYTypeSigned : + CYTypeSpecifier { - CYIdentifier *name_; + CYTypeSpecifier *specifier_; - CYParameter(CYIdentifier *name, CYParameter *next) : - CYNext(next), - name_(name) + CYTypeSigned(CYTypeSpecifier *specifier) : + specifier_(specifier) { } - virtual void Output(std::ostream &out) const; + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out) const; }; -struct CYFor : - CYStatement +struct CYTypeLong : + CYTypeSpecifier { - CYForInitialiser *initialiser_; - CYExpression *test_; - CYExpression *increment_; - CYStatement *code_; + CYTypeSpecifier *specifier_; - CYFor(CYForInitialiser *initialiser, CYExpression *test, CYExpression *increment, CYStatement *code) : - initialiser_(initialiser), - test_(test), - increment_(increment), - code_(code) + CYTypeLong(CYTypeSpecifier *specifier) : + specifier_(specifier) { } - virtual void Output(std::ostream &out) const; + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out) const; }; -struct CYForIn : - CYStatement +struct CYTypeShort : + CYTypeSpecifier { - CYForInInitialiser *initialiser_; - CYExpression *set_; - CYStatement *code_; + CYTypeSpecifier *specifier_; - CYForIn(CYForInInitialiser *initialiser, CYExpression *set, CYStatement *code) : - initialiser_(initialiser), - set_(set), - code_(code) + CYTypeShort(CYTypeSpecifier *specifier) : + specifier_(specifier) { } - virtual void Output(std::ostream &out) const; + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out) const; }; -struct CYProperty : - CYNext -{ - CYName *name_; - CYExpression *value_; +struct CYTypeFunctionWith; - CYProperty(CYName *name, CYExpression *value, CYProperty *next) : - CYNext(next), - name_(name), - value_(value) +struct CYTypeModifier : + CYNext +{ + CYTypeModifier(CYTypeModifier *next) : + CYNext(next) { } - virtual void Output(std::ostream &out) const; + virtual int Precedence() const = 0; + + virtual CYExpression *Replace_(CYContext &context, CYExpression *type) = 0; + CYExpression *Replace(CYContext &context, CYExpression *type); + + virtual void Output(CYOutput &out, CYIdentifier *identifier) const = 0; + void Output(CYOutput &out, int precedence, CYIdentifier *identifier) const; + + virtual CYTypeFunctionWith *Function() { return NULL; } }; -struct CYObject : - CYLiteral +struct CYTypeArrayOf : + CYTypeModifier { - CYProperty *property_; + CYExpression *size_; - CYObject(CYProperty *property) : - property_(property) + CYTypeArrayOf(CYExpression *size, CYTypeModifier *next = NULL) : + CYTypeModifier(next), + size_(size) { } - void Output(std::ostream &out) const; + CYPrecedence(1) + + virtual CYExpression *Replace_(CYContext &context, CYExpression *type); + virtual void Output(CYOutput &out, CYIdentifier *identifier) const; }; -struct CYCatch : - CYThing +struct CYTypeConstant : + CYTypeModifier { - CYIdentifier *name_; - CYStatement *code_; - - CYCatch(CYIdentifier *name, CYStatement *code) : - name_(name), - code_(code) + CYTypeConstant(CYTypeModifier *next = NULL) : + CYTypeModifier(next) { } - virtual void Output(std::ostream &out) const; + CYPrecedence(0) + + virtual CYExpression *Replace_(CYContext &context, CYExpression *type); + virtual void Output(CYOutput &out, CYIdentifier *identifier) const; }; -struct CYMessage : - CYExpression +struct CYTypePointerTo : + CYTypeModifier { - CYExpression *self_; - CYArgument *arguments_; - - CYMessage(CYExpression *self, CYArgument *arguments) : - self_(self), - arguments_(arguments) + CYTypePointerTo(CYTypeModifier *next = NULL) : + CYTypeModifier(next) { } - virtual void Output(std::ostream &out) const; + CYPrecedence(0) + + virtual CYExpression *Replace_(CYContext &context, CYExpression *type); + virtual void Output(CYOutput &out, CYIdentifier *identifier) const; }; -struct CYMember : - CYExpression +struct CYTypeVolatile : + CYTypeModifier { - CYExpression *object_; - CYExpression *property_; - - CYMember(CYExpression *object, CYExpression *property) : - object_(object), - property_(property) + CYTypeVolatile(CYTypeModifier *next = NULL) : + CYTypeModifier(next) { } - virtual void Output(std::ostream &out) const; + CYPrecedence(0) + + virtual CYExpression *Replace_(CYContext &context, CYExpression *type); + virtual void Output(CYOutput &out, CYIdentifier *identifier) const; }; -struct CYNew : - CYExpression +struct CYTypedIdentifier : + CYNext, + CYThing { - CYExpression *constructor_; - CYArgument *arguments_; + CYLocation location_; + CYIdentifier *identifier_; + CYTypeSpecifier *specifier_; + CYTypeModifier *modifier_; - CYNew(CYExpression *constructor, CYArgument *arguments) : - constructor_(constructor), - arguments_(arguments) + CYTypedIdentifier(const CYLocation &location, CYIdentifier *identifier = NULL) : + location_(location), + identifier_(identifier), + specifier_(NULL), + modifier_(NULL) { } - virtual void Output(std::ostream &out) const; + CYTypedIdentifier(CYTypeSpecifier *specifier, CYTypeModifier *modifier = NULL) : + identifier_(NULL), + specifier_(specifier), + modifier_(modifier) + { + } + + inline CYTypedIdentifier *Modify(CYTypeModifier *modifier) { + CYSetLast(modifier_) = modifier; + return this; + } + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out) const; + + CYTypeFunctionWith *Function(); }; -struct CYCall : +struct CYEncodedType : CYExpression { - CYExpression *function_; - CYArgument *arguments_; + CYTypedIdentifier *typed_; - CYCall(CYExpression *function, CYArgument *arguments) : - function_(function), - arguments_(arguments) + CYEncodedType(CYTypedIdentifier *typed) : + typed_(typed) { } - virtual void Output(std::ostream &out) const; + CYPrecedence(1) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; }; -struct CYIf : - CYStatement +struct CYTypedParameter : + CYNext, + CYThing { - CYExpression *test_; - CYStatement *true_; - CYStatement *false_; + CYTypedIdentifier *typed_; - CYIf(CYExpression *test, CYStatement *_true, CYStatement *_false) : - test_(test), - true_(_true), - false_(_false) + CYTypedParameter(CYTypedIdentifier *typed, CYTypedParameter *next) : + CYNext(next), + typed_(typed) { } - virtual void Output(std::ostream &out) const; + CYArgument *Argument(CYContext &context); + CYFunctionParameter *Parameters(CYContext &context); + CYExpression *TypeSignature(CYContext &context, CYExpression *prefix); + + virtual void Output(CYOutput &out) const; }; -struct CYDoWhile : - CYStatement +struct CYLambda : + CYExpression { - CYExpression *test_; + CYTypedIdentifier *typed_; + CYTypedParameter *parameters_; CYStatement *code_; - CYDoWhile(CYExpression *test, CYStatement *code) : - test_(test), + CYLambda(CYTypedIdentifier *typed, CYTypedParameter *parameters, CYStatement *code) : + typed_(typed), + parameters_(parameters), code_(code) { } - virtual void Output(std::ostream &out) const; + CYPrecedence(1) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; }; -struct CYWhile : - CYStatement +struct CYModule : + CYNext, + CYThing { - CYExpression *test_; - CYStatement *code_; + CYWord *part_; - CYWhile(CYExpression *test, CYStatement *code) : - test_(test), - code_(code) + CYModule(CYWord *part, CYModule *next = NULL) : + CYNext(next), + part_(part) { } - virtual void Output(std::ostream &out) const; + CYString *Replace(CYContext &context, const char *separator) const; + void Output(CYOutput &out) const; }; -struct CYLambda : - CYExpression +struct CYImport : + CYStatement { - CYIdentifier *name_; - CYParameter *parameters_; - CYSource *body_; + CYModule *module_; - CYLambda(CYIdentifier *name, CYParameter *parameters, CYSource *body) : - name_(name), - parameters_(parameters), - body_(body) + CYImport(CYModule *module) : + module_(module) { } - virtual void Output(std::ostream &out) const; + CYCompact(None) + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; }; -struct CYFunction : - CYLambda, - CYSource +struct CYExternal : + CYStatement { - CYFunction(CYIdentifier *name, CYParameter *parameters, CYSource *body) : - CYLambda(name, parameters, body) + CYString *abi_; + CYTypedIdentifier *typed_; + + CYExternal(CYString *abi, CYTypedIdentifier *typed) : + abi_(abi), + typed_(typed) { } - virtual void Output(std::ostream &out) const; + CYCompact(None) + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; }; -struct CYExpress : +struct CYTypeDefinition : CYStatement { - CYExpression *expression_; + CYTypedIdentifier *typed_; - CYExpress(CYExpression *expression) : - expression_(expression) + CYTypeDefinition(CYTypedIdentifier *typed) : + typed_(typed) { } - virtual void Output(std::ostream &out) const; + CYCompact(None) + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; }; -struct CYContinue : - CYStatement +struct CYTypeBlockWith : + CYTypeModifier { - CYIdentifier *label_; + CYTypedParameter *parameters_; - CYContinue(CYIdentifier *label) : - label_(label) + CYTypeBlockWith(CYTypedParameter *parameters, CYTypeModifier *next = NULL) : + CYTypeModifier(next), + parameters_(parameters) { } - virtual void Output(std::ostream &out) const; + CYPrecedence(0) + + virtual CYExpression *Replace_(CYContext &context, CYExpression *type); + virtual void Output(CYOutput &out, CYIdentifier *identifier) const; }; -struct CYBreak : - CYStatement +struct CYTypeFunctionWith : + CYTypeModifier { - CYIdentifier *label_; + CYTypedParameter *parameters_; - CYBreak(CYIdentifier *label) : - label_(label) + CYTypeFunctionWith(CYTypedParameter *parameters, CYTypeModifier *next = NULL) : + CYTypeModifier(next), + parameters_(parameters) { } - virtual void Output(std::ostream &out) const; + CYPrecedence(1) + + virtual CYExpression *Replace_(CYContext &context, CYExpression *type); + virtual void Output(CYOutput &out, CYIdentifier *identifier) const; + + virtual CYTypeFunctionWith *Function() { return this; } }; -struct CYReturn : - CYStatement +namespace cy { +namespace Syntax { + +struct Catch : + CYThing { - CYExpression *value_; + CYIdentifier *name_; + CYStatement *code_; - CYReturn(CYExpression *value) : - value_(value) + Catch(CYIdentifier *name, CYStatement *code) : + name_(name), + code_(code) { } - virtual void Output(std::ostream &out) const; -}; - -struct CYEmpty : - CYStatement -{ - virtual void Output(std::ostream &out) const; - virtual void Output(std::ostream &out, bool block) const; + void Replace(CYContext &context); + virtual void Output(CYOutput &out) const; }; -struct CYTry : +struct Try : CYStatement { - CYStatement *try_; - CYCatch *catch_; - CYStatement *finally_; + CYStatement *code_; + Catch *catch_; + CYFinally *finally_; - CYTry(CYStatement *_try, CYCatch *_catch, CYStatement *finally) : - try_(_try), + Try(CYStatement *code, Catch *_catch, CYFinally *finally) : + code_(code), catch_(_catch), finally_(finally) { } - virtual void Output(std::ostream &out) const; + CYCompact(Short) + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; }; -struct CYThrow : +struct Throw : CYStatement { CYExpression *value_; - CYThrow(CYExpression *value) : + Throw(CYExpression *value = NULL) : value_(value) { } - virtual void Output(std::ostream &out) const; + CYCompact(None) + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; }; +} } + struct CYWith : CYStatement { @@ -818,7 +2112,10 @@ struct CYWith : { } - virtual void Output(std::ostream &out) const; + CYCompact(Long) + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; }; struct CYSwitch : @@ -833,7 +2130,23 @@ struct CYSwitch : { } - virtual void Output(std::ostream &out) const; + CYCompact(Long) + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; +}; + +struct CYDebugger : + CYStatement +{ + CYDebugger() + { + } + + CYCompact(None) + + virtual CYStatement *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; }; struct CYCondition : @@ -844,12 +2157,16 @@ struct CYCondition : CYExpression *false_; CYCondition(CYExpression *test, CYExpression *_true, CYExpression *_false) : + test_(test), true_(_true), false_(_false) { } - virtual void Output(std::ostream &out) const; + CYPrecedence(15) + + virtual CYExpression *Replace(CYContext &context); + virtual void Output(CYOutput &out, CYFlags flags) const; }; struct CYAddressOf : @@ -864,7 +2181,9 @@ struct CYAddressOf : return "&"; } - virtual void Output(std::ostream &out) const; + CYAlphabetic(false) + + virtual CYExpression *Replace(CYContext &context); }; struct CYIndirect : @@ -879,13 +2198,18 @@ struct CYIndirect : return "*"; } - virtual void Output(std::ostream &out) const; + CYAlphabetic(false) + + virtual CYExpression *Replace(CYContext &context); }; -#define CYPostfix_(op, name) \ +#define CYReplace \ + virtual CYExpression *Replace(CYContext &context); + +#define CYPostfix_(op, name, args...) \ struct CY ## name : \ CYPostfix \ - { \ + { args \ CY ## name(CYExpression *lhs) : \ CYPostfix(lhs) \ { \ @@ -896,38 +2220,43 @@ struct CYIndirect : } \ }; -#define CYPrefix_(op, name) \ +#define CYPrefix_(alphabetic, op, name, args...) \ struct CY ## name : \ CYPrefix \ - { \ + { args \ CY ## name(CYExpression *rhs) : \ CYPrefix(rhs) \ { \ } \ + \ + CYAlphabetic(alphabetic) \ \ virtual const char *Operator() const { \ return op; \ } \ }; -#define CYInfix_(op, name) \ +#define CYInfix_(alphabetic, precedence, op, name, args...) \ struct CY ## name : \ CYInfix \ - { \ + { args \ CY ## name(CYExpression *lhs, CYExpression *rhs) : \ CYInfix(lhs, rhs) \ { \ } \ + \ + CYAlphabetic(alphabetic) \ + CYPrecedence(precedence) \ \ virtual const char *Operator() const { \ return op; \ } \ }; -#define CYAssignment_(op, name) \ +#define CYAssignment_(op, name, args...) \ struct CY ## name ## Assign : \ CYAssignment \ - { \ + { args \ CY ## name ## Assign(CYExpression *lhs, CYExpression *rhs) : \ CYAssignment(lhs, rhs) \ { \ @@ -941,38 +2270,39 @@ struct CYIndirect : CYPostfix_("++", PostIncrement) CYPostfix_("--", PostDecrement) -CYPrefix_("delete", Delete) -CYPrefix_("void", Void) -CYPrefix_("typeof", TypeOf) -CYPrefix_("++", PreIncrement) -CYPrefix_("--", PreDecrement) -CYPrefix_("-", Negate) -CYPrefix_("~", BitwiseNot) -CYPrefix_("!", LogicalNot) - -CYInfix_("*", Multiply) -CYInfix_("/", Divide) -CYInfix_("%", Modulus) -CYInfix_("+", Add) -CYInfix_("-", Subtract) -CYInfix_("<<", ShiftLeft) -CYInfix_(">>", ShiftRightSigned) -CYInfix_(">>>", ShiftRightUnsigned) -CYInfix_("<", Less) -CYInfix_(">", Greater) -CYInfix_("<=", LessOrEqual) -CYInfix_(">=", GreaterOrEqual) -CYInfix_("instanceof", InstanceOf) -CYInfix_("in", In) -CYInfix_("==", Equal) -CYInfix_("!=", NotEqual) -CYInfix_("===", Identical) -CYInfix_("!==", NotIdentical) -CYInfix_("&", BitwiseAnd) -CYInfix_("^", BitwiseXOr) -CYInfix_("|", BitwiseOr) -CYInfix_("&&", LogicalAnd) -CYInfix_("||", LogicalOr) +CYPrefix_(true, "delete", Delete) +CYPrefix_(true, "void", Void) +CYPrefix_(true, "typeof", TypeOf) +CYPrefix_(false, "++", PreIncrement) +CYPrefix_(false, "--", PreDecrement) +CYPrefix_(false, "+", Affirm) +CYPrefix_(false, "-", Negate) +CYPrefix_(false, "~", BitwiseNot) +CYPrefix_(false, "!", LogicalNot) + +CYInfix_(false, 5, "*", Multiply, CYReplace) +CYInfix_(false, 5, "/", Divide) +CYInfix_(false, 5, "%", Modulus) +CYInfix_(false, 6, "+", Add, CYReplace) +CYInfix_(false, 6, "-", Subtract) +CYInfix_(false, 7, "<<", ShiftLeft) +CYInfix_(false, 7, ">>", ShiftRightSigned) +CYInfix_(false, 7, ">>>", ShiftRightUnsigned) +CYInfix_(false, 8, "<", Less) +CYInfix_(false, 8, ">", Greater) +CYInfix_(false, 8, "<=", LessOrEqual) +CYInfix_(false, 8, ">=", GreaterOrEqual) +CYInfix_(true, 8, "instanceof", InstanceOf) +CYInfix_(true, 8, "in", In) +CYInfix_(false, 9, "==", Equal) +CYInfix_(false, 9, "!=", NotEqual) +CYInfix_(false, 9, "===", Identical) +CYInfix_(false, 9, "!==", NotIdentical) +CYInfix_(false, 10, "&", BitwiseAnd) +CYInfix_(false, 11, "^", BitwiseXOr) +CYInfix_(false, 12, "|", BitwiseOr) +CYInfix_(false, 13, "&&", LogicalAnd) +CYInfix_(false, 14, "||", LogicalOr) CYAssignment_("=", ) CYAssignment_("*=", Multiply) @@ -987,4 +2317,4 @@ CYAssignment_("&=", BitwiseAnd) CYAssignment_("^=", BitwiseXOr) CYAssignment_("|=", BitwiseOr) -#endif/*CYPARSER_HPP*/ +#endif/*CYCRIPT_PARSER_HPP*/