@@ -57,14 +57,14 @@ set[Define] findAdditionalDefinitions(set[Define] cursorDefs, Tree tr, TModel tm
5757 adtDefs += findAdditionalDefinitions (adtDefs , tr , tm , r );
5858
5959 // Find all fields with the same name in these ADT definitions
60- return getFieldDefinitions (adtDefs , cursorDefs < idRole , id > , r .getConfig ().tmodelForLoc );
60+ return getFieldDefinitions (adtDefs , cursorDefs . id , r .getConfig ().tmodelForLoc );
6161}
6262
6363@synopsis {Collect all definitions for field <fieldName> in ADT/collection/tuple by definition.}
64- set [Define ] getFieldDefinitions (set [Define ] containerDefs , rel [ IdRole , str ] fields , TModel (loc ) getModel )
64+ set [Define ] getFieldDefinitions (set [Define ] containerDefs , set [ str ] fieldNames , TModel (loc ) getModel )
6565 = flatMapPerFile (containerDefs , set [Define ](loc f , set [Define ] localContainerDefs ) {
6666 localTm = getModel (f );
67- candidateDefs = {*(localTm .defines <idRole , id , scope , defined > [role , name ]) | < role , name > <- fields };
67+ candidateDefs = {*(localTm .defines <idRole , id , scope , defined > [fieldRoles , name ]) | name <- fieldNames };
6868 return {localTm .definitions [d ] | loc d <- candidateDefs [localContainerDefs .defined ]};
6969 });
7070
@@ -80,7 +80,7 @@ set[Define] getFieldDefinitions(set[AType] containerTypes, str fieldName, TModel
8080 }
8181 }
8282 // Since we do not know (based on tree) what kind of field role (positional, keyword) we are looking for, select them all
83- return getFieldDefinitions (containerTypeDefs , {< role , fieldName > | role <- fieldRoles }, getModel );
83+ return getFieldDefinitions (containerTypeDefs , {fieldName }, getModel );
8484}
8585
8686@synopsis {Collect all definitions for the field <fieldName> in ADT/collection/tuple by tree.}
0 commit comments