OSDN Git Service

gl_VertexID implementation
[android-x86/external-swiftshader.git] / src / OpenGL / compiler / ParseHelper.cpp
index e8b7f49..7cca42c 100644 (file)
@@ -1,8 +1,16 @@
+// Copyright 2016 The SwiftShader Authors. All Rights Reserved.
 //
-// Copyright (c) 2002-2013 The ANGLE Project Authors. All rights reserved.
-// Use of this source code is governed by a BSD-style license that can be
-// found in the LICENSE file.
+// Licensed under the Apache License, Version 2.0 (the "License");
+// you may not use this file except in compliance with the License.
+// You may obtain a copy of the License at
 //
+//    http://www.apache.org/licenses/LICENSE-2.0
+//
+// Unless required by applicable law or agreed to in writing, software
+// distributed under the License is distributed on an "AS IS" BASIS,
+// WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+// See the License for the specific language governing permissions and
+// limitations under the License.
 
 #include "ParseHelper.h"
 
 //
 ////////////////////////////////////////////////////////////////////////
 
+namespace
+{
+       bool IsVaryingOut(TQualifier qualifier)
+       {
+               switch(qualifier)
+               {
+               case EvqVaryingOut:
+               case EvqSmoothOut:
+               case EvqFlatOut:
+               case EvqCentroidOut:
+               case EvqVertexOut:
+                       return true;
+
+               default: break;
+               }
+
+               return false;
+       }
+
+       bool IsVaryingIn(TQualifier qualifier)
+       {
+               switch(qualifier)
+               {
+               case EvqVaryingIn:
+               case EvqSmoothIn:
+               case EvqFlatIn:
+               case EvqCentroidIn:
+               case EvqFragmentIn:
+                       return true;
+
+               default: break;
+               }
+
+               return false;
+       }
+
+       bool IsVarying(TQualifier qualifier)
+       {
+               return IsVaryingIn(qualifier) || IsVaryingOut(qualifier);
+       }
+
+       bool IsAssignment(TOperator op)
+       {
+               switch(op)
+               {
+               case EOpPostIncrement:
+               case EOpPostDecrement:
+               case EOpPreIncrement:
+               case EOpPreDecrement:
+               case EOpAssign:
+               case EOpAddAssign:
+               case EOpSubAssign:
+               case EOpMulAssign:
+               case EOpVectorTimesMatrixAssign:
+               case EOpVectorTimesScalarAssign:
+               case EOpMatrixTimesScalarAssign:
+               case EOpMatrixTimesMatrixAssign:
+               case EOpDivAssign:
+               case EOpIModAssign:
+               case EOpBitShiftLeftAssign:
+               case EOpBitShiftRightAssign:
+               case EOpBitwiseAndAssign:
+               case EOpBitwiseXorAssign:
+               case EOpBitwiseOrAssign:
+                       return true;
+               default:
+                       return false;
+               }
+       }
+}
+
 //
 // Look at a '.' field selector string and change it into offsets
 // for a vector.
 //
 bool TParseContext::parseVectorFields(const TString& compString, int vecSize, TVectorFields& fields, const TSourceLoc &line)
 {
-    fields.num = (int) compString.size();
-    if (fields.num > 4) {
-        error(line, "illegal vector field selection", compString.c_str());
-        return false;
-    }
-
-    enum {
-        exyzw,
-        ergba,
-        estpq
-    } fieldSet[4];
-
-    for (int i = 0; i < fields.num; ++i) {
-        switch (compString[i])  {
-        case 'x':
-            fields.offsets[i] = 0;
-            fieldSet[i] = exyzw;
-            break;
-        case 'r':
-            fields.offsets[i] = 0;
-            fieldSet[i] = ergba;
-            break;
-        case 's':
-            fields.offsets[i] = 0;
-            fieldSet[i] = estpq;
-            break;
-        case 'y':
-            fields.offsets[i] = 1;
-            fieldSet[i] = exyzw;
-            break;
-        case 'g':
-            fields.offsets[i] = 1;
-            fieldSet[i] = ergba;
-            break;
-        case 't':
-            fields.offsets[i] = 1;
-            fieldSet[i] = estpq;
-            break;
-        case 'z':
-            fields.offsets[i] = 2;
-            fieldSet[i] = exyzw;
-            break;
-        case 'b':
-            fields.offsets[i] = 2;
-            fieldSet[i] = ergba;
-            break;
-        case 'p':
-            fields.offsets[i] = 2;
-            fieldSet[i] = estpq;
-            break;
-        case 'w':
-            fields.offsets[i] = 3;
-            fieldSet[i] = exyzw;
-            break;
-        case 'a':
-            fields.offsets[i] = 3;
-            fieldSet[i] = ergba;
-            break;
-        case 'q':
-            fields.offsets[i] = 3;
-            fieldSet[i] = estpq;
-            break;
-        default:
-            error(line, "illegal vector field selection", compString.c_str());
-            return false;
-        }
-    }
-
-    for (int i = 0; i < fields.num; ++i) {
-        if (fields.offsets[i] >= vecSize) {
-            error(line, "vector field selection out of range",  compString.c_str());
-            return false;
-        }
-
-        if (i > 0) {
-            if (fieldSet[i] != fieldSet[i-1]) {
-                error(line, "illegal - vector component fields not from the same set", compString.c_str());
-                return false;
-            }
-        }
-    }
-
-    return true;
+       fields.num = (int) compString.size();
+       if (fields.num > 4) {
+               error(line, "illegal vector field selection", compString.c_str());
+               return false;
+       }
+
+       enum {
+               exyzw,
+               ergba,
+               estpq
+       } fieldSet[4];
+
+       for (int i = 0; i < fields.num; ++i) {
+               switch (compString[i])  {
+               case 'x':
+                       fields.offsets[i] = 0;
+                       fieldSet[i] = exyzw;
+                       break;
+               case 'r':
+                       fields.offsets[i] = 0;
+                       fieldSet[i] = ergba;
+                       break;
+               case 's':
+                       fields.offsets[i] = 0;
+                       fieldSet[i] = estpq;
+                       break;
+               case 'y':
+                       fields.offsets[i] = 1;
+                       fieldSet[i] = exyzw;
+                       break;
+               case 'g':
+                       fields.offsets[i] = 1;
+                       fieldSet[i] = ergba;
+                       break;
+               case 't':
+                       fields.offsets[i] = 1;
+                       fieldSet[i] = estpq;
+                       break;
+               case 'z':
+                       fields.offsets[i] = 2;
+                       fieldSet[i] = exyzw;
+                       break;
+               case 'b':
+                       fields.offsets[i] = 2;
+                       fieldSet[i] = ergba;
+                       break;
+               case 'p':
+                       fields.offsets[i] = 2;
+                       fieldSet[i] = estpq;
+                       break;
+               case 'w':
+                       fields.offsets[i] = 3;
+                       fieldSet[i] = exyzw;
+                       break;
+               case 'a':
+                       fields.offsets[i] = 3;
+                       fieldSet[i] = ergba;
+                       break;
+               case 'q':
+                       fields.offsets[i] = 3;
+                       fieldSet[i] = estpq;
+                       break;
+               default:
+                       error(line, "illegal vector field selection", compString.c_str());
+                       return false;
+               }
+       }
+
+       for (int i = 0; i < fields.num; ++i) {
+               if (fields.offsets[i] >= vecSize) {
+                       error(line, "vector field selection out of range",  compString.c_str());
+                       return false;
+               }
+
+               if (i > 0) {
+                       if (fieldSet[i] != fieldSet[i-1]) {
+                               error(line, "illegal - vector component fields not from the same set", compString.c_str());
+                               return false;
+                       }
+               }
+       }
+
+       return true;
 }
 
 
@@ -118,46 +197,46 @@ bool TParseContext::parseVectorFields(const TString& compString, int vecSize, TV
 //
 bool TParseContext::parseMatrixFields(const TString& compString, int matCols, int matRows, TMatrixFields& fields, const TSourceLoc &line)
 {
-    fields.wholeRow = false;
-    fields.wholeCol = false;
-    fields.row = -1;
-    fields.col = -1;
-
-    if (compString.size() != 2) {
-        error(line, "illegal length of matrix field selection", compString.c_str());
-        return false;
-    }
-
-    if (compString[0] == '_') {
-        if (compString[1] < '0' || compString[1] > '3') {
-            error(line, "illegal matrix field selection", compString.c_str());
-            return false;
-        }
-        fields.wholeCol = true;
-        fields.col = compString[1] - '0';
-    } else if (compString[1] == '_') {
-        if (compString[0] < '0' || compString[0] > '3') {
-            error(line, "illegal matrix field selection", compString.c_str());
-            return false;
-        }
-        fields.wholeRow = true;
-        fields.row = compString[0] - '0';
-    } else {
-        if (compString[0] < '0' || compString[0] > '3' ||
-            compString[1] < '0' || compString[1] > '3') {
-            error(line, "illegal matrix field selection", compString.c_str());
-            return false;
-        }
-        fields.row = compString[0] - '0';
-        fields.col = compString[1] - '0';
-    }
-
-    if (fields.row >= matRows || fields.col >= matCols) {
-        error(line, "matrix field selection out of range", compString.c_str());
-        return false;
-    }
-
-    return true;
+       fields.wholeRow = false;
+       fields.wholeCol = false;
+       fields.row = -1;
+       fields.col = -1;
+
+       if (compString.size() != 2) {
+               error(line, "illegal length of matrix field selection", compString.c_str());
+               return false;
+       }
+
+       if (compString[0] == '_') {
+               if (compString[1] < '0' || compString[1] > '3') {
+                       error(line, "illegal matrix field selection", compString.c_str());
+                       return false;
+               }
+               fields.wholeCol = true;
+               fields.col = compString[1] - '0';
+       } else if (compString[1] == '_') {
+               if (compString[0] < '0' || compString[0] > '3') {
+                       error(line, "illegal matrix field selection", compString.c_str());
+                       return false;
+               }
+               fields.wholeRow = true;
+               fields.row = compString[0] - '0';
+       } else {
+               if (compString[0] < '0' || compString[0] > '3' ||
+                       compString[1] < '0' || compString[1] > '3') {
+                       error(line, "illegal matrix field selection", compString.c_str());
+                       return false;
+               }
+               fields.row = compString[0] - '0';
+               fields.col = compString[1] - '0';
+       }
+
+       if (fields.row >= matRows || fields.col >= matCols) {
+               error(line, "matrix field selection out of range", compString.c_str());
+               return false;
+       }
+
+       return true;
 }
 
 ///////////////////////////////////////////////////////////////////////
@@ -177,28 +256,26 @@ void TParseContext::recover()
 // Used by flex/bison to output all syntax and parsing errors.
 //
 void TParseContext::error(const TSourceLoc& loc,
-                          const char* reason, const char* token,
-                          const char* extraInfo)
+                                                 const char* reason, const char* token,
+                                                 const char* extraInfo)
 {
-    pp::SourceLocation srcLoc;
-    DecodeSourceLoc(loc, &srcLoc.file, &srcLoc.line);
-    diagnostics.writeInfo(pp::Diagnostics::PP_ERROR,
-                          srcLoc, reason, token, extraInfo);
+       pp::SourceLocation srcLoc(loc.first_file, loc.first_line);
+       mDiagnostics.writeInfo(pp::Diagnostics::PP_ERROR,
+                                                  srcLoc, reason, token, extraInfo);
 
 }
 
 void TParseContext::warning(const TSourceLoc& loc,
-                            const char* reason, const char* token,
-                            const char* extraInfo) {
-    pp::SourceLocation srcLoc;
-    DecodeSourceLoc(loc, &srcLoc.file, &srcLoc.line);
-    diagnostics.writeInfo(pp::Diagnostics::PP_WARNING,
-                          srcLoc, reason, token, extraInfo);
+                                                       const char* reason, const char* token,
+                                                       const char* extraInfo) {
+       pp::SourceLocation srcLoc(loc.first_file, loc.first_line);
+       mDiagnostics.writeInfo(pp::Diagnostics::PP_WARNING,
+                                                  srcLoc, reason, token, extraInfo);
 }
 
 void TParseContext::trace(const char* str)
 {
-    diagnostics.writeDebug(str);
+       mDiagnostics.writeDebug(str);
 }
 
 //
@@ -206,10 +283,10 @@ void TParseContext::trace(const char* str)
 //
 void TParseContext::assignError(const TSourceLoc &line, const char* op, TString left, TString right)
 {
-    std::stringstream extraInfoStream;
-    extraInfoStream << "cannot convert from '" << right << "' to '" << left << "'";
-    std::string extraInfo = extraInfoStream.str();
-    error(line, "", op, extraInfo.c_str());
+       std::stringstream extraInfoStream;
+       extraInfoStream << "cannot convert from '" << right << "' to '" << left << "'";
+       std::string extraInfo = extraInfoStream.str();
+       error(line, "", op, extraInfo.c_str());
 }
 
 //
@@ -217,11 +294,11 @@ void TParseContext::assignError(const TSourceLoc &line, const char* op, TString
 //
 void TParseContext::unaryOpError(const TSourceLoc &line, const char* op, TString operand)
 {
-    std::stringstream extraInfoStream;
-    extraInfoStream << "no operation '" << op << "' exists that takes an operand of type " << operand
-                    << " (or there is no acceptable conversion)";
-    std::string extraInfo = extraInfoStream.str();
-    error(line, " wrong operand type", op, extraInfo.c_str());
+       std::stringstream extraInfoStream;
+       extraInfoStream << "no operation '" << op << "' exists that takes an operand of type " << operand
+                                       << " (or there is no acceptable conversion)";
+       std::string extraInfo = extraInfoStream.str();
+       error(line, " wrong operand type", op, extraInfo.c_str());
 }
 
 //
@@ -229,33 +306,33 @@ void TParseContext::unaryOpError(const TSourceLoc &line, const char* op, TString
 //
 void TParseContext::binaryOpError(const TSourceLoc &line, const char* op, TString left, TString right)
 {
-    std::stringstream extraInfoStream;
-    extraInfoStream << "no operation '" << op << "' exists that takes a left-hand operand of type '" << left 
-                    << "' and a right operand of type '" << right << "' (or there is no acceptable conversion)";
-    std::string extraInfo = extraInfoStream.str();
-    error(line, " wrong operand types ", op, extraInfo.c_str());
+       std::stringstream extraInfoStream;
+       extraInfoStream << "no operation '" << op << "' exists that takes a left-hand operand of type '" << left
+                                       << "' and a right operand of type '" << right << "' (or there is no acceptable conversion)";
+       std::string extraInfo = extraInfoStream.str();
+       error(line, " wrong operand types ", op, extraInfo.c_str());
 }
 
 bool TParseContext::precisionErrorCheck(const TSourceLoc &line, TPrecision precision, TBasicType type){
-    if (!checksPrecisionErrors)
-        return false;
-    switch( type ){
-    case EbtFloat:
-        if( precision == EbpUndefined ){
-            error( line, "No precision specified for (float)", "" );
-            return true;
-        }
-        break;
-    case EbtInt:
-        if( precision == EbpUndefined ){
-            error( line, "No precision specified (int)", "" );
-            return true;
-        }
-        break;
-    default:
-        return false;
-    }
-    return false;
+       if (!mChecksPrecisionErrors)
+               return false;
+       switch( type ){
+       case EbtFloat:
+               if( precision == EbpUndefined ){
+                       error( line, "No precision specified for (float)", "" );
+                       return true;
+               }
+               break;
+       case EbtInt:
+               if( precision == EbpUndefined ){
+                       error( line, "No precision specified (int)", "" );
+                       return true;
+               }
+               break;
+       default:
+               return false;
+       }
+       return false;
 }
 
 //
@@ -266,113 +343,115 @@ bool TParseContext::precisionErrorCheck(const TSourceLoc &line, TPrecision preci
 //
 bool TParseContext::lValueErrorCheck(const TSourceLoc &line, const char* op, TIntermTyped* node)
 {
-    TIntermSymbol* symNode = node->getAsSymbolNode();
-    TIntermBinary* binaryNode = node->getAsBinaryNode();
-
-    if (binaryNode) {
-        bool errorReturn;
-
-        switch(binaryNode->getOp()) {
-        case EOpIndexDirect:
-        case EOpIndexIndirect:
-        case EOpIndexDirectStruct:
-            return lValueErrorCheck(line, op, binaryNode->getLeft());
-        case EOpVectorSwizzle:
-            errorReturn = lValueErrorCheck(line, op, binaryNode->getLeft());
-            if (!errorReturn) {
-                int offset[4] = {0,0,0,0};
-
-                TIntermTyped* rightNode = binaryNode->getRight();
-                TIntermAggregate *aggrNode = rightNode->getAsAggregate();
-
-                for (TIntermSequence::iterator p = aggrNode->getSequence().begin();
-                                               p != aggrNode->getSequence().end(); p++) {
-                    int value = (*p)->getAsTyped()->getAsConstantUnion()->getIConst(0);
-                    offset[value]++;
-                    if (offset[value] > 1) {
-                        error(line, " l-value of swizzle cannot have duplicate components", op);
-
-                        return true;
-                    }
-                }
-            }
-
-            return errorReturn;
-        default:
-            break;
-        }
-        error(line, " l-value required", op);
-
-        return true;
-    }
-
-
-    const char* symbol = 0;
-    if (symNode != 0)
-        symbol = symNode->getSymbol().c_str();
-
-    const char* message = 0;
-    switch (node->getQualifier()) {
-    case EvqConstExpr:      message = "can't modify a const";        break;
-    case EvqConstReadOnly:  message = "can't modify a const";        break;
-    case EvqAttribute:      message = "can't modify an attribute";   break;
-    case EvqFragmentIn:     message = "can't modify an input";       break;
-    case EvqVertexIn:       message = "can't modify an input";       break;
-    case EvqUniform:        message = "can't modify a uniform";      break;
-    case EvqSmoothIn:
-    case EvqFlatIn:
-    case EvqCentroidIn:
-    case EvqVaryingIn:      message = "can't modify a varying";      break;
-    case EvqInput:          message = "can't modify an input";       break;
-    case EvqFragCoord:      message = "can't modify gl_FragCoord";   break;
-    case EvqFrontFacing:    message = "can't modify gl_FrontFacing"; break;
-    case EvqPointCoord:     message = "can't modify gl_PointCoord";  break;
-    case EvqInstanceID:     message = "can't modify gl_InstanceID";  break;
-    default:
-
-        //
-        // Type that can't be written to?
-        //
-        if(IsSampler(node->getBasicType()))
-        {
-            message = "can't modify a sampler";
-        }
-        else if(node->getBasicType() == EbtVoid)
-        {
-            message = "can't modify void";
-        }
-    }
-
-    if (message == 0 && binaryNode == 0 && symNode == 0) {
-        error(line, " l-value required", op);
-
-        return true;
-    }
-
-
-    //
-    // Everything else is okay, no error.
-    //
-    if (message == 0)
-        return false;
-
-    //
-    // If we get here, we have an error and a message.
-    //
-    if (symNode) {
-        std::stringstream extraInfoStream;
-        extraInfoStream << "\"" << symbol << "\" (" << message << ")";
-        std::string extraInfo = extraInfoStream.str();
-        error(line, " l-value required", op, extraInfo.c_str());
-    }
-    else {
-        std::stringstream extraInfoStream;
-        extraInfoStream << "(" << message << ")";
-        std::string extraInfo = extraInfoStream.str();
-        error(line, " l-value required", op, extraInfo.c_str());
-    }
-
-    return true;
+       TIntermSymbol* symNode = node->getAsSymbolNode();
+       TIntermBinary* binaryNode = node->getAsBinaryNode();
+
+       if (binaryNode) {
+               bool errorReturn;
+
+               switch(binaryNode->getOp()) {
+               case EOpIndexDirect:
+               case EOpIndexIndirect:
+               case EOpIndexDirectStruct:
+               case EOpIndexDirectInterfaceBlock:
+                       return lValueErrorCheck(line, op, binaryNode->getLeft());
+               case EOpVectorSwizzle:
+                       errorReturn = lValueErrorCheck(line, op, binaryNode->getLeft());
+                       if (!errorReturn) {
+                               int offset[4] = {0,0,0,0};
+
+                               TIntermTyped* rightNode = binaryNode->getRight();
+                               TIntermAggregate *aggrNode = rightNode->getAsAggregate();
+
+                               for (TIntermSequence::iterator p = aggrNode->getSequence().begin();
+                                                                                          p != aggrNode->getSequence().end(); p++) {
+                                       int value = (*p)->getAsTyped()->getAsConstantUnion()->getIConst(0);
+                                       offset[value]++;
+                                       if (offset[value] > 1) {
+                                               error(line, " l-value of swizzle cannot have duplicate components", op);
+
+                                               return true;
+                                       }
+                               }
+                       }
+
+                       return errorReturn;
+               default:
+                       break;
+               }
+               error(line, " l-value required", op);
+
+               return true;
+       }
+
+
+       const char* symbol = 0;
+       if (symNode != 0)
+               symbol = symNode->getSymbol().c_str();
+
+       const char* message = 0;
+       switch (node->getQualifier()) {
+       case EvqConstExpr:      message = "can't modify a const";        break;
+       case EvqConstReadOnly:  message = "can't modify a const";        break;
+       case EvqAttribute:      message = "can't modify an attribute";   break;
+       case EvqFragmentIn:     message = "can't modify an input";       break;
+       case EvqVertexIn:       message = "can't modify an input";       break;
+       case EvqUniform:        message = "can't modify a uniform";      break;
+       case EvqSmoothIn:
+       case EvqFlatIn:
+       case EvqCentroidIn:
+       case EvqVaryingIn:      message = "can't modify a varying";      break;
+       case EvqInput:          message = "can't modify an input";       break;
+       case EvqFragCoord:      message = "can't modify gl_FragCoord";   break;
+       case EvqFrontFacing:    message = "can't modify gl_FrontFacing"; break;
+       case EvqPointCoord:     message = "can't modify gl_PointCoord";  break;
+       case EvqInstanceID:     message = "can't modify gl_InstanceID";  break;
+       case EvqVertexID:       message = "can't modify gl_VertexID";    break;
+       default:
+
+               //
+               // Type that can't be written to?
+               //
+               if(IsSampler(node->getBasicType()))
+               {
+                       message = "can't modify a sampler";
+               }
+               else if(node->getBasicType() == EbtVoid)
+               {
+                       message = "can't modify void";
+               }
+       }
+
+       if (message == 0 && binaryNode == 0 && symNode == 0) {
+               error(line, " l-value required", op);
+
+               return true;
+       }
+
+
+       //
+       // Everything else is okay, no error.
+       //
+       if (message == 0)
+               return false;
+
+       //
+       // If we get here, we have an error and a message.
+       //
+       if (symNode) {
+               std::stringstream extraInfoStream;
+               extraInfoStream << "\"" << symbol << "\" (" << message << ")";
+               std::string extraInfo = extraInfoStream.str();
+               error(line, " l-value required", op, extraInfo.c_str());
+       }
+       else {
+               std::stringstream extraInfoStream;
+               extraInfoStream << "(" << message << ")";
+               std::string extraInfo = extraInfoStream.str();
+               error(line, " l-value required", op, extraInfo.c_str());
+       }
+
+       return true;
 }
 
 //
@@ -383,12 +462,12 @@ bool TParseContext::lValueErrorCheck(const TSourceLoc &line, const char* op, TIn
 //
 bool TParseContext::constErrorCheck(TIntermTyped* node)
 {
-    if (node->getQualifier() == EvqConstExpr)
-        return false;
+       if (node->getQualifier() == EvqConstExpr)
+               return false;
 
-    error(node->getLine(), "constant expression required", "");
+       error(node->getLine(), "constant expression required", "");
 
-    return true;
+       return true;
 }
 
 //
@@ -399,12 +478,12 @@ bool TParseContext::constErrorCheck(TIntermTyped* node)
 //
 bool TParseContext::integerErrorCheck(TIntermTyped* node, const char* token)
 {
-    if (node->isScalarInt())
-        return false;
+       if (node->isScalarInt())
+               return false;
 
-    error(node->getLine(), "integer expression required", token);
+       error(node->getLine(), "integer expression required", token);
 
-    return true;
+       return true;
 }
 
 //
@@ -415,12 +494,12 @@ bool TParseContext::integerErrorCheck(TIntermTyped* node, const char* token)
 //
 bool TParseContext::globalErrorCheck(const TSourceLoc &line, bool global, const char* token)
 {
-    if (global)
-        return false;
+       if (global)
+               return false;
 
-    error(line, "only allowed at global scope", token);
+       error(line, "only allowed at global scope", token);
 
-    return true;
+       return true;
 }
 
 //
@@ -434,19 +513,19 @@ bool TParseContext::globalErrorCheck(const TSourceLoc &line, bool global, const
 //
 bool TParseContext::reservedErrorCheck(const TSourceLoc &line, const TString& identifier)
 {
-    static const char* reservedErrMsg = "reserved built-in name";
-    if (!symbolTable.atBuiltInLevel()) {
-        if (identifier.compare(0, 3, "gl_") == 0) {
-            error(line, reservedErrMsg, "gl_");
-            return true;
-        }
-        if (identifier.find("__") != TString::npos) {
-            error(line, "identifiers containing two consecutive underscores (__) are reserved as possible future keywords", identifier.c_str());
-            return true;
-        }
-    }
+       static const char* reservedErrMsg = "reserved built-in name";
+       if (!symbolTable.atBuiltInLevel()) {
+               if (identifier.compare(0, 3, "gl_") == 0) {
+                       error(line, reservedErrMsg, "gl_");
+                       return true;
+               }
+               if (identifier.find("__") != TString::npos) {
+                       error(line, "identifiers containing two consecutive underscores (__) are reserved as possible future keywords", identifier.c_str());
+                       return true;
+               }
+       }
 
-    return false;
+       return false;
 }
 
 //
@@ -458,110 +537,104 @@ bool TParseContext::reservedErrorCheck(const TSourceLoc &line, const TString& id
 //
 bool TParseContext::constructorErrorCheck(const TSourceLoc &line, TIntermNode* node, TFunction& function, TOperator op, TType* type)
 {
-    *type = function.getReturnType();
-
-    bool constructingMatrix = false;
-    switch(op) {
-    case EOpConstructMat2:
-    case EOpConstructMat2x3:
-    case EOpConstructMat2x4:
-    case EOpConstructMat3x2:
-    case EOpConstructMat3:
-    case EOpConstructMat3x4:
-    case EOpConstructMat4x2:
-    case EOpConstructMat4x3:
-    case EOpConstructMat4:
-        constructingMatrix = true;
-        break;
-    default:
-        break;
-    }
-
-    //
-    // Note: It's okay to have too many components available, but not okay to have unused
-    // arguments.  'full' will go to true when enough args have been seen.  If we loop
-    // again, there is an extra argument, so 'overfull' will become true.
-    //
-
-    int size = 0;
-    bool constType = true;
-    bool full = false;
-    bool overFull = false;
-    bool matrixInMatrix = false;
-    bool arrayArg = false;
-    for (size_t i = 0; i < function.getParamCount(); ++i) {
-        const TParameter& param = function.getParam(i);
-        size += param.type->getObjectSize();
-
-        if (constructingMatrix && param.type->isMatrix())
-            matrixInMatrix = true;
-        if (full)
-            overFull = true;
-        if (op != EOpConstructStruct && !type->isArray() && size >= type->getObjectSize())
-            full = true;
-        if (param.type->getQualifier() != EvqConstExpr)
-            constType = false;
-        if (param.type->isArray())
-            arrayArg = true;
-    }
-
-    if (constType)
-        type->setQualifier(EvqConstExpr);
-
-    if(type->isArray()) {
-        if(type->getArraySize() == 0) {
-            type->setArraySize(function.getParamCount());
-        } else if(type->getArraySize() != function.getParamCount()) {
-            error(line, "array constructor needs one argument per array element", "constructor");
-            return true;
-        }
-    }
-
-    if (arrayArg && op != EOpConstructStruct) {
-        error(line, "constructing from a non-dereferenced array", "constructor");
-        return true;
-    }
-
-    if (matrixInMatrix && !type->isArray()) {
-        if (function.getParamCount() != 1) {
-          error(line, "constructing matrix from matrix can only take one argument", "constructor");
-          return true;
-        }
-    }
-
-    if (overFull) {
-        error(line, "too many arguments", "constructor");
-        return true;
-    }
-
-    if (op == EOpConstructStruct && !type->isArray() && int(type->getStruct()->fields().size()) != function.getParamCount()) {
-        error(line, "Number of constructor parameters does not match the number of structure fields", "constructor");
-        return true;
-    }
-
-    if (!type->isMatrix() || !matrixInMatrix) {
-        if ((op != EOpConstructStruct && size != 1 && size < type->getObjectSize()) ||
-            (op == EOpConstructStruct && size < type->getObjectSize())) {
-            error(line, "not enough data provided for construction", "constructor");
-            return true;
-        }
-    }
-
-    TIntermTyped *typed = node ? node->getAsTyped() : 0;
-    if (typed == 0) {
-        error(line, "constructor argument does not have a type", "constructor");
-        return true;
-    }
-    if (op != EOpConstructStruct && IsSampler(typed->getBasicType())) {
-        error(line, "cannot convert a sampler", "constructor");
-        return true;
-    }
-    if (typed->getBasicType() == EbtVoid) {
-        error(line, "cannot convert a void", "constructor");
-        return true;
-    }
-
-    return false;
+       *type = function.getReturnType();
+
+       bool constructingMatrix = false;
+       switch(op) {
+       case EOpConstructMat2:
+       case EOpConstructMat2x3:
+       case EOpConstructMat2x4:
+       case EOpConstructMat3x2:
+       case EOpConstructMat3:
+       case EOpConstructMat3x4:
+       case EOpConstructMat4x2:
+       case EOpConstructMat4x3:
+       case EOpConstructMat4:
+               constructingMatrix = true;
+               break;
+       default:
+               break;
+       }
+
+       //
+       // Note: It's okay to have too many components available, but not okay to have unused
+       // arguments.  'full' will go to true when enough args have been seen.  If we loop
+       // again, there is an extra argument, so 'overfull' will become true.
+       //
+
+       size_t size = 0;
+       bool full = false;
+       bool overFull = false;
+       bool matrixInMatrix = false;
+       bool arrayArg = false;
+       for (size_t i = 0; i < function.getParamCount(); ++i) {
+               const TParameter& param = function.getParam(i);
+               size += param.type->getObjectSize();
+
+               if (constructingMatrix && param.type->isMatrix())
+                       matrixInMatrix = true;
+               if (full)
+                       overFull = true;
+               if (op != EOpConstructStruct && !type->isArray() && size >= type->getObjectSize())
+                       full = true;
+               if (param.type->isArray())
+                       arrayArg = true;
+       }
+
+       if(type->isArray()) {
+               if(type->getArraySize() == 0) {
+                       type->setArraySize(function.getParamCount());
+               } else if(type->getArraySize() != (int)function.getParamCount()) {
+                       error(line, "array constructor needs one argument per array element", "constructor");
+                       return true;
+               }
+       }
+
+       if (arrayArg && op != EOpConstructStruct) {
+               error(line, "constructing from a non-dereferenced array", "constructor");
+               return true;
+       }
+
+       if (matrixInMatrix && !type->isArray()) {
+               if (function.getParamCount() != 1) {
+                 error(line, "constructing matrix from matrix can only take one argument", "constructor");
+                 return true;
+               }
+       }
+
+       if (overFull) {
+               error(line, "too many arguments", "constructor");
+               return true;
+       }
+
+       if (op == EOpConstructStruct && !type->isArray() && type->getStruct()->fields().size() != function.getParamCount()) {
+               error(line, "Number of constructor parameters does not match the number of structure fields", "constructor");
+               return true;
+       }
+
+       if (!type->isMatrix() || !matrixInMatrix) {
+               if ((op != EOpConstructStruct && size != 1 && size < type->getObjectSize()) ||
+                       (op == EOpConstructStruct && size < type->getObjectSize())) {
+                       error(line, "not enough data provided for construction", "constructor");
+                       return true;
+               }
+       }
+
+       TIntermTyped *typed = node ? node->getAsTyped() : 0;
+       if (typed == 0) {
+               error(line, "constructor argument does not have a type", "constructor");
+               return true;
+       }
+       if (op != EOpConstructStruct && IsSampler(typed->getBasicType())) {
+               error(line, "cannot convert a sampler", "constructor");
+               return true;
+       }
+       if (typed->getBasicType() == EbtVoid) {
+               error(line, "cannot convert a void", "constructor");
+               return true;
+       }
+
+       return false;
 }
 
 // This function checks to see if a void variable has been declared and raise an error message for such a case
@@ -570,12 +643,12 @@ bool TParseContext::constructorErrorCheck(const TSourceLoc &line, TIntermNode* n
 //
 bool TParseContext::voidErrorCheck(const TSourceLoc &line, const TString& identifier, const TBasicType& type)
 {
-    if(type == EbtVoid) {
-        error(line, "illegal use of type 'void'", identifier.c_str());
-        return true;
-    }
+       if(type == EbtVoid) {
+               error(line, "illegal use of type 'void'", identifier.c_str());
+               return true;
+       }
 
-    return false;
+       return false;
 }
 
 // This function checks to see if the node (for the expression) contains a scalar boolean expression or not
@@ -584,12 +657,12 @@ bool TParseContext::voidErrorCheck(const TSourceLoc &line, const TString& identi
 //
 bool TParseContext::boolErrorCheck(const TSourceLoc &line, const TIntermTyped* type)
 {
-    if (type->getBasicType() != EbtBool || type->isArray() || type->isMatrix() || type->isVector()) {
-        error(line, "boolean expression expected", "");
-        return true;
-    }
+       if (type->getBasicType() != EbtBool || type->isArray() || type->isMatrix() || type->isVector()) {
+               error(line, "boolean expression expected", "");
+               return true;
+       }
 
-    return false;
+       return false;
 }
 
 // This function checks to see if the node (for the expression) contains a scalar boolean expression or not
@@ -598,31 +671,31 @@ bool TParseContext::boolErrorCheck(const TSourceLoc &line, const TIntermTyped* t
 //
 bool TParseContext::boolErrorCheck(const TSourceLoc &line, const TPublicType& pType)
 {
-    if (pType.type != EbtBool || pType.array || (pType.primarySize > 1) || (pType.secondarySize > 1)) {
-        error(line, "boolean expression expected", "");
-        return true;
-    }
+       if (pType.type != EbtBool || pType.array || (pType.primarySize > 1) || (pType.secondarySize > 1)) {
+               error(line, "boolean expression expected", "");
+               return true;
+       }
 
-    return false;
+       return false;
 }
 
 bool TParseContext::samplerErrorCheck(const TSourceLoc &line, const TPublicType& pType, const char* reason)
 {
-    if (pType.type == EbtStruct) {
-        if (containsSampler(*pType.userDef)) {
-            error(line, reason, getBasicString(pType.type), "(structure contains a sampler)");
+       if (pType.type == EbtStruct) {
+               if (containsSampler(*pType.userDef)) {
+                       error(line, reason, getBasicString(pType.type), "(structure contains a sampler)");
 
-            return true;
-        }
+                       return true;
+               }
 
-        return false;
-    } else if (IsSampler(pType.type)) {
-        error(line, reason, getBasicString(pType.type));
+               return false;
+       } else if (IsSampler(pType.type)) {
+               error(line, reason, getBasicString(pType.type));
 
-        return true;
-    }
+               return true;
+       }
 
-    return false;
+       return false;
 }
 
 bool TParseContext::structQualifierErrorCheck(const TSourceLoc &line, const TPublicType& pType)
@@ -651,19 +724,17 @@ bool TParseContext::structQualifierErrorCheck(const TSourceLoc &line, const TPub
                break;
        }
 
-    if (pType.qualifier != EvqUniform && samplerErrorCheck(line, pType, "samplers must be uniform"))
-        return true;
+       if (pType.qualifier != EvqUniform && samplerErrorCheck(line, pType, "samplers must be uniform"))
+               return true;
 
        // check for layout qualifier issues
-       const TLayoutQualifier layoutQualifier = pType.layoutQualifier;
-
        if (pType.qualifier != EvqVertexIn && pType.qualifier != EvqFragmentOut &&
-           layoutLocationErrorCheck(line, pType.layoutQualifier))
+               layoutLocationErrorCheck(line, pType.layoutQualifier))
        {
                return true;
        }
 
-    return false;
+       return false;
 }
 
 // These checks are common for all declarations starting a declarator list, and declarators that follow an empty
@@ -744,29 +815,29 @@ bool TParseContext::locationDeclaratorListCheck(const TSourceLoc& line, const TP
 
 bool TParseContext::parameterSamplerErrorCheck(const TSourceLoc &line, TQualifier qualifier, const TType& type)
 {
-    if ((qualifier == EvqOut || qualifier == EvqInOut) &&
-             type.getBasicType() != EbtStruct && IsSampler(type.getBasicType())) {
-        error(line, "samplers cannot be output parameters", type.getBasicString());
-        return true;
-    }
+       if ((qualifier == EvqOut || qualifier == EvqInOut) &&
+                        type.getBasicType() != EbtStruct && IsSampler(type.getBasicType())) {
+               error(line, "samplers cannot be output parameters", type.getBasicString());
+               return true;
+       }
 
-    return false;
+       return false;
 }
 
 bool TParseContext::containsSampler(TType& type)
 {
-    if (IsSampler(type.getBasicType()))
-        return true;
+       if (IsSampler(type.getBasicType()))
+               return true;
 
-    if (type.getBasicType() == EbtStruct) {
-        const TFieldList& fields = type.getStruct()->fields();
-        for(unsigned int i = 0; i < fields.size(); ++i) {
-            if (containsSampler(*fields[i]->type()))
-                return true;
-        }
-    }
+       if (type.getBasicType() == EbtStruct || type.isInterfaceBlock()) {
+               const TFieldList& fields = type.getStruct()->fields();
+               for(unsigned int i = 0; i < fields.size(); ++i) {
+                       if (containsSampler(*fields[i]->type()))
+                               return true;
+               }
+       }
 
-    return false;
+       return false;
 }
 
 //
@@ -776,39 +847,45 @@ bool TParseContext::containsSampler(TType& type)
 //
 bool TParseContext::arraySizeErrorCheck(const TSourceLoc &line, TIntermTyped* expr, int& size)
 {
-    TIntermConstantUnion* constant = expr->getAsConstantUnion();
+       TIntermConstantUnion* constant = expr->getAsConstantUnion();
+
+       if (expr->getQualifier() != EvqConstExpr || constant == 0 || !constant->isScalarInt())
+       {
+               error(line, "array size must be a constant integer expression", "");
+               return true;
+       }
 
-    if (constant == 0 || !constant->isScalarInt())
-    {
-        error(line, "array size must be a constant integer expression", "");
-        return true;
-    }
+       if (constant->getBasicType() == EbtUInt)
+       {
+               unsigned int uintSize = constant->getUConst(0);
+               if (uintSize > static_cast<unsigned int>(std::numeric_limits<int>::max()))
+               {
+                       error(line, "array size too large", "");
+                       size = 1;
+                       return true;
+               }
 
-    if (constant->getBasicType() == EbtUInt)
-    {
-        unsigned int uintSize = constant->getUConst(0);
-        if (uintSize > static_cast<unsigned int>(std::numeric_limits<int>::max()))
-        {
-            error(line, "array size too large", "");
-            size = 1;
-            return true;
-        }
+               size = static_cast<int>(uintSize);
+       }
+       else
+       {
+               size = constant->getIConst(0);
 
-        size = static_cast<int>(uintSize);
-    }
-    else
-    {
-        size = constant->getIConst(0);
+               if (size < 0)
+               {
+                       error(line, "array size must be non-negative", "");
+                       size = 1;
+                       return true;
+               }
+       }
 
-        if (size <= 0)
-        {
-            error(line, "array size must be a positive integer", "");
-            size = 1;
-            return true;
-        }
-    }
+       if(size == 0)
+       {
+               error(line, "array size must be greater than zero", "");
+               return true;
+       }
 
-    return false;
+       return false;
 }
 
 //
@@ -818,12 +895,12 @@ bool TParseContext::arraySizeErrorCheck(const TSourceLoc &line, TIntermTyped* ex
 //
 bool TParseContext::arrayQualifierErrorCheck(const TSourceLoc &line, TPublicType type)
 {
-    if ((type.qualifier == EvqAttribute) || (type.qualifier == EvqVertexIn) || (type.qualifier == EvqConstExpr)) {
-        error(line, "cannot declare arrays of this qualifier", TType(type).getCompleteString().c_str());
-        return true;
-    }
+       if ((type.qualifier == EvqAttribute) || (type.qualifier == EvqVertexIn) || (type.qualifier == EvqConstExpr && mShaderVersion < 300)) {
+               error(line, "cannot declare arrays of this qualifier", TType(type).getCompleteString().c_str());
+               return true;
+       }
 
-    return false;
+       return false;
 }
 
 //
@@ -833,59 +910,68 @@ bool TParseContext::arrayQualifierErrorCheck(const TSourceLoc &line, TPublicType
 //
 bool TParseContext::arrayTypeErrorCheck(const TSourceLoc &line, TPublicType type)
 {
-    //
-    // Can the type be an array?
-    //
-    if (type.array) {
-        error(line, "cannot declare arrays of arrays", TType(type).getCompleteString().c_str());
-        return true;
-    }
+       //
+       // Can the type be an array?
+       //
+       if (type.array) {
+               error(line, "cannot declare arrays of arrays", TType(type).getCompleteString().c_str());
+               return true;
+       }
 
-    return false;
+       // In ESSL1.00 shaders, structs cannot be varying (section 4.3.5). This is checked elsewhere.
+       // In ESSL3.00 shaders, struct inputs/outputs are allowed but not arrays of structs (section 4.3.4).
+       if(mShaderVersion >= 300 && type.type == EbtStruct && IsVarying(type.qualifier))
+       {
+               error(line, "cannot declare arrays of structs of this qualifier",
+                     TType(type).getCompleteString().c_str());
+               return true;
+       }
+
+       return false;
 }
 
 bool TParseContext::arraySetMaxSize(TIntermSymbol *node, TType* type, int size, bool updateFlag, const TSourceLoc &line)
 {
-    bool builtIn = false;
-    TSymbol* symbol = symbolTable.find(node->getSymbol(), shaderVersion, &builtIn);
-    if (symbol == 0) {
-        error(line, " undeclared identifier", node->getSymbol().c_str());
-        return true;
-    }
-    TVariable* variable = static_cast<TVariable*>(symbol);
+       bool builtIn = false;
+       TSymbol* symbol = symbolTable.find(node->getSymbol(), mShaderVersion, &builtIn);
+       if (symbol == 0) {
+               error(line, " undeclared identifier", node->getSymbol().c_str());
+               return true;
+       }
+       TVariable* variable = static_cast<TVariable*>(symbol);
 
-    type->setArrayInformationType(variable->getArrayInformationType());
-    variable->updateArrayInformationType(type);
+       type->setArrayInformationType(variable->getArrayInformationType());
+       variable->updateArrayInformationType(type);
 
-    // special casing to test index value of gl_FragData. If the accessed index is >= gl_MaxDrawBuffers
-    // its an error
-    if (node->getSymbol() == "gl_FragData") {
-        TSymbol* fragData = symbolTable.find("gl_MaxDrawBuffers", shaderVersion, &builtIn);
-        ASSERT(fragData);
+       // special casing to test index value of gl_FragData. If the accessed index is >= gl_MaxDrawBuffers
+       // its an error
+       if (node->getSymbol() == "gl_FragData") {
+               TSymbol* fragData = symbolTable.find("gl_MaxDrawBuffers", mShaderVersion, &builtIn);
+               ASSERT(fragData);
 
-        int fragDataValue = static_cast<TVariable*>(fragData)->getConstPointer()[0].getIConst();
-        if (fragDataValue <= size) {
-            error(line, "", "[", "gl_FragData can only have a max array size of up to gl_MaxDrawBuffers");
-            return true;
-        }
-    }
+               int fragDataValue = static_cast<TVariable*>(fragData)->getConstPointer()[0].getIConst();
+               if (fragDataValue <= size) {
+                       error(line, "", "[", "gl_FragData can only have a max array size of up to gl_MaxDrawBuffers");
+                       return true;
+               }
+       }
 
-    // we dont want to update the maxArraySize when this flag is not set, we just want to include this
-    // node type in the chain of node types so that its updated when a higher maxArraySize comes in.
-    if (!updateFlag)
-        return false;
+       // we dont want to update the maxArraySize when this flag is not set, we just want to include this
+       // node type in the chain of node types so that its updated when a higher maxArraySize comes in.
+       if (!updateFlag)
+               return false;
 
-    size++;
-    variable->getType().setMaxArraySize(size);
-    type->setMaxArraySize(size);
-    TType* tt = type;
+       size++;
+       variable->getType().setMaxArraySize(size);
+       type->setMaxArraySize(size);
+       TType* tt = type;
 
-    while(tt->getArrayInformationType() != 0) {
-        tt = tt->getArrayInformationType();
-        tt->setMaxArraySize(size);
-    }
+       while(tt->getArrayInformationType() != 0) {
+               tt = tt->getArrayInformationType();
+               tt->setMaxArraySize(size);
+       }
 
-    return false;
+       return false;
 }
 
 //
@@ -895,28 +981,28 @@ bool TParseContext::arraySetMaxSize(TIntermSymbol *node, TType* type, int size,
 //
 bool TParseContext::nonInitConstErrorCheck(const TSourceLoc &line, TString& identifier, TPublicType& type, bool array)
 {
-    if (type.qualifier == EvqConstExpr)
-    {
-        // Make the qualifier make sense.
-        type.qualifier = EvqTemporary;
+       if (type.qualifier == EvqConstExpr)
+       {
+               // Make the qualifier make sense.
+               type.qualifier = EvqTemporary;
 
-        if (array)
-        {
-            error(line, "arrays may not be declared constant since they cannot be initialized", identifier.c_str());
-        }
-        else if (type.isStructureContainingArrays())
-        {
-            error(line, "structures containing arrays may not be declared constant since they cannot be initialized", identifier.c_str());
-        }
-        else
-        {
-            error(line, "variables with qualifier 'const' must be initialized", identifier.c_str());
-        }
+               if (array)
+               {
+                       error(line, "arrays may not be declared constant since they cannot be initialized", identifier.c_str());
+               }
+               else if (type.isStructureContainingArrays())
+               {
+                       error(line, "structures containing arrays may not be declared constant since they cannot be initialized", identifier.c_str());
+               }
+               else
+               {
+                       error(line, "variables with qualifier 'const' must be initialized", identifier.c_str());
+               }
 
-        return true;
-    }
+               return true;
+       }
 
-    return false;
+       return false;
 }
 
 //
@@ -934,7 +1020,7 @@ bool TParseContext::nonInitErrorCheck(const TSourceLoc &line, const TString& ide
 
                // Generate informative error messages for ESSL1.
                // In ESSL3 arrays and structures containing arrays can be constant.
-               if(shaderVersion < 300 && type.isStructureContainingArrays())
+               if(mShaderVersion < 300 && type.isStructureContainingArrays())
                {
                        error(line,
                                "structures containing arrays may not be declared constant since they cannot be initialized",
@@ -969,7 +1055,7 @@ bool TParseContext::declareVariable(const TSourceLoc &line, const TString &ident
        if(type.isArray() && identifier.compare(0, 15, "gl_LastFragData") == 0)
        {
                const TVariable *maxDrawBuffers =
-                       static_cast<const TVariable *>(symbolTable.findBuiltIn("gl_MaxDrawBuffers", shaderVersion));
+                       static_cast<const TVariable *>(symbolTable.findBuiltIn("gl_MaxDrawBuffers", mShaderVersion));
                if(type.getArraySize() != maxDrawBuffers->getConstPointer()->getIConst())
                {
                        error(line, "redeclaration of gl_LastFragData with size != gl_MaxDrawBuffers", identifier.c_str());
@@ -997,42 +1083,42 @@ bool TParseContext::declareVariable(const TSourceLoc &line, const TString &ident
 
 bool TParseContext::paramErrorCheck(const TSourceLoc &line, TQualifier qualifier, TQualifier paramQualifier, TType* type)
 {
-    if (qualifier != EvqConstReadOnly && qualifier != EvqTemporary) {
-        error(line, "qualifier not allowed on function parameter", getQualifierString(qualifier));
-        return true;
-    }
-    if (qualifier == EvqConstReadOnly && paramQualifier != EvqIn) {
-        error(line, "qualifier not allowed with ", getQualifierString(qualifier), getQualifierString(paramQualifier));
-        return true;
-    }
+       if (qualifier != EvqConstReadOnly && qualifier != EvqTemporary) {
+               error(line, "qualifier not allowed on function parameter", getQualifierString(qualifier));
+               return true;
+       }
+       if (qualifier == EvqConstReadOnly && paramQualifier != EvqIn) {
+               error(line, "qualifier not allowed with ", getQualifierString(qualifier), getQualifierString(paramQualifier));
+               return true;
+       }
 
-    if (qualifier == EvqConstReadOnly)
-        type->setQualifier(EvqConstReadOnly);
-    else
-        type->setQualifier(paramQualifier);
+       if (qualifier == EvqConstReadOnly)
+               type->setQualifier(EvqConstReadOnly);
+       else
+               type->setQualifier(paramQualifier);
 
-    return false;
+       return false;
 }
 
 bool TParseContext::extensionErrorCheck(const TSourceLoc &line, const TString& extension)
 {
-    const TExtensionBehavior& extBehavior = extensionBehavior();
-    TExtensionBehavior::const_iterator iter = extBehavior.find(extension.c_str());
-    if (iter == extBehavior.end()) {
-        error(line, "extension", extension.c_str(), "is not supported");
-        return true;
-    }
-    // In GLSL ES, an extension's default behavior is "disable".
-    if (iter->second == EBhDisable || iter->second == EBhUndefined) {
-        error(line, "extension", extension.c_str(), "is disabled");
-        return true;
-    }
-    if (iter->second == EBhWarn) {
-        warning(line, "extension", extension.c_str(), "is being used");
-        return false;
-    }
-
-    return false;
+       const TExtensionBehavior& extBehavior = extensionBehavior();
+       TExtensionBehavior::const_iterator iter = extBehavior.find(extension.c_str());
+       if (iter == extBehavior.end()) {
+               error(line, "extension", extension.c_str(), "is not supported");
+               return true;
+       }
+       // In GLSL ES, an extension's default behavior is "disable".
+       if (iter->second == EBhDisable || iter->second == EBhUndefined) {
+               error(line, "extension", extension.c_str(), "is disabled");
+               return true;
+       }
+       if (iter->second == EBhWarn) {
+               warning(line, "extension", extension.c_str(), "is being used");
+               return false;
+       }
+
+       return false;
 }
 
 bool TParseContext::functionCallLValueErrorCheck(const TFunction *fnCandidate, TIntermAggregate *aggregate)
@@ -1055,25 +1141,41 @@ bool TParseContext::functionCallLValueErrorCheck(const TFunction *fnCandidate, T
        return false;
 }
 
+void TParseContext::es3InvariantErrorCheck(const TQualifier qualifier, const TSourceLoc &invariantLocation)
+{
+       switch(qualifier)
+       {
+       case EvqVaryingOut:
+       case EvqSmoothOut:
+       case EvqFlatOut:
+       case EvqCentroidOut:
+       case EvqVertexOut:
+       case EvqFragmentOut:
+               break;
+       default:
+               error(invariantLocation, "Only out variables can be invariant.", "invariant");
+               recover();
+               break;
+       }
+}
+
 bool TParseContext::supportsExtension(const char* extension)
 {
-    const TExtensionBehavior& extbehavior = extensionBehavior();
-    TExtensionBehavior::const_iterator iter = extbehavior.find(extension);
-    return (iter != extbehavior.end());
+       const TExtensionBehavior& extbehavior = extensionBehavior();
+       TExtensionBehavior::const_iterator iter = extbehavior.find(extension);
+       return (iter != extbehavior.end());
 }
 
 void TParseContext::handleExtensionDirective(const TSourceLoc &line, const char* extName, const char* behavior)
 {
-    pp::SourceLocation loc;
-    DecodeSourceLoc(line, &loc.file, &loc.line);
-    directiveHandler.handleExtension(loc, extName, behavior);
+       pp::SourceLocation loc(line.first_file, line.first_line);
+       mDirectiveHandler.handleExtension(loc, extName, behavior);
 }
 
 void TParseContext::handlePragmaDirective(const TSourceLoc &line, const char* name, const char* value)
 {
-    pp::SourceLocation loc;
-    DecodeSourceLoc(line, &loc.file, &loc.line);
-    directiveHandler.handlePragma(loc, name, value);
+       pp::SourceLocation loc(line.first_file, line.first_line);
+       mDirectiveHandler.handlePragma(loc, name, value);
 }
 
 /////////////////////////////////////////////////////////////////////////////////
@@ -1086,7 +1188,7 @@ const TVariable *TParseContext::getNamedVariable(const TSourceLoc &location,
        const TString *name,
        const TSymbol *symbol)
 {
-       const TVariable *variable = NULL;
+       const TVariable *variable = nullptr;
 
        if(!symbol)
        {
@@ -1102,7 +1204,7 @@ const TVariable *TParseContext::getNamedVariable(const TSourceLoc &location,
        {
                variable = static_cast<const TVariable*>(symbol);
 
-               if(symbolTable.findBuiltIn(variable->getName(), shaderVersion))
+               if(symbolTable.findBuiltIn(variable->getName(), mShaderVersion))
                {
                        recover();
                }
@@ -1120,7 +1222,7 @@ const TVariable *TParseContext::getNamedVariable(const TSourceLoc &location,
 
                // This validation is not quite correct - it's only an error to write to
                // both FragData and FragColor. For simplicity, and because users shouldn't
-               // be rewarded for reading from undefined varaibles, return an error
+               // be rewarded for reading from undefined variables, return an error
                // if they are both referenced, rather than assigned.
                if(mUsesFragData && mUsesFragColor)
                {
@@ -1147,24 +1249,24 @@ const TVariable *TParseContext::getNamedVariable(const TSourceLoc &location,
 //
 const TFunction* TParseContext::findFunction(const TSourceLoc &line, TFunction* call, bool *builtIn)
 {
-    // First find by unmangled name to check whether the function name has been
-    // hidden by a variable name or struct typename.
-    const TSymbol* symbol = symbolTable.find(call->getName(), shaderVersion, builtIn);
-    if (symbol == 0) {
-        symbol = symbolTable.find(call->getMangledName(), shaderVersion, builtIn);
-    }
+       // First find by unmangled name to check whether the function name has been
+       // hidden by a variable name or struct typename.
+       const TSymbol* symbol = symbolTable.find(call->getName(), mShaderVersion, builtIn);
+       if (symbol == 0) {
+               symbol = symbolTable.find(call->getMangledName(), mShaderVersion, builtIn);
+       }
 
-    if (symbol == 0) {
-        error(line, "no matching overloaded function found", call->getName().c_str());
-        return 0;
-    }
+       if (symbol == 0) {
+               error(line, "no matching overloaded function found", call->getName().c_str());
+               return nullptr;
+       }
 
-    if (!symbol->isFunction()) {
-        error(line, "function name expected", call->getName().c_str());
-        return 0;
-    }
+       if (!symbol->isFunction()) {
+               error(line, "function name expected", call->getName().c_str());
+               return nullptr;
+       }
 
-    return static_cast<const TFunction*>(symbol);
+       return static_cast<const TFunction*>(symbol);
 }
 
 //
@@ -1172,16 +1274,27 @@ const TFunction* TParseContext::findFunction(const TSourceLoc &line, TFunction*
 // code to handle them here.
 //
 bool TParseContext::executeInitializer(const TSourceLoc& line, const TString& identifier, const TPublicType& pType,
-                                       TIntermTyped *initializer, TIntermNode **intermNode)
+                                                                          TIntermTyped *initializer, TIntermNode **intermNode)
 {
        ASSERT(intermNode != nullptr);
        TType type = TType(pType);
 
-       TVariable *variable = nullptr;
-       if(type.isArray() && (type.getArraySize() == 0))
+       if(type.isUnsizedArray())
        {
-               type.setArraySize(initializer->getArraySize());
+               // We have not checked yet whether the initializer actually is an array or not.
+               if(initializer->isArray())
+               {
+                       type.setArraySize(initializer->getArraySize());
+               }
+               else
+               {
+                       // Having a non-array initializer for an unsized array will result in an error later,
+                       // so we don't generate an error message here.
+                       type.setArraySize(1u);
+               }
        }
+
+       TVariable *variable = nullptr;
        if(!declareVariable(line, identifier, type, &variable))
        {
                return true;
@@ -1199,83 +1312,59 @@ bool TParseContext::executeInitializer(const TSourceLoc& line, const TString& id
        {
                warning(line, "global variable initializers should be constant expressions "
                        "(uniforms and globals are allowed in global initializers for legacy compatibility)", "=");
-    }
-
-    //
-    // identifier must be of type constant, a global, or a temporary
-    //
-    TQualifier qualifier = variable->getType().getQualifier();
-    if ((qualifier != EvqTemporary) && (qualifier != EvqGlobal) && (qualifier != EvqConstExpr)) {
-        error(line, " cannot initialize this type of qualifier ", variable->getType().getQualifierString());
-        return true;
-    }
-    //
-    // test for and propagate constant
-    //
-
-    if (qualifier == EvqConstExpr) {
-        if (qualifier != initializer->getType().getQualifier()) {
-            std::stringstream extraInfoStream;
-            extraInfoStream << "'" << variable->getType().getCompleteString() << "'";
-            std::string extraInfo = extraInfoStream.str();
-            error(line, " assigning non-constant to", "=", extraInfo.c_str());
-            variable->getType().setQualifier(EvqTemporary);
-            return true;
-        }
-        if (type != initializer->getType()) {
-            error(line, " non-matching types for const initializer ",
-                variable->getType().getQualifierString());
-            variable->getType().setQualifier(EvqTemporary);
-            return true;
-        }
-        if (initializer->getAsConstantUnion()) {
-            variable->shareConstPointer(initializer->getAsConstantUnion()->getUnionArrayPointer());
-        } else if (initializer->getAsSymbolNode()) {
-            const TSymbol* symbol = symbolTable.find(initializer->getAsSymbolNode()->getSymbol(), 0);
-            const TVariable* tVar = static_cast<const TVariable*>(symbol);
-
-            ConstantUnion* constArray = tVar->getConstPointer();
-            variable->shareConstPointer(constArray);
-        } else {
-            std::stringstream extraInfoStream;
-            extraInfoStream << "'" << variable->getType().getCompleteString() << "'";
-            std::string extraInfo = extraInfoStream.str();
-            error(line, " cannot assign to", "=", extraInfo.c_str());
-            variable->getType().setQualifier(EvqTemporary);
-            return true;
-        }
-    }
-
-    if (qualifier != EvqConstExpr) {
-        TIntermSymbol* intermSymbol = intermediate.addSymbol(variable->getUniqueId(), variable->getName(), variable->getType(), line);
-        *intermNode = createAssign(EOpInitialize, intermSymbol, initializer, line);
-        if(*intermNode == nullptr) {
-            assignError(line, "=", intermSymbol->getCompleteString(), initializer->getCompleteString());
-            return true;
-        }
-    } else
-        *intermNode = nullptr;
-
-    return false;
-}
-
-bool TParseContext::areAllChildConst(TIntermAggregate* aggrNode)
-{
-    ASSERT(aggrNode != NULL);
-    if (!aggrNode->isConstructor())
-        return false;
-
-    bool allConstant = true;
-
-    // check if all the child nodes are constants so that they can be inserted into
-    // the parent node
-    TIntermSequence &sequence = aggrNode->getSequence() ;
-    for (TIntermSequence::iterator p = sequence.begin(); p != sequence.end(); ++p) {
-        if (!(*p)->getAsTyped()->getAsConstantUnion())
-            return false;
-    }
-
-    return allConstant;
+       }
+
+       //
+       // identifier must be of type constant, a global, or a temporary
+       //
+       TQualifier qualifier = type.getQualifier();
+       if ((qualifier != EvqTemporary) && (qualifier != EvqGlobal) && (qualifier != EvqConstExpr)) {
+               error(line, " cannot initialize this type of qualifier ", variable->getType().getQualifierString());
+               return true;
+       }
+       //
+       // test for and propagate constant
+       //
+
+       if (qualifier == EvqConstExpr) {
+               if (qualifier != initializer->getQualifier()) {
+                       std::stringstream extraInfoStream;
+                       extraInfoStream << "'" << variable->getType().getCompleteString() << "'";
+                       std::string extraInfo = extraInfoStream.str();
+                       error(line, " assigning non-constant to", "=", extraInfo.c_str());
+                       variable->getType().setQualifier(EvqTemporary);
+                       return true;
+               }
+
+               if (type != initializer->getType()) {
+                       error(line, " non-matching types for const initializer ",
+                               variable->getType().getQualifierString());
+                       variable->getType().setQualifier(EvqTemporary);
+                       return true;
+               }
+
+               if (initializer->getAsConstantUnion()) {
+                       variable->shareConstPointer(initializer->getAsConstantUnion()->getUnionArrayPointer());
+               } else if (initializer->getAsSymbolNode()) {
+                       const TSymbol* symbol = symbolTable.find(initializer->getAsSymbolNode()->getSymbol(), 0);
+                       const TVariable* tVar = static_cast<const TVariable*>(symbol);
+
+                       ConstantUnion* constArray = tVar->getConstPointer();
+                       variable->shareConstPointer(constArray);
+               }
+       }
+
+       if (!variable->isConstant()) {
+               TIntermSymbol* intermSymbol = intermediate.addSymbol(variable->getUniqueId(), variable->getName(), variable->getType(), line);
+               *intermNode = createAssign(EOpInitialize, intermSymbol, initializer, line);
+               if(*intermNode == nullptr) {
+                       assignError(line, "=", intermSymbol->getCompleteString(), initializer->getCompleteString());
+                       return true;
+               }
+       } else
+               *intermNode = nullptr;
+
+       return false;
 }
 
 TPublicType TParseContext::addFullySpecifiedType(TQualifier qualifier, bool invariant, TLayoutQualifier layoutQualifier, const TPublicType &typeSpecifier)
@@ -1292,8 +1381,14 @@ TPublicType TParseContext::addFullySpecifiedType(TQualifier qualifier, bool inva
                returnType.clearArrayness();
        }
 
-       if(shaderVersion < 300)
+       if(mShaderVersion < 300)
        {
+               if(typeSpecifier.array)
+               {
+                       error(typeSpecifier.line, "not supported", "first-class array");
+                       returnType.clearArrayness();
+               }
+
                if(qualifier == EvqAttribute && (typeSpecifier.type == EbtBool || typeSpecifier.type == EbtInt))
                {
                        error(typeSpecifier.line, "cannot be bool or int", getQualifierString(qualifier));
@@ -1309,44 +1404,87 @@ TPublicType TParseContext::addFullySpecifiedType(TQualifier qualifier, bool inva
        }
        else
        {
-               switch(qualifier)
+               if(!returnType.layoutQualifier.isEmpty())
                {
-               case EvqSmoothIn:
-               case EvqSmoothOut:
-               case EvqVertexOut:
-               case EvqFragmentIn:
-               case EvqCentroidOut:
-               case EvqCentroidIn:
-                       if(typeSpecifier.type == EbtBool)
-                       {
-                               error(typeSpecifier.line, "cannot be bool", getQualifierString(qualifier));
-                               recover();
-                       }
-                       if(typeSpecifier.type == EbtInt || typeSpecifier.type == EbtUInt)
-                       {
-                               error(typeSpecifier.line, "must use 'flat' interpolation here", getQualifierString(qualifier));
-                               recover();
-                       }
-                       break;
-
-               case EvqVertexIn:
-               case EvqFragmentOut:
-               case EvqFlatIn:
-               case EvqFlatOut:
-                       if(typeSpecifier.type == EbtBool)
-                       {
-                               error(typeSpecifier.line, "cannot be bool", getQualifierString(qualifier));
-                               recover();
-                       }
-                       break;
+                       globalErrorCheck(typeSpecifier.line, symbolTable.atGlobalLevel(), "layout");
+               }
 
-               default: break;
+               if(IsVarying(returnType.qualifier) || returnType.qualifier == EvqVertexIn || returnType.qualifier == EvqFragmentOut)
+               {
+                       checkInputOutputTypeIsValidES3(returnType.qualifier, typeSpecifier, typeSpecifier.line);
                }
        }
 
        return returnType;
 }
 
+void TParseContext::checkInputOutputTypeIsValidES3(const TQualifier qualifier,
+                                                   const TPublicType &type,
+                                                   const TSourceLoc &qualifierLocation)
+{
+       // An input/output variable can never be bool or a sampler. Samplers are checked elsewhere.
+       if(type.type == EbtBool)
+       {
+               error(qualifierLocation, "cannot be bool", getQualifierString(qualifier));
+       }
+
+       // Specific restrictions apply for vertex shader inputs and fragment shader outputs.
+       switch(qualifier)
+       {
+       case EvqVertexIn:
+               // ESSL 3.00 section 4.3.4
+               if(type.array)
+               {
+                       error(qualifierLocation, "cannot be array", getQualifierString(qualifier));
+               }
+               // Vertex inputs with a struct type are disallowed in singleDeclarationErrorCheck
+               return;
+       case EvqFragmentOut:
+               // ESSL 3.00 section 4.3.6
+               if(type.isMatrix())
+               {
+                       error(qualifierLocation, "cannot be matrix", getQualifierString(qualifier));
+               }
+               // Fragment outputs with a struct type are disallowed in singleDeclarationErrorCheck
+               return;
+       default:
+               break;
+       }
+
+       // Vertex shader outputs / fragment shader inputs have a different, slightly more lenient set of
+       // restrictions.
+       bool typeContainsIntegers = (type.type == EbtInt || type.type == EbtUInt ||
+                                   type.isStructureContainingType(EbtInt) ||
+                                   type.isStructureContainingType(EbtUInt));
+       if(typeContainsIntegers && qualifier != EvqFlatIn && qualifier != EvqFlatOut)
+       {
+               error(qualifierLocation, "must use 'flat' interpolation here", getQualifierString(qualifier));
+       }
+
+       if(type.type == EbtStruct)
+       {
+               // ESSL 3.00 sections 4.3.4 and 4.3.6.
+               // These restrictions are only implied by the ESSL 3.00 spec, but
+               // the ESSL 3.10 spec lists these restrictions explicitly.
+               if(type.array)
+               {
+                       error(qualifierLocation, "cannot be an array of structures", getQualifierString(qualifier));
+               }
+               if(type.isStructureContainingArrays())
+               {
+                       error(qualifierLocation, "cannot be a structure containing an array", getQualifierString(qualifier));
+               }
+               if(type.isStructureContainingType(EbtStruct))
+               {
+                       error(qualifierLocation, "cannot be a structure containing a structure", getQualifierString(qualifier));
+               }
+               if(type.isStructureContainingType(EbtBool))
+               {
+                       error(qualifierLocation, "cannot be a structure containing a bool", getQualifierString(qualifier));
+               }
+       }
+}
+
 TIntermAggregate *TParseContext::parseSingleDeclaration(TPublicType &publicType,
        const TSourceLoc &identifierOrTypeLocation,
        const TString &identifier)
@@ -1669,72 +1807,309 @@ TIntermAggregate *TParseContext::parseArrayInitDeclarator(const TPublicType &pub
                recover();
        }
 
-       TPublicType arrayType(publicType);
-
-       int size = 0;
-       // If indexExpression is nullptr, then the array will eventually get its size implicitly from the initializer.
-       if(indexExpression != nullptr && arraySizeErrorCheck(identifierLocation, indexExpression, size))
+       TPublicType arrayType(publicType);
+
+       int size = 0;
+       // If indexExpression is nullptr, then the array will eventually get its size implicitly from the initializer.
+       if(indexExpression != nullptr && arraySizeErrorCheck(identifierLocation, indexExpression, size))
+       {
+               recover();
+       }
+       // Make the type an array even if size check failed.
+       // This ensures useless error messages regarding the variable's non-arrayness won't follow.
+       arrayType.setArray(true, size);
+
+       // initNode will correspond to the whole of "b[n] = initializer".
+       TIntermNode *initNode = nullptr;
+       if(!executeInitializer(identifierLocation, identifier, arrayType, initializer, &initNode))
+       {
+               if(initNode)
+               {
+                       return intermediate.growAggregate(aggregateDeclaration, initNode, initLocation);
+               }
+               else
+               {
+                       return aggregateDeclaration;
+               }
+       }
+       else
+       {
+               recover();
+               return nullptr;
+       }
+}
+
+void TParseContext::parseGlobalLayoutQualifier(const TPublicType &typeQualifier)
+{
+       if(mShaderVersion < 300)
+       {
+               error(typeQualifier.line, "layout qualifiers supported in GLSL ES 3.00 only", "layout");
+               recover();
+               return;
+       }
+
+       if(typeQualifier.qualifier != EvqUniform)
+       {
+               error(typeQualifier.line, "invalid qualifier:", getQualifierString(typeQualifier.qualifier), "global layout must be uniform");
+               recover();
+               return;
+       }
+
+       const TLayoutQualifier layoutQualifier = typeQualifier.layoutQualifier;
+       ASSERT(!layoutQualifier.isEmpty());
+
+       if(layoutLocationErrorCheck(typeQualifier.line, typeQualifier.layoutQualifier))
+       {
+               recover();
+               return;
+       }
+
+       if(layoutQualifier.matrixPacking != EmpUnspecified)
+       {
+               mDefaultMatrixPacking = layoutQualifier.matrixPacking;
+       }
+
+       if(layoutQualifier.blockStorage != EbsUnspecified)
+       {
+               mDefaultBlockStorage = layoutQualifier.blockStorage;
+       }
+}
+
+TIntermAggregate *TParseContext::addFunctionPrototypeDeclaration(const TFunction &function, const TSourceLoc &location)
+{
+       // Note: symbolTableFunction could be the same as function if this is the first declaration.
+       // Either way the instance in the symbol table is used to track whether the function is declared
+       // multiple times.
+       TFunction *symbolTableFunction =
+               static_cast<TFunction *>(symbolTable.find(function.getMangledName(), getShaderVersion()));
+       if(symbolTableFunction->hasPrototypeDeclaration() && mShaderVersion == 100)
+       {
+               // ESSL 1.00.17 section 4.2.7.
+               // Doesn't apply to ESSL 3.00.4: see section 4.2.3.
+               error(location, "duplicate function prototype declarations are not allowed", "function");
+               recover();
+       }
+       symbolTableFunction->setHasPrototypeDeclaration();
+
+       TIntermAggregate *prototype = new TIntermAggregate;
+       prototype->setType(function.getReturnType());
+       prototype->setName(function.getMangledName());
+
+       for(size_t i = 0; i < function.getParamCount(); i++)
+       {
+               const TParameter &param = function.getParam(i);
+               if(param.name != 0)
+               {
+                       TVariable variable(param.name, *param.type);
+
+                       TIntermSymbol *paramSymbol = intermediate.addSymbol(
+                               variable.getUniqueId(), variable.getName(), variable.getType(), location);
+                       prototype = intermediate.growAggregate(prototype, paramSymbol, location);
+               }
+               else
+               {
+                       TIntermSymbol *paramSymbol = intermediate.addSymbol(0, "", *param.type, location);
+                       prototype = intermediate.growAggregate(prototype, paramSymbol, location);
+               }
+       }
+
+       prototype->setOp(EOpPrototype);
+
+       symbolTable.pop();
+
+       if(!symbolTable.atGlobalLevel())
+       {
+               // ESSL 3.00.4 section 4.2.4.
+               error(location, "local function prototype declarations are not allowed", "function");
+               recover();
+       }
+
+       return prototype;
+}
+
+TIntermAggregate *TParseContext::addFunctionDefinition(const TFunction &function, TIntermAggregate *functionPrototype, TIntermAggregate *functionBody, const TSourceLoc &location)
+{
+       //?? Check that all paths return a value if return type != void ?
+       //   May be best done as post process phase on intermediate code
+       if(mCurrentFunctionType->getBasicType() != EbtVoid && !mFunctionReturnsValue)
+       {
+               error(location, "function does not return a value:", "", function.getName().c_str());
+               recover();
+       }
+
+       TIntermAggregate *aggregate = intermediate.growAggregate(functionPrototype, functionBody, location);
+       intermediate.setAggregateOperator(aggregate, EOpFunction, location);
+       aggregate->setName(function.getMangledName().c_str());
+       aggregate->setType(function.getReturnType());
+
+       // store the pragma information for debug and optimize and other vendor specific
+       // information. This information can be queried from the parse tree
+       aggregate->setOptimize(pragma().optimize);
+       aggregate->setDebug(pragma().debug);
+
+       if(functionBody && functionBody->getAsAggregate())
+               aggregate->setEndLine(functionBody->getAsAggregate()->getEndLine());
+
+       symbolTable.pop();
+       return aggregate;
+}
+
+void TParseContext::parseFunctionPrototype(const TSourceLoc &location, TFunction *function, TIntermAggregate **aggregateOut)
+{
+       const TSymbol *builtIn = symbolTable.findBuiltIn(function->getMangledName(), getShaderVersion());
+
+       if(builtIn)
+       {
+               error(location, "built-in functions cannot be redefined", function->getName().c_str());
+               recover();
+       }
+
+       TFunction *prevDec = static_cast<TFunction *>(symbolTable.find(function->getMangledName(), getShaderVersion()));
+       //
+       // Note:  'prevDec' could be 'function' if this is the first time we've seen function
+       // as it would have just been put in the symbol table.  Otherwise, we're looking up
+       // an earlier occurance.
+       //
+       if(prevDec->isDefined())
        {
+               // Then this function already has a body.
+               error(location, "function already has a body", function->getName().c_str());
                recover();
        }
-       // Make the type an array even if size check failed.
-       // This ensures useless error messages regarding the variable's non-arrayness won't follow.
-       arrayType.setArray(true, size);
+       prevDec->setDefined();
+       //
+       // Overload the unique ID of the definition to be the same unique ID as the declaration.
+       // Eventually we will probably want to have only a single definition and just swap the
+       // arguments to be the definition's arguments.
+       //
+       function->setUniqueId(prevDec->getUniqueId());
 
-       // initNode will correspond to the whole of "b[n] = initializer".
-       TIntermNode *initNode = nullptr;
-       if(!executeInitializer(identifierLocation, identifier, arrayType, initializer, &initNode))
+       // Raise error message if main function takes any parameters or return anything other than void
+       if(function->getName() == "main")
        {
-               if(initNode)
+               if(function->getParamCount() > 0)
                {
-                       return intermediate.growAggregate(aggregateDeclaration, initNode, initLocation);
+                       error(location, "function cannot take any parameter(s)", function->getName().c_str());
+                       recover();
                }
-               else
+               if(function->getReturnType().getBasicType() != EbtVoid)
                {
-                       return aggregateDeclaration;
+                       error(location, "", function->getReturnType().getBasicString(), "main function cannot return a value");
+                       recover();
                }
        }
-       else
-       {
-               recover();
-               return nullptr;
+
+       //
+       // Remember the return type for later checking for RETURN statements.
+       //
+       mCurrentFunctionType = &(prevDec->getReturnType());
+       mFunctionReturnsValue = false;
+
+       //
+       // Insert parameters into the symbol table.
+       // If the parameter has no name, it's not an error, just don't insert it
+       // (could be used for unused args).
+       //
+       // Also, accumulate the list of parameters into the HIL, so lower level code
+       // knows where to find parameters.
+       //
+       TIntermAggregate *paramNodes = new TIntermAggregate;
+       for(size_t i = 0; i < function->getParamCount(); i++)
+       {
+               const TParameter &param = function->getParam(i);
+               if(param.name != 0)
+               {
+                       TVariable *variable = new TVariable(param.name, *param.type);
+                       //
+                       // Insert the parameters with name in the symbol table.
+                       //
+                       if(!symbolTable.declare(*variable))
+                       {
+                               error(location, "redefinition", variable->getName().c_str());
+                               recover();
+                               paramNodes = intermediate.growAggregate(
+                                       paramNodes, intermediate.addSymbol(0, "", *param.type, location), location);
+                               continue;
+                       }
+
+                       //
+                       // Add the parameter to the HIL
+                       //
+                       TIntermSymbol *symbol = intermediate.addSymbol(
+                               variable->getUniqueId(), variable->getName(), variable->getType(), location);
+
+                       paramNodes = intermediate.growAggregate(paramNodes, symbol, location);
+               }
+               else
+               {
+                       paramNodes = intermediate.growAggregate(
+                               paramNodes, intermediate.addSymbol(0, "", *param.type, location), location);
+               }
        }
+       intermediate.setAggregateOperator(paramNodes, EOpParameters, location);
+       *aggregateOut = paramNodes;
+       setLoopNestingLevel(0);
 }
 
-void TParseContext::parseGlobalLayoutQualifier(const TPublicType &typeQualifier)
+TFunction *TParseContext::parseFunctionDeclarator(const TSourceLoc &location, TFunction *function)
 {
-       if(shaderVersion < 300)
+       //
+       // We don't know at this point whether this is a function definition or a prototype.
+       // The definition production code will check for redefinitions.
+       // In the case of ESSL 1.00 the prototype production code will also check for redeclarations.
+       //
+       // Return types and parameter qualifiers must match in all redeclarations, so those are checked
+       // here.
+       //
+       TFunction *prevDec = static_cast<TFunction *>(symbolTable.find(function->getMangledName(), getShaderVersion()));
+       if(getShaderVersion() >= 300 && symbolTable.hasUnmangledBuiltIn(function->getName().c_str()))
        {
-               error(typeQualifier.line, "layout qualifiers supported in GLSL ES 3.00 only", "layout");
-               recover();
-               return;
+               // With ESSL 3.00, names of built-in functions cannot be redeclared as functions.
+               // Therefore overloading or redefining builtin functions is an error.
+               error(location, "Name of a built-in function cannot be redeclared as function", function->getName().c_str());
        }
-
-       if(typeQualifier.qualifier != EvqUniform)
+       else if(prevDec)
        {
-               error(typeQualifier.line, "invalid qualifier:", getQualifierString(typeQualifier.qualifier), "global layout must be uniform");
-               recover();
-               return;
+               if(prevDec->getReturnType() != function->getReturnType())
+               {
+                       error(location, "overloaded functions must have the same return type",
+                               function->getReturnType().getBasicString());
+                       recover();
+               }
+               for(size_t i = 0; i < prevDec->getParamCount(); ++i)
+               {
+                       if(prevDec->getParam(i).type->getQualifier() != function->getParam(i).type->getQualifier())
+                       {
+                               error(location, "overloaded functions must have the same parameter qualifiers",
+                                       function->getParam(i).type->getQualifierString());
+                               recover();
+                       }
+               }
        }
 
-       const TLayoutQualifier layoutQualifier = typeQualifier.layoutQualifier;
-       ASSERT(!layoutQualifier.isEmpty());
-
-       if(layoutLocationErrorCheck(typeQualifier.line, typeQualifier.layoutQualifier))
+       //
+       // Check for previously declared variables using the same name.
+       //
+       TSymbol *prevSym = symbolTable.find(function->getName(), getShaderVersion());
+       if(prevSym)
        {
-               recover();
-               return;
+               if(!prevSym->isFunction())
+               {
+                       error(location, "redefinition", function->getName().c_str(), "function");
+                       recover();
+               }
        }
 
-       if(layoutQualifier.matrixPacking != EmpUnspecified)
-       {
-               defaultMatrixPacking = layoutQualifier.matrixPacking;
-       }
+       // We're at the inner scope level of the function's arguments and body statement.
+       // Add the function prototype to the surrounding scope instead.
+       symbolTable.getOuterLevel()->insert(*function);
 
-       if(layoutQualifier.blockStorage != EbsUnspecified)
-       {
-               defaultBlockStorage = layoutQualifier.blockStorage;
-       }
+       //
+       // If this is a redeclaration, it could also be a definition, in which case, we want to use the
+       // variable names from this one, and not the one that's
+       // being redeclared.  So, pass back up this declaration, not the one in the symbol table.
+       //
+       return function;
 }
 
 TFunction *TParseContext::addConstructorFunc(const TPublicType &publicTypeIn)
@@ -1747,84 +2122,7 @@ TFunction *TParseContext::addConstructorFunc(const TPublicType &publicTypeIn)
        }
        else
        {
-               switch(publicType.type)
-               {
-               case EbtFloat:\r
-                       if(publicType.isMatrix())\r
-                       {\r
-                               switch(publicType.getCols())\r
-                               {\r
-                               case 2:\r
-                                       switch(publicType.getRows())\r
-                                       {\r
-                                       case 2: op = EOpConstructMat2;  break;\r
-                                       case 3: op = EOpConstructMat2x3;  break;\r
-                                       case 4: op = EOpConstructMat2x4;  break;\r
-                                       }\r
-                                       break;\r
-                               case 3:\r
-                                       switch(publicType.getRows())\r
-                                       {\r
-                                       case 2: op = EOpConstructMat3x2;  break;\r
-                                       case 3: op = EOpConstructMat3;  break;\r
-                                       case 4: op = EOpConstructMat3x4;  break;\r
-                                       }\r
-                                       break;\r
-                               case 4:\r
-                                       switch(publicType.getRows())\r
-                                       {\r
-                                       case 2: op = EOpConstructMat4x2;  break;\r
-                                       case 3: op = EOpConstructMat4x3;  break;\r
-                                       case 4: op = EOpConstructMat4;  break;\r
-                                       }\r
-                                       break;\r
-                               }\r
-                       }\r
-                       else\r
-                       {\r
-                               switch(publicType.getNominalSize())\r
-                               {\r
-                               case 1: op = EOpConstructFloat; break;\r
-                               case 2: op = EOpConstructVec2;  break;\r
-                               case 3: op = EOpConstructVec3;  break;\r
-                               case 4: op = EOpConstructVec4;  break;\r
-                               }\r
-                       }\r
-                       break;
-
-               case EbtInt:
-                       switch(publicType.getNominalSize())
-                       {
-                       case 1: op = EOpConstructInt;   break;
-                       case 2: op = EOpConstructIVec2; break;
-                       case 3: op = EOpConstructIVec3; break;
-                       case 4: op = EOpConstructIVec4; break;
-                       }
-                       break;
-
-               case EbtUInt:
-                       switch(publicType.getNominalSize())
-                       {
-                       case 1: op = EOpConstructUInt;  break;
-                       case 2: op = EOpConstructUVec2; break;
-                       case 3: op = EOpConstructUVec3; break;
-                       case 4: op = EOpConstructUVec4; break;
-                       }
-                       break;
-
-               case EbtBool:
-                       switch(publicType.getNominalSize())
-                       {
-                       case 1: op = EOpConstructBool;  break;
-                       case 2: op = EOpConstructBVec2; break;
-                       case 3: op = EOpConstructBVec3; break;
-                       case 4: op = EOpConstructBVec4; break;
-                       }
-                       break;
-
-               default: break;
-               }
-
+               op = TypeToConstructorOperator(TType(publicType));
                if(op == EOpNull)
                {
                        error(publicType.line, "cannot construct this type", getBasicString(publicType.type));
@@ -1846,107 +2144,123 @@ TFunction *TParseContext::addConstructorFunc(const TPublicType &publicTypeIn)
 //
 TIntermTyped* TParseContext::addConstructor(TIntermNode* arguments, const TType* type, TOperator op, TFunction* fnCall, const TSourceLoc &line)
 {
-    TIntermAggregate *aggregateArguments = arguments->getAsAggregate();
+       TIntermAggregate *aggregateArguments = arguments->getAsAggregate();
 
-    if(!aggregateArguments)
-    {
-        aggregateArguments = new TIntermAggregate;
-        aggregateArguments->getSequence().push_back(arguments);
-    }
+       if(!aggregateArguments)
+       {
+               aggregateArguments = new TIntermAggregate;
+               aggregateArguments->getSequence().push_back(arguments);
+       }
 
-    if(op == EOpConstructStruct)
-    {
-        const TFieldList &fields = type->getStruct()->fields();
-        TIntermSequence &args = aggregateArguments->getSequence();
+       if(type->isArray())
+       {
+               // GLSL ES 3.00 section 5.4.4: Each argument must be the same type as the element type of
+               // the array.
+               for(TIntermNode *&argNode : aggregateArguments->getSequence())
+               {
+                       const TType &argType = argNode->getAsTyped()->getType();
+                       // It has already been checked that the argument is not an array.
+                       ASSERT(!argType.isArray());
+                       if(!argType.sameElementType(*type))
+                       {
+                               error(line, "Array constructor argument has an incorrect type", "Error");
+                               return nullptr;
+                       }
+               }
+       }
+       else if(op == EOpConstructStruct)
+       {
+               const TFieldList &fields = type->getStruct()->fields();
+               TIntermSequence &args = aggregateArguments->getSequence();
 
-        for(size_t i = 0; i < fields.size(); i++)
-        {
-            if(args[i]->getAsTyped()->getType() != *fields[i]->type())
-            {
-                error(line, "Structure constructor arguments do not match structure fields", "Error");
-                recover();
+               for(size_t i = 0; i < fields.size(); i++)
+               {
+                       if(args[i]->getAsTyped()->getType() != *fields[i]->type())
+                       {
+                               error(line, "Structure constructor arguments do not match structure fields", "Error");
+                               recover();
 
-                return 0;
-            }
-        }
-    }
+                               return nullptr;
+                       }
+               }
+       }
 
-    // Turn the argument list itself into a constructor
-    TIntermTyped *constructor = intermediate.setAggregateOperator(aggregateArguments, op, line);
-    TIntermTyped *constConstructor = foldConstConstructor(constructor->getAsAggregate(), *type);
-    if(constConstructor)
-    {
-        return constConstructor;
-    }
+       // Turn the argument list itself into a constructor
+       TIntermAggregate *constructor = intermediate.setAggregateOperator(aggregateArguments, op, line);
+       TIntermTyped *constConstructor = foldConstConstructor(constructor, *type);
+       if(constConstructor)
+       {
+               return constConstructor;
+       }
 
-    return constructor;
+       return constructor;
 }
 
 TIntermTyped* TParseContext::foldConstConstructor(TIntermAggregate* aggrNode, const TType& type)
 {
-    bool canBeFolded = areAllChildConst(aggrNode);
-    aggrNode->setType(type);
-    if (canBeFolded) {
-        bool returnVal = false;
-        ConstantUnion* unionArray = new ConstantUnion[type.getObjectSize()];
-        if (aggrNode->getSequence().size() == 1)  {
-            returnVal = intermediate.parseConstTree(aggrNode->getLine(), aggrNode, unionArray, aggrNode->getOp(), type, true);
-        }
-        else {
-            returnVal = intermediate.parseConstTree(aggrNode->getLine(), aggrNode, unionArray, aggrNode->getOp(), type);
-        }
-        if (returnVal)
-            return 0;
+       aggrNode->setType(type);
+       if (aggrNode->isConstantFoldable()) {
+               bool returnVal = false;
+               ConstantUnion* unionArray = new ConstantUnion[type.getObjectSize()];
+               if (aggrNode->getSequence().size() == 1)  {
+                       returnVal = intermediate.parseConstTree(aggrNode->getLine(), aggrNode, unionArray, aggrNode->getOp(), type, true);
+               }
+               else {
+                       returnVal = intermediate.parseConstTree(aggrNode->getLine(), aggrNode, unionArray, aggrNode->getOp(), type);
+               }
+               if (returnVal)
+                       return nullptr;
 
-        return intermediate.addConstantUnion(unionArray, type, aggrNode->getLine());
-    }
+               return intermediate.addConstantUnion(unionArray, type, aggrNode->getLine());
+       }
 
-    return 0;
+       return nullptr;
 }
 
 //
 // This function returns the tree representation for the vector field(s) being accessed from contant vector.
 // If only one component of vector is accessed (v.x or v[0] where v is a contant vector), then a contant node is
 // returned, else an aggregate node is returned (for v.xy). The input to this function could either be the symbol
-// node or it could be the intermediate tree representation of accessing fields in a constant structure or column of 
+// node or it could be the intermediate tree representation of accessing fields in a constant structure or column of
 // a constant matrix.
 //
 TIntermTyped* TParseContext::addConstVectorNode(TVectorFields& fields, TIntermTyped* node, const TSourceLoc &line)
 {
-    TIntermTyped* typedNode;
-    TIntermConstantUnion* tempConstantNode = node->getAsConstantUnion();
+       TIntermTyped* typedNode;
+       TIntermConstantUnion* tempConstantNode = node->getAsConstantUnion();
 
-    ConstantUnion *unionArray;
-    if (tempConstantNode) {
-        unionArray = tempConstantNode->getUnionArrayPointer();
+       ConstantUnion *unionArray;
+       if (tempConstantNode) {
+               unionArray = tempConstantNode->getUnionArrayPointer();
 
-        if (!unionArray) {
-            return node;
-        }
-    } else { // The node has to be either a symbol node or an aggregate node or a tempConstant node, else, its an error
-        error(line, "Cannot offset into the vector", "Error");
-        recover();
+               if (!unionArray) {
+                       return node;
+               }
+       } else { // The node has to be either a symbol node or an aggregate node or a tempConstant node, else, its an error
+               error(line, "Cannot offset into the vector", "Error");
+               recover();
 
-        return 0;
-    }
+               return nullptr;
+       }
 
-    ConstantUnion* constArray = new ConstantUnion[fields.num];
+       ConstantUnion* constArray = new ConstantUnion[fields.num];
 
-    for (int i = 0; i < fields.num; i++) {
-        if (fields.offsets[i] >= node->getType().getObjectSize()) {
-            std::stringstream extraInfoStream;
-            extraInfoStream << "vector field selection out of range '" << fields.offsets[i] << "'";
-            std::string extraInfo = extraInfoStream.str();
-            error(line, "", "[", extraInfo.c_str());
-            recover();
-            fields.offsets[i] = 0;
-        }
+       int objSize = static_cast<int>(node->getType().getObjectSize());
+       for (int i = 0; i < fields.num; i++) {
+               if (fields.offsets[i] >= objSize) {
+                       std::stringstream extraInfoStream;
+                       extraInfoStream << "vector field selection out of range '" << fields.offsets[i] << "'";
+                       std::string extraInfo = extraInfoStream.str();
+                       error(line, "", "[", extraInfo.c_str());
+                       recover();
+                       fields.offsets[i] = 0;
+               }
 
-        constArray[i] = unionArray[fields.offsets[i]];
+               constArray[i] = unionArray[fields.offsets[i]];
 
-    }
-    typedNode = intermediate.addConstantUnion(constArray, node->getType(), line);
-    return typedNode;
+       }
+       typedNode = intermediate.addConstantUnion(constArray, node->getType(), line);
+       return typedNode;
 }
 
 //
@@ -1957,30 +2271,30 @@ TIntermTyped* TParseContext::addConstVectorNode(TVectorFields& fields, TIntermTy
 //
 TIntermTyped* TParseContext::addConstMatrixNode(int index, TIntermTyped* node, const TSourceLoc &line)
 {
-    TIntermTyped* typedNode;
-    TIntermConstantUnion* tempConstantNode = node->getAsConstantUnion();
+       TIntermTyped* typedNode;
+       TIntermConstantUnion* tempConstantNode = node->getAsConstantUnion();
 
-    if (index >= node->getType().getNominalSize()) {
-        std::stringstream extraInfoStream;
-        extraInfoStream << "matrix field selection out of range '" << index << "'";
-        std::string extraInfo = extraInfoStream.str();
-        error(line, "", "[", extraInfo.c_str());
-        recover();
-        index = 0;
-    }
+       if (index >= node->getType().getNominalSize()) {
+               std::stringstream extraInfoStream;
+               extraInfoStream << "matrix field selection out of range '" << index << "'";
+               std::string extraInfo = extraInfoStream.str();
+               error(line, "", "[", extraInfo.c_str());
+               recover();
+               index = 0;
+       }
 
-    if (tempConstantNode) {
-         ConstantUnion* unionArray = tempConstantNode->getUnionArrayPointer();
-         int size = tempConstantNode->getType().getNominalSize();
-         typedNode = intermediate.addConstantUnion(&unionArray[size*index], tempConstantNode->getType(), line);
-    } else {
-        error(line, "Cannot offset into the matrix", "Error");
-        recover();
+       if (tempConstantNode) {
+                ConstantUnion* unionArray = tempConstantNode->getUnionArrayPointer();
+                int size = tempConstantNode->getType().getNominalSize();
+                typedNode = intermediate.addConstantUnion(&unionArray[size*index], tempConstantNode->getType(), line);
+       } else {
+               error(line, "Cannot offset into the matrix", "Error");
+               recover();
 
-        return 0;
-    }
+               return nullptr;
+       }
 
-    return typedNode;
+       return typedNode;
 }
 
 
@@ -1992,33 +2306,33 @@ TIntermTyped* TParseContext::addConstMatrixNode(int index, TIntermTyped* node, c
 //
 TIntermTyped* TParseContext::addConstArrayNode(int index, TIntermTyped* node, const TSourceLoc &line)
 {
-    TIntermTyped* typedNode;
-    TIntermConstantUnion* tempConstantNode = node->getAsConstantUnion();
-    TType arrayElementType = node->getType();
-    arrayElementType.clearArrayness();
+       TIntermTyped* typedNode;
+       TIntermConstantUnion* tempConstantNode = node->getAsConstantUnion();
+       TType arrayElementType = node->getType();
+       arrayElementType.clearArrayness();
 
-    if (index >= node->getType().getArraySize()) {
-        std::stringstream extraInfoStream;
-        extraInfoStream << "array field selection out of range '" << index << "'";
-        std::string extraInfo = extraInfoStream.str();
-        error(line, "", "[", extraInfo.c_str());
-        recover();
-        index = 0;
-    }
+       if (index >= node->getType().getArraySize()) {
+               std::stringstream extraInfoStream;
+               extraInfoStream << "array field selection out of range '" << index << "'";
+               std::string extraInfo = extraInfoStream.str();
+               error(line, "", "[", extraInfo.c_str());
+               recover();
+               index = 0;
+       }
 
-    int arrayElementSize = arrayElementType.getObjectSize();
+       size_t arrayElementSize = arrayElementType.getObjectSize();
 
-    if (tempConstantNode) {
-         ConstantUnion* unionArray = tempConstantNode->getUnionArrayPointer();
-         typedNode = intermediate.addConstantUnion(&unionArray[arrayElementSize * index], tempConstantNode->getType(), line);
-    } else {
-        error(line, "Cannot offset into the array", "Error");
-        recover();
+       if (tempConstantNode) {
+                ConstantUnion* unionArray = tempConstantNode->getUnionArrayPointer();
+                typedNode = intermediate.addConstantUnion(&unionArray[arrayElementSize * index], tempConstantNode->getType(), line);
+       } else {
+               error(line, "Cannot offset into the array", "Error");
+               recover();
 
-        return 0;
-    }
+               return nullptr;
+       }
 
-    return typedNode;
+       return typedNode;
 }
 
 
@@ -2029,39 +2343,38 @@ TIntermTyped* TParseContext::addConstArrayNode(int index, TIntermTyped* node, co
 //
 TIntermTyped* TParseContext::addConstStruct(const TString& identifier, TIntermTyped* node, const TSourceLoc &line)
 {
-    const TFieldList &fields = node->getType().getStruct()->fields();
-    TIntermTyped *typedNode;
-    int instanceSize = 0;
-    unsigned int index = 0;
-    TIntermConstantUnion *tempConstantNode = node->getAsConstantUnion();
+       const TFieldList &fields = node->getType().getStruct()->fields();
+       TIntermTyped *typedNode;
+       size_t instanceSize = 0;
+       TIntermConstantUnion *tempConstantNode = node->getAsConstantUnion();
 
-    for ( index = 0; index < fields.size(); ++index) {
-        if (fields[index]->name() == identifier) {
-            break;
-        } else {
-            instanceSize += fields[index]->type()->getObjectSize();
-        }
-    }
+       for(size_t index = 0; index < fields.size(); ++index) {
+               if (fields[index]->name() == identifier) {
+                       break;
+               } else {
+                       instanceSize += fields[index]->type()->getObjectSize();
+               }
+       }
 
-    if (tempConstantNode) {
-         ConstantUnion* constArray = tempConstantNode->getUnionArrayPointer();
+       if (tempConstantNode) {
+                ConstantUnion* constArray = tempConstantNode->getUnionArrayPointer();
 
-         typedNode = intermediate.addConstantUnion(constArray+instanceSize, tempConstantNode->getType(), line); // type will be changed in the calling function
-    } else {
-        error(line, "Cannot offset into the structure", "Error");
-        recover();
+                typedNode = intermediate.addConstantUnion(constArray+instanceSize, tempConstantNode->getType(), line); // type will be changed in the calling function
+       } else {
+               error(line, "Cannot offset into the structure", "Error");
+               recover();
 
-        return 0;
-    }
+               return nullptr;
+       }
 
-    return typedNode;
+       return typedNode;
 }
 
 //
 // Interface/uniform blocks
 //
 TIntermAggregate* TParseContext::addInterfaceBlock(const TPublicType& typeQualifier, const TSourceLoc& nameLine, const TString& blockName, TFieldList* fieldList,
-                                                   const TString* instanceName, const TSourceLoc& instanceLine, TIntermTyped* arrayIndex, const TSourceLoc& arrayIndexLine)
+                                                                                                  const TString* instanceName, const TSourceLoc& instanceLine, TIntermTyped* arrayIndex, const TSourceLoc& arrayIndexLine)
 {
        if(reservedErrorCheck(nameLine, blockName))
                recover();
@@ -2080,12 +2393,12 @@ TIntermAggregate* TParseContext::addInterfaceBlock(const TPublicType& typeQualif
 
        if(blockLayoutQualifier.matrixPacking == EmpUnspecified)
        {
-               blockLayoutQualifier.matrixPacking = defaultMatrixPacking;
+               blockLayoutQualifier.matrixPacking = mDefaultMatrixPacking;
        }
 
        if(blockLayoutQualifier.blockStorage == EbsUnspecified)
        {
-               blockLayoutQualifier.blockStorage = defaultBlockStorage;
+               blockLayoutQualifier.blockStorage = mDefaultBlockStorage;
        }
 
        TSymbol* blockNameSymbol = new TSymbol(&blockName);
@@ -2143,7 +2456,7 @@ TIntermAggregate* TParseContext::addInterfaceBlock(const TPublicType& typeQualif
 
        // add array index
        int arraySize = 0;
-       if(arrayIndex != NULL)
+       if(arrayIndex)
        {
                if(arraySizeErrorCheck(arrayIndexLine, arrayIndex, arraySize))
                        recover();
@@ -2202,7 +2515,7 @@ TIntermAggregate* TParseContext::addInterfaceBlock(const TPublicType& typeQualif
 //
 TIntermTyped *TParseContext::addIndexExpression(TIntermTyped *baseExpression, const TSourceLoc &location, TIntermTyped *indexExpression)
 {
-       TIntermTyped *indexedExpression = NULL;
+       TIntermTyped *indexedExpression = nullptr;
 
        if(!baseExpression->isArray() && !baseExpression->isMatrix() && !baseExpression->isVector())
        {
@@ -2325,7 +2638,7 @@ TIntermTyped *TParseContext::addIndexExpression(TIntermTyped *baseExpression, co
                }
                else if(baseType.isInterfaceBlock())
                {
-                       TType copyOfType(baseType.getInterfaceBlock(), baseType.getQualifier(), baseType.getLayoutQualifier(), 0);
+                       TType copyOfType(baseType.getInterfaceBlock(), EvqTemporary, baseType.getLayoutQualifier(), 0);
                        indexedExpression->setType(copyOfType);
                }
                else
@@ -2362,7 +2675,7 @@ TIntermTyped *TParseContext::addIndexExpression(TIntermTyped *baseExpression, co
 TIntermTyped *TParseContext::addFieldSelectionExpression(TIntermTyped *baseExpression, const TSourceLoc &dotLocation,
        const TString &fieldString, const TSourceLoc &fieldLocation)
 {
-       TIntermTyped *indexedExpression = NULL;
+       TIntermTyped *indexedExpression = nullptr;
 
        if(baseExpression->isArray())
        {
@@ -2380,7 +2693,7 @@ TIntermTyped *TParseContext::addFieldSelectionExpression(TIntermTyped *baseExpre
                        recover();
                }
 
-               if(baseExpression->getType().getQualifier() == EvqConstExpr)
+               if(baseExpression->getAsConstantUnion())
                {
                        // constant folding for vector fields
                        indexedExpression = addConstVectorNode(fields, baseExpression, fieldLocation);
@@ -2401,7 +2714,7 @@ TIntermTyped *TParseContext::addFieldSelectionExpression(TIntermTyped *baseExpre
                        TIntermTyped *index = intermediate.addSwizzle(fields, fieldLocation);
                        indexedExpression = intermediate.addIndex(EOpVectorSwizzle, baseExpression, index, dotLocation);
                        indexedExpression->setType(TType(baseExpression->getBasicType(), baseExpression->getPrecision(),
-                               EvqTemporary, (unsigned char)vectorString.size()));
+                               baseExpression->getQualifier() == EvqConstExpr ? EvqConstExpr : EvqTemporary, (unsigned char)vectorString.size()));
                }
        }
        else if(baseExpression->isMatrix())
@@ -2480,9 +2793,8 @@ TIntermTyped *TParseContext::addFieldSelectionExpression(TIntermTyped *baseExpre
                                }
                                else
                                {
-                                       ConstantUnion *unionArray = new ConstantUnion[1];
-                                       unionArray->setIConst(i);
-                                       TIntermTyped *index = intermediate.addConstantUnion(unionArray, *fields[i]->type(), fieldLocation);
+                                       TIntermTyped *index = TIntermTyped::CreateIndexNode(i);
+                                       index->setLine(fieldLocation);
                                        indexedExpression = intermediate.addIndex(EOpIndexDirectStruct, baseExpression, index, dotLocation);
                                        indexedExpression->setType(*fields[i]->type());
                                }
@@ -2535,7 +2847,7 @@ TIntermTyped *TParseContext::addFieldSelectionExpression(TIntermTyped *baseExpre
        }
        else
        {
-               if(shaderVersion < 300)
+               if(mShaderVersion < 300)
                {
                        error(dotLocation, " field selection requires structure, vector, or matrix on left hand side",
                                fieldString.c_str());
@@ -2555,9 +2867,9 @@ TIntermTyped *TParseContext::addFieldSelectionExpression(TIntermTyped *baseExpre
 
 TLayoutQualifier TParseContext::parseLayoutQualifier(const TString &qualifierType, const TSourceLoc& qualifierTypeLine)
 {
-    TLayoutQualifier qualifier;
+       TLayoutQualifier qualifier;
 
-    qualifier.location = -1;
+       qualifier.location = -1;
        qualifier.matrixPacking = EmpUnspecified;
        qualifier.blockStorage = EbsUnspecified;
 
@@ -2582,57 +2894,57 @@ TLayoutQualifier TParseContext::parseLayoutQualifier(const TString &qualifierTyp
                qualifier.matrixPacking = EmpColumnMajor;
        }
        else if(qualifierType == "location")
-    {
-        error(qualifierTypeLine, "invalid layout qualifier", qualifierType.c_str(), "location requires an argument");
-        recover();
-    }
-    else
-    {
-        error(qualifierTypeLine, "invalid layout qualifier", qualifierType.c_str());
-        recover();
-    }
+       {
+               error(qualifierTypeLine, "invalid layout qualifier", qualifierType.c_str(), "location requires an argument");
+               recover();
+       }
+       else
+       {
+               error(qualifierTypeLine, "invalid layout qualifier", qualifierType.c_str());
+               recover();
+       }
 
-    return qualifier;
+       return qualifier;
 }
 
 TLayoutQualifier TParseContext::parseLayoutQualifier(const TString &qualifierType, const TSourceLoc& qualifierTypeLine, const TString &intValueString, int intValue, const TSourceLoc& intValueLine)
 {
-    TLayoutQualifier qualifier;
-
-    qualifier.location = -1;
-    qualifier.matrixPacking = EmpUnspecified;
-    qualifier.blockStorage = EbsUnspecified;
-
-    if (qualifierType != "location")
-    {
-        error(qualifierTypeLine, "invalid layout qualifier", qualifierType.c_str(), "only location may have arguments");
-        recover();
-    }
-    else
-    {
-        // must check that location is non-negative
-        if (intValue < 0)
-        {
-            error(intValueLine, "out of range:", intValueString.c_str(), "location must be non-negative");
-            recover();
-        }
-        else
-        {
-            qualifier.location = intValue;
-        }
-    }
-
-    return qualifier;
+       TLayoutQualifier qualifier;
+
+       qualifier.location = -1;
+       qualifier.matrixPacking = EmpUnspecified;
+       qualifier.blockStorage = EbsUnspecified;
+
+       if (qualifierType != "location")
+       {
+               error(qualifierTypeLine, "invalid layout qualifier", qualifierType.c_str(), "only location may have arguments");
+               recover();
+       }
+       else
+       {
+               // must check that location is non-negative
+               if (intValue < 0)
+               {
+                       error(intValueLine, "out of range:", intValueString.c_str(), "location must be non-negative");
+                       recover();
+               }
+               else
+               {
+                       qualifier.location = intValue;
+               }
+       }
+
+       return qualifier;
 }
 
 TLayoutQualifier TParseContext::joinLayoutQualifiers(TLayoutQualifier leftQualifier, TLayoutQualifier rightQualifier)
 {
-    TLayoutQualifier joinedQualifier = leftQualifier;
+       TLayoutQualifier joinedQualifier = leftQualifier;
 
-    if (rightQualifier.location != -1)
-    {
-        joinedQualifier.location = rightQualifier.location;
-    }
+       if (rightQualifier.location != -1)
+       {
+               joinedQualifier.location = rightQualifier.location;
+       }
        if(rightQualifier.matrixPacking != EmpUnspecified)
        {
                joinedQualifier.matrixPacking = rightQualifier.matrixPacking;
@@ -2642,7 +2954,7 @@ TLayoutQualifier TParseContext::joinLayoutQualifiers(TLayoutQualifier leftQualif
                joinedQualifier.blockStorage = rightQualifier.blockStorage;
        }
 
-    return joinedQualifier;
+       return joinedQualifier;
 }
 
 
@@ -2785,22 +3097,22 @@ TPublicType TParseContext::addStructure(const TSourceLoc &structLine, const TSou
 
 bool TParseContext::enterStructDeclaration(const TSourceLoc &line, const TString& identifier)
 {
-    ++structNestingLevel;
+       ++mStructNestingLevel;
 
-    // Embedded structure definitions are not supported per GLSL ES spec.
-    // They aren't allowed in GLSL either, but we need to detect this here
-    // so we don't rely on the GLSL compiler to catch it.
-    if (structNestingLevel > 1) {
-        error(line, "", "Embedded struct definitions are not allowed");
-        return true;
-    }
+       // Embedded structure definitions are not supported per GLSL ES spec.
+       // They aren't allowed in GLSL either, but we need to detect this here
+       // so we don't rely on the GLSL compiler to catch it.
+       if (mStructNestingLevel > 1) {
+               error(line, "", "Embedded struct definitions are not allowed");
+               return true;
+       }
 
-    return false;
+       return false;
 }
 
 void TParseContext::exitStructDeclaration()
 {
-    --structNestingLevel;
+       --mStructNestingLevel;
 }
 
 bool TParseContext::structNestingErrorCheck(const TSourceLoc &line, const TField &field)
@@ -2871,7 +3183,7 @@ TIntermTyped *TParseContext::createUnaryMath(TOperator op, TIntermTyped *child,
                break;
        }
 
-       return intermediate.addUnaryMath(op, child, loc); // FIXME , funcReturnType);
+       return intermediate.addUnaryMath(op, child, loc, funcReturnType);
 }
 
 TIntermTyped *TParseContext::addUnaryMath(TOperator op, TIntermTyped *child, const TSourceLoc &loc)
@@ -2897,7 +3209,7 @@ bool TParseContext::binaryOpCommonCheck(TOperator op, TIntermTyped *left, TInter
 {
        if(left->isArray() || right->isArray())
        {
-               if(shaderVersion < 300)
+               if(mShaderVersion < 300)
                {
                        error(loc, "Invalid operation for arrays", getOperatorString(op));
                        return false;
@@ -2977,7 +3289,7 @@ bool TParseContext::binaryOpCommonCheck(TOperator op, TIntermTyped *left, TInter
        case EOpEqual:
        case EOpNotEqual:
                // ESSL 1.00 sections 5.7, 5.8, 5.9
-               if(shaderVersion < 300 && left->getType().isStructureContainingArrays())
+               if(mShaderVersion < 300 && left->getType().isStructureContainingArrays())
                {
                        error(loc, "undefined operation for structs containing arrays", getOperatorString(op));
                        return false;
@@ -2985,7 +3297,7 @@ bool TParseContext::binaryOpCommonCheck(TOperator op, TIntermTyped *left, TInter
                // Samplers as l-values are disallowed also in ESSL 3.00, see section 4.1.7,
                // we interpret the spec so that this extends to structs containing samplers,
                // similarly to ESSL 1.00 spec.
-               if((shaderVersion < 300 || op == EOpAssign || op == EOpInitialize) &&
+               if((mShaderVersion < 300 || op == EOpAssign || op == EOpInitialize) &&
                        left->getType().isStructureContainingSamplers())
                {
                        error(loc, "undefined operation for structs containing samplers", getOperatorString(op));
@@ -3000,6 +3312,46 @@ bool TParseContext::binaryOpCommonCheck(TOperator op, TIntermTyped *left, TInter
                {
                        return false;
                }
+               break;
+       case EOpAdd:
+       case EOpSub:
+       case EOpDiv:
+       case EOpIMod:
+       case EOpBitShiftLeft:
+       case EOpBitShiftRight:
+       case EOpBitwiseAnd:
+       case EOpBitwiseXor:
+       case EOpBitwiseOr:
+       case EOpAddAssign:
+       case EOpSubAssign:
+       case EOpDivAssign:
+       case EOpIModAssign:
+       case EOpBitShiftLeftAssign:
+       case EOpBitShiftRightAssign:
+       case EOpBitwiseAndAssign:
+       case EOpBitwiseXorAssign:
+       case EOpBitwiseOrAssign:
+               if((left->isMatrix() && right->isVector()) || (left->isVector() && right->isMatrix()))
+               {
+                       return false;
+               }
+
+               // Are the sizes compatible?
+               if(left->getNominalSize() != right->getNominalSize() || left->getSecondarySize() != right->getSecondarySize())
+               {
+                       // If the nominal sizes of operands do not match:
+                       // One of them must be a scalar.
+                       if(!left->isScalar() && !right->isScalar())
+                               return false;
+
+                       // In the case of compound assignment other than multiply-assign,
+                       // the right side needs to be a scalar. Otherwise a vector/matrix
+                       // would be assigned to a scalar. A scalar can't be shifted by a
+                       // vector either.
+                       if(!right->isScalar() && (IsAssignment(op) || op == EOpBitShiftLeft || op == EOpBitShiftRight))
+                               return false;
+               }
+               break;
        default:
                break;
        }
@@ -3041,7 +3393,7 @@ TIntermSwitch *TParseContext::addSwitch(TIntermTyped *init, TIntermAggregate *st
 
 TIntermCase *TParseContext::addCase(TIntermTyped *condition, const TSourceLoc &loc)
 {
-       if(switchNestingLevel == 0)
+       if(mSwitchNestingLevel == 0)
        {
                error(loc, "case labels need to be inside switch statements", "case");
                recover();
@@ -3079,7 +3431,7 @@ TIntermCase *TParseContext::addCase(TIntermTyped *condition, const TSourceLoc &l
 
 TIntermCase *TParseContext::addDefault(const TSourceLoc &loc)
 {
-       if(switchNestingLevel == 0)
+       if(mSwitchNestingLevel == 0)
        {
                error(loc, "default labels need to be inside switch statements", "default");
                recover();
@@ -3205,21 +3557,21 @@ TIntermBranch *TParseContext::addBranch(TOperator op, const TSourceLoc &loc)
        switch(op)
        {
        case EOpContinue:
-               if(loopNestingLevel <= 0)
+               if(mLoopNestingLevel <= 0)
                {
                        error(loc, "continue statement only allowed in loops", "");
                        recover();
                }
                break;
        case EOpBreak:
-               if(loopNestingLevel <= 0 && switchNestingLevel <= 0)
+               if(mLoopNestingLevel <= 0 && mSwitchNestingLevel <= 0)
                {
                        error(loc, "break statement only allowed in loops and switch statements", "");
                        recover();
                }
                break;
        case EOpReturn:
-               if(currentFunctionType->getBasicType() != EbtVoid)
+               if(mCurrentFunctionType->getBasicType() != EbtVoid)
                {
                        error(loc, "non-void function must return a value", "return");
                        recover();
@@ -3235,13 +3587,13 @@ TIntermBranch *TParseContext::addBranch(TOperator op, const TSourceLoc &loc)
 TIntermBranch *TParseContext::addBranch(TOperator op, TIntermTyped *returnValue, const TSourceLoc &loc)
 {
        ASSERT(op == EOpReturn);
-       functionReturnsValue = true;
-       if(currentFunctionType->getBasicType() == EbtVoid)
+       mFunctionReturnsValue = true;
+       if(mCurrentFunctionType->getBasicType() == EbtVoid)
        {
                error(loc, "void function cannot return a value", "return");
                recover();
        }
-       else if(*currentFunctionType != returnValue->getType())
+       else if(*mCurrentFunctionType != returnValue->getType())
        {
                error(loc, "function return is not matching type:", "return");
                recover();
@@ -3249,26 +3601,220 @@ TIntermBranch *TParseContext::addBranch(TOperator op, TIntermTyped *returnValue,
        return intermediate.addBranch(op, returnValue, loc);
 }
 
+TIntermTyped *TParseContext::addFunctionCallOrMethod(TFunction *fnCall, TIntermNode *paramNode, TIntermNode *thisNode, const TSourceLoc &loc, bool *fatalError)
+{
+       *fatalError = false;
+       TOperator op = fnCall->getBuiltInOp();
+       TIntermTyped *callNode = nullptr;
+
+       if(thisNode != nullptr)
+       {
+               ConstantUnion *unionArray = new ConstantUnion[1];
+               int arraySize = 0;
+               TIntermTyped *typedThis = thisNode->getAsTyped();
+               if(fnCall->getName() != "length")
+               {
+                       error(loc, "invalid method", fnCall->getName().c_str());
+                       recover();
+               }
+               else if(paramNode != nullptr)
+               {
+                       error(loc, "method takes no parameters", "length");
+                       recover();
+               }
+               else if(typedThis == nullptr || !typedThis->isArray())
+               {
+                       error(loc, "length can only be called on arrays", "length");
+                       recover();
+               }
+               else
+               {
+                       arraySize = typedThis->getArraySize();
+                       if(typedThis->getAsSymbolNode() == nullptr)
+                       {
+                               // This code path can be hit with expressions like these:
+                               // (a = b).length()
+                               // (func()).length()
+                               // (int[3](0, 1, 2)).length()
+                               // ESSL 3.00 section 5.9 defines expressions so that this is not actually a valid expression.
+                               // It allows "An array name with the length method applied" in contrast to GLSL 4.4 spec section 5.9
+                               // which allows "An array, vector or matrix expression with the length method applied".
+                               error(loc, "length can only be called on array names, not on array expressions", "length");
+                               recover();
+                       }
+               }
+               unionArray->setIConst(arraySize);
+               callNode = intermediate.addConstantUnion(unionArray, TType(EbtInt, EbpUndefined, EvqConstExpr), loc);
+       }
+       else if(op != EOpNull)
+       {
+               //
+               // Then this should be a constructor.
+               // Don't go through the symbol table for constructors.
+               // Their parameters will be verified algorithmically.
+               //
+               TType type(EbtVoid, EbpUndefined);  // use this to get the type back
+               if(!constructorErrorCheck(loc, paramNode, *fnCall, op, &type))
+               {
+                       //
+                       // It's a constructor, of type 'type'.
+                       //
+                       callNode = addConstructor(paramNode, &type, op, fnCall, loc);
+               }
+
+               if(callNode == nullptr)
+               {
+                       recover();
+                       callNode = intermediate.setAggregateOperator(nullptr, op, loc);
+               }
+       }
+       else
+       {
+               //
+               // Not a constructor.  Find it in the symbol table.
+               //
+               const TFunction *fnCandidate;
+               bool builtIn;
+               fnCandidate = findFunction(loc, fnCall, &builtIn);
+               if(fnCandidate)
+               {
+                       //
+                       // A declared function.
+                       //
+                       if(builtIn && !fnCandidate->getExtension().empty() &&
+                               extensionErrorCheck(loc, fnCandidate->getExtension()))
+                       {
+                               recover();
+                       }
+                       op = fnCandidate->getBuiltInOp();
+                       if(builtIn && op != EOpNull)
+                       {
+                               //
+                               // A function call mapped to a built-in operation.
+                               //
+                               if(fnCandidate->getParamCount() == 1)
+                               {
+                                       //
+                                       // Treat it like a built-in unary operator.
+                                       //
+                                       callNode = createUnaryMath(op, paramNode->getAsTyped(), loc, &fnCandidate->getReturnType());
+                                       if(callNode == nullptr)
+                                       {
+                                               std::stringstream extraInfoStream;
+                                               extraInfoStream << "built in unary operator function.  Type: "
+                                                       << static_cast<TIntermTyped*>(paramNode)->getCompleteString();
+                                               std::string extraInfo = extraInfoStream.str();
+                                               error(paramNode->getLine(), " wrong operand type", "Internal Error", extraInfo.c_str());
+                                               *fatalError = true;
+                                               return nullptr;
+                                       }
+                               }
+                               else
+                               {
+                                       TIntermAggregate *aggregate = intermediate.setAggregateOperator(paramNode, op, loc);
+                                       aggregate->setType(fnCandidate->getReturnType());
+
+                                       // Some built-in functions have out parameters too.
+                                       functionCallLValueErrorCheck(fnCandidate, aggregate);
+
+                                       callNode = aggregate;
+
+                                       if(fnCandidate->getParamCount() == 2)
+                                       {
+                                               TIntermSequence &parameters = paramNode->getAsAggregate()->getSequence();
+                                               TIntermTyped *left = parameters[0]->getAsTyped();
+                                               TIntermTyped *right = parameters[1]->getAsTyped();
+
+                                               TIntermConstantUnion *leftTempConstant = left->getAsConstantUnion();
+                                               TIntermConstantUnion *rightTempConstant = right->getAsConstantUnion();
+                                               if (leftTempConstant && rightTempConstant)
+                                               {
+                                                       TIntermTyped *typedReturnNode = leftTempConstant->fold(op, rightTempConstant, infoSink());
+
+                                                       if(typedReturnNode)
+                                                       {
+                                                               callNode = typedReturnNode;
+                                                       }
+                                               }
+                                       }
+                               }
+                       }
+                       else
+                       {
+                               // This is a real function call
+
+                               TIntermAggregate *aggregate = intermediate.setAggregateOperator(paramNode, EOpFunctionCall, loc);
+                               aggregate->setType(fnCandidate->getReturnType());
+
+                               // this is how we know whether the given function is a builtIn function or a user defined function
+                               // if builtIn == false, it's a userDefined -> could be an overloaded builtIn function also
+                               // if builtIn == true, it's definitely a builtIn function with EOpNull
+                               if(!builtIn)
+                                       aggregate->setUserDefined();
+                               aggregate->setName(fnCandidate->getMangledName());
+
+                               callNode = aggregate;
+
+                               functionCallLValueErrorCheck(fnCandidate, aggregate);
+                       }
+               }
+               else
+               {
+                       // error message was put out by findFunction()
+                       // Put on a dummy node for error recovery
+                       ConstantUnion *unionArray = new ConstantUnion[1];
+                       unionArray->setFConst(0.0f);
+                       callNode = intermediate.addConstantUnion(unionArray, TType(EbtFloat, EbpUndefined, EvqConstExpr), loc);
+                       recover();
+               }
+       }
+       delete fnCall;
+       return callNode;
+}
+
+TIntermTyped *TParseContext::addTernarySelection(TIntermTyped *cond, TIntermTyped *trueBlock, TIntermTyped *falseBlock, const TSourceLoc &loc)
+{
+       if(boolErrorCheck(loc, cond))
+               recover();
+
+       if(trueBlock->getType() != falseBlock->getType())
+       {
+               binaryOpError(loc, ":", trueBlock->getCompleteString(), falseBlock->getCompleteString());
+               recover();
+               return falseBlock;
+       }
+       // ESSL1 sections 5.2 and 5.7:
+       // ESSL3 section 5.7:
+       // Ternary operator is not among the operators allowed for structures/arrays.
+       if(trueBlock->isArray() || trueBlock->getBasicType() == EbtStruct)
+       {
+               error(loc, "ternary operator is not allowed for structures or arrays", ":");
+               recover();
+               return falseBlock;
+       }
+       return intermediate.addSelection(cond, trueBlock, falseBlock, loc);
+}
+
 //
 // Parse an array of strings using yyparse.
 //
 // Returns 0 for success.
 //
 int PaParseStrings(int count, const char* const string[], const int length[],
-                   TParseContext* context) {
-    if ((count == 0) || (string == NULL))
-        return 1;
+                                  TParseContext* context) {
+       if ((count == 0) || !string)
+               return 1;
 
-    if (glslang_initialize(context))
-        return 1;
+       if (glslang_initialize(context))
+               return 1;
 
-    int error = glslang_scan(count, string, length, context);
-    if (!error)
-        error = glslang_parse(context);
+       int error = glslang_scan(count, string, length, context);
+       if (!error)
+               error = glslang_parse(context);
 
-    glslang_finalize(context);
+       glslang_finalize(context);
 
-    return (error == 0) && (context->numErrors() == 0) ? 0 : 1;
+       return (error == 0) && (context->numErrors() == 0) ? 0 : 1;
 }