|
|
@ -681,7 +681,7 @@ public final class Checker implements ActualParameterVisitor<FormalParameter, Vo |
|
|
|
ast.variable = ast.V.variable; |
|
|
|
ast.variable = ast.V.variable; |
|
|
|
if (vType instanceof RecordTypeDenoter record) { |
|
|
|
if (vType instanceof RecordTypeDenoter record) { |
|
|
|
ast.type = checkFieldIdentifier(record.FT, ast.I); |
|
|
|
ast.type = checkFieldIdentifier(record.FT, ast.I); |
|
|
|
checkAndReportError(!ast.type.equals(StdEnvironment.errorType), "no field \"%\" in this record type", |
|
|
|
checkAndReportError(ast.type != StdEnvironment.errorType, "no field \"%\" in this record type", |
|
|
|
ast.I); |
|
|
|
ast.I); |
|
|
|
} else { |
|
|
|
} else { |
|
|
|
reportError("record expected here", ast.V); |
|
|
|
reportError("record expected here", ast.V); |
|
|
|