I mean you can do something like this:
```
(let ((process-environment (mapcar 'identity process-environment)))
  (setenv "EMACSLOADPATH" (mapconcat 'identity load-path ":"))
  ;; and run process in here
  )
```
Here `setenv` does not change global process-environment but temporary one.