declarations[current_block->parent].insert(make_pair(name, &statement));
}
+void DeclarationValidator::visit(TypeDeclaration &type)
+{
+ check_definition(type.name, type);
+}
+
void DeclarationValidator::visit(StructDeclaration &strct)
{
check_definition(strct.name, strct);
TraversingVisitor::visit(func);
}
+
+void ReferenceValidator::visit(VariableReference &var)
+{
+ if(!var.declaration)
+ error(var, format("Use of undeclared variable '%s'", var.name));
+ else if(stage->type!=Stage::VERTEX && var.declaration->interface=="in" && !var.declaration->linked_declaration)
+ error(var, format("Use of unlinked input variable '%s'", var.name));
+}
+
+void ReferenceValidator::visit(InterfaceBlockReference &iface)
+{
+ /* An interface block reference without a declaration should be impossible
+ since references are generated based on existing declarations. */
+ if(!iface.declaration)
+ error(iface, format("Use of undeclared interface block '%s'", iface.name));
+ else if(stage->type!=Stage::VERTEX && iface.declaration->interface=="in" && !iface.declaration->linked_block)
+ error(iface, format("Use of unlinked input block '%s'", iface.name));
+}
+
+void ReferenceValidator::visit(VariableDeclaration &var)
+{
+ if(!var.type_declaration)
+ error(var, format("Use of undeclared type '%s'", var.type));
+ TraversingVisitor::visit(var);
+}
+
} // namespace SL
} // namespace GL
} // namespace Msp