Bug fix new subs causing identifier exeption

SSlinky · SSlinky · commit 4de72870b499 · 2025-04-06T21:38:44.000+08:00
diff --git a/server/src/project/elements/procedure.ts b/server/src/project/elements/procedure.ts
@@ -40,10 +40,12 @@ export class SubDeclarationElement extends BaseProcedureElement<SubroutineDeclar
 		this.identifierCapability = new IdentifierCapability({
 			element: this,
 			getNameContext: () => ctx.subroutineName()?.ambiguousIdentifier(),
+			// For some reason the IdentifierCapability throws if no default is given
+			// despite it not actually ever needing it. Most unusual.
+			defaultRange: () => this.context.range
 		});
 		this.foldingRangeCapability.openWord = `Sub ${this.identifierCapability.name}`;
 		this.foldingRangeCapability.closeWord = 'End Sub';
-
 	}
 }
 

Original file line number	Diff line number	Diff line change
`@@ -40,10 +40,12 @@ export class SubDeclarationElement extends BaseProcedureElement<SubroutineDeclar`
`40`	`40`	`this.identifierCapability = new IdentifierCapability({`
`41`	`41`	`element: this,`
`42`	`42`	`getNameContext: () => ctx.subroutineName()?.ambiguousIdentifier(),`
	`43`	`+ // For some reason the IdentifierCapability throws if no default is given`
	`44`	`+ // despite it not actually ever needing it. Most unusual.`
	`45`	`+ defaultRange: () => this.context.range`
`43`	`46`	`});`
`44`	`47`	this.foldingRangeCapability.openWord = `Sub ${this.identifierCapability.name}`;
`45`	`48`	`this.foldingRangeCapability.closeWord = 'End Sub';`
`46`		`-`
`47`	`49`	`}`
`48`	`50`	`}`
`49`	`51`