@@ -2,7 +2,11 @@ import powershell
22
33abstract private class AbstractObjectCreation extends CallExpr {
44 /** The name of the type of the object being constructed. */
5- abstract string getConstructedTypeName ( ) ;
5+ bindingset [ result ]
6+ pragma [ inline_late]
7+ string getAConstructedTypeName ( ) { result .toLowerCase ( ) = this .getLowerCaseConstructedTypeName ( ) }
8+
9+ abstract string getLowerCaseConstructedTypeName ( ) ;
610
711 abstract Expr getConstructedTypeExpr ( ) ;
812}
@@ -14,8 +18,14 @@ abstract private class AbstractObjectCreation extends CallExpr {
1418 * ```
1519 */
1620class NewObjectCreation extends AbstractObjectCreation , ConstructorCall {
17- final override string getConstructedTypeName ( ) {
18- result = ConstructorCall .super .getConstructedTypeName ( )
21+ final override string getLowerCaseConstructedTypeName ( ) {
22+ result = ConstructorCall .super .getLowerCaseConstructedTypeName ( )
23+ }
24+
25+ bindingset [ result ]
26+ pragma [ inline_late]
27+ final override string getAConstructedTypeName ( ) {
28+ result = ConstructorCall .super .getAConstructedTypeName ( )
1929 }
2030
2131 final override Expr getConstructedTypeExpr ( ) { result = typename }
@@ -30,8 +40,8 @@ class NewObjectCreation extends AbstractObjectCreation, ConstructorCall {
3040class DotNetObjectCreation extends AbstractObjectCreation , CmdCall {
3141 DotNetObjectCreation ( ) { this .getLowerCaseName ( ) = "new-object" }
3242
33- final override string getConstructedTypeName ( ) {
34- result = this .getConstructedTypeExpr ( ) .( StringConstExpr ) .getValueString ( )
43+ final override string getLowerCaseConstructedTypeName ( ) {
44+ result = this .getConstructedTypeExpr ( ) .( StringConstExpr ) .getValueString ( ) . toLowerCase ( )
3545 }
3646
3747 final override Expr getConstructedTypeExpr ( ) {
0 commit comments