added ENew type params support

Author: ncannasse

hscript/Bytes.hx

@@ -200,11 +200,20 @@ class Bytes {
 			bout.addByte(el.length);
 			for( e in el )
 				doEncode(e);
-		case ENew(cl,params):
+		case ENew(cl,params, args):
 			doEncodeString(cl);
 			bout.addByte(params.length);
 			for( e in params )
 				doEncode(e);
+			if( storeTypes ) {
+				if( args == null )
+					bout.addByte(0);
+				else {
+					bout.addByte(args.length);
+					for( a in args )
+						encodeType(a);
+				}
+			}
 		case EThrow(e):
 			doEncode(e);
 		case ETry(e,v,t,ecatch):
@@ -413,7 +422,13 @@ class Bytes {
 			var el = new Array();
 			for( i in 0...getByte() )
 				el.push(doDecode());
-			ENew(cl,el);
+			var targs = null;
+			if( storeTypes ) {
+				var len = getByte();
+				if( len > 0 )
+					targs = [for( i in 0...len ) decodeType()];
+			}
+			ENew(cl,el,targs);
 		case 19:
 			EThrow(doDecode());
 		case 20:

hscript/Expr.hx

@@ -58,7 +58,7 @@ enum Expr {
 	EReturn( ?e : Expr );
 	EArray( e : Expr, index : Expr );
 	EArrayDecl( e : Array<Expr> );
-	ENew( cl : String, params : Array<Expr> );
+	ENew( cl : String, params : Array<Expr>, ?args : Array<CType> );
 	EThrow( e : Expr );
 	ETry( e : Expr, v : String, t : Null<CType>, ecatch : Expr );
 	EObject( fl : Array<{ name : String, e : Expr }> );

hscript/Parser.hx

@@ -735,22 +735,19 @@ class Parser {
 			var e = if( tk == TSemicolon ) null else parseExpr();
 			mk(EReturn(e),p1,if( e == null ) tokenMax else pmax(e));
 		case "new":
-			var a = new Array();
-			a.push(getIdent());
-			while( true ) {
-				var tk = token();
-				switch( tk ) {
-				case TDot:
-					a.push(getIdent());
-				case TPOpen:
-					break;
-				default:
-					unexpected(tk);
-					break;
-				}
+			var start = tokenMin;
+			var t = parseType();
+			switch( t ) {
+			case CTPath(path, params):
+				if( params != null && !allowTypes )
+					error(ECustom("Type parameters are not allowed"),start,tokenMax);
+				ensure(TPOpen);
+				var args = parseExprList(TPClose);
+				mk(ENew(path.join("."),args,params),p1);
+			default:
+				error(ECustom("Invalid type"),start,tokenMax);
+				null;
 			}
-			var args = parseExprList(TPClose);
-			mk(ENew(a.join("."),args),p1);
 		case "throw":
 			var e = parseExpr();
 			mk(EThrow(e),p1,pmax(e));