raw_worker <- cloneId mkVectOcc orig_worker (exprType body)
let vect_worker = raw_worker `setIdUnfolding`
raw_worker <- cloneId mkVectOcc orig_worker (exprType body)
let vect_worker = raw_worker `setIdUnfolding`
defGlobalVar orig_worker vect_worker
return (vect_worker, body)
where
defGlobalVar orig_worker vect_worker
return (vect_worker, body)
where