|
@@ -3015,7 +3015,7 @@ TYPE
|
|
IF ~(rightType = SyntaxTree.typeDeclarationType) THEN
|
|
IF ~(rightType = SyntaxTree.typeDeclarationType) THEN
|
|
Error(right.position,"is not a type ");
|
|
Error(right.position,"is not a type ");
|
|
ELSIF ~IsTypeExtension(leftType, right(SyntaxTree.SymbolDesignator).symbol(SyntaxTree.TypeDeclaration).declaredType.resolved) THEN
|
|
ELSIF ~IsTypeExtension(leftType, right(SyntaxTree.SymbolDesignator).symbol(SyntaxTree.TypeDeclaration).declaredType.resolved) THEN
|
|
- Error(binaryExpression.position,"is not a type extension of ");
|
|
|
|
|
|
+ Error(binaryExpression.position,"is not a type extension of ");
|
|
IF VerboseErrorMessage THEN
|
|
IF VerboseErrorMessage THEN
|
|
Printout.Info("left",left);
|
|
Printout.Info("left",left);
|
|
Printout.Info("right",right);
|
|
Printout.Info("right",right);
|
|
@@ -10176,4 +10176,4 @@ TYPE
|
|
|
|
|
|
END FoxSemanticChecker.
|
|
END FoxSemanticChecker.
|
|
|
|
|
|
-SystemTools.FreeDownTo FoxSemanticChecker ~
|
|
|
|
|
|
+SystemTools.FreeDownTo FoxSemanticChecker ~
|