remoting proxy constructor is public.

typer.ml

@@ -406,7 +406,7 @@ let extend_remoting ctx c t p async =
 	let class_fields = (match ct with
 		| TInst (c,params) ->
 			(FVar ("__cnx",None,[],Some (TPNormal { tpackage = ["haxe"]; tname = if async then "AsyncConnection" else "Connection"; tparams = [] }),None),p) ::
-			(FFun ("new",None,[],[],{ f_args = ["c",None]; f_type = None; f_expr = (EBinop (OpAssign,(EConst (Ident "__cnx"),p),(EConst (Ident "c"),p)),p) }),p) ::
+			(FFun ("new",None,[APublic],[],{ f_args = ["c",None]; f_type = None; f_expr = (EBinop (OpAssign,(EConst (Ident "__cnx"),p),(EConst (Ident "c"),p)),p) }),p) ::
 			PMap.fold (fun f acc ->						
 				if not f.cf_public then
 					acc