Compile a function with undetermined number of variables

Question

I have been wrapping my head about a question it may look simple to you. I want compile a function that depends on a number of undetermined variables as,

Compile[{{x, _Real}, {y, _Real}, {z, _Real}, {w,_Real},...}, Evaluate[f(x,y,z,w,..,)], 
 RuntimeAttributes -> {Listable}, RuntimeOptions -> "Speed", 
 Parallelization -> True]

Where {x,y,z,...} can be as long as needed. I have tried the simple exercise of doing,

var={x,y,z}
list=Table[{var[[i]], _Re},{i,Length@var}];
Compile[list, Evaluate[f(x,y,z,w,..,)], RuntimeAttributes -> {Listable}, RuntimeOptions -> "Speed", Parallelization -> True]

but it does not seem to work since _Re needs to be symbolic? (I am asking but I do not know).

Thanks for your comprehension!

UPDATE:

I found a solution thanks to: Evaluating arguments of module (inside compile)

This is what it worked for me:

Compile[Evaluate@({#, _Real} & /@ var), Evaluate[f(x,y,z,w,..,)], RuntimeAttributes -> {Listable}, RuntimeOptions -> "Speed", Parallelization -> True]

Answer 1

I think this is what @JM was suggesting:

cfun = Compile[{{list, _Real, 1}}, Sin[list]];

In other words, define your function to take a rank-1 tensor (i.e. a list) of reals; you do not need to specify the length beforehand! Then, just evaluate whatever you need on that list. For instance, here are two examples with lists of different lenghts:

cfun[Range[10000]]
(* {0.841471, 0.909297, 0.14112, -0.756802, ..., 0.992973, 0.636087, -0.305614}*)

cfun[Range[3]]
(* {0.841471, 0.909297, 0.14112} *)