Typescript: Fix handling of parentheses in class property value

Units/parser-typescript.r/ts-class-member-init.d/args.ctags

@@ -0,0 +1,3 @@
+--sort=no
+--kinds-typescript=*
+--fields=+i

Units/parser-typescript.r/ts-class-member-init.d/expected.tags

@@ -0,0 +1,6 @@
+User	input.ts	/^class User {$/;"	c
+soundMan	input.ts	/^	private readonly soundMan = singletons.getSoundManager();$/;"	p	class:User
+lssMan	input.ts	/^	private readonly lssMan = singletons.getLoopedSoundSourceManager();$/;"	p	class:User
+minimapStyle	input.ts	/^	override minimapStyle = Color.USER;$/;"	p	class:User
+destroy	input.ts	/^	override destroy(parent: any) {$/;"	m	class:User
+parent	input.ts	/^	override destroy(parent: any) {$/;"	z	method:User.destroy

Units/parser-typescript.r/ts-class-member-init.d/input.ts

@@ -0,0 +1,14 @@
+/* base on User.ts from Stendhal -- License: AGPL */
+/* https://github.com/arianne/stendhal/blob/master/srcjs/stendhal/entity/User.ts */
+
+class User {
+	private readonly soundMan = singletons.getSoundManager();
+	private readonly lssMan = singletons.getLoopedSoundSourceManager();
+
+	override minimapStyle = Color.USER;
+
+	override destroy(parent: any) {
+		this.onExitZone();
+		super.destroy(parent);
+	}
+}

parsers/typescript.c

@@ -1820,8 +1820,11 @@ static void parseClassBody (const int scope, tokenInfo *const token)
 					parsingValue = false;
 					break;
 				case TOKEN_OPEN_PAREN:
-					if (! member) break;
 					uwiUngetC ('(');
+					if (! member) {
+						parsed = tryParser (parseParens, token, false);
+						break;
+					}
 
 					const int nscope = emitTag (member, isGenerator ? TSTAG_GENERATOR : TSTAG_METHOD);