R: Examples for 'ps::ps_open

### ** Examples

## Don't show: 
if (ps::ps_is_supported() && ! ps:::is_cran_check()) (if (getRversion() >= "3.4") withAutoprint else force)({ # examplesIf
## End(Don't show)
p <- ps_handle()
ps_open_files(p)
f <- file(tmp <- tempfile(), "w")
ps_open_files(p)
close(f)
unlink(tmp)
ps_open_files(p)
## Don't show: 
}) # examplesIf

> p <- ps_handle()
> ps_open_files(p)
# A tibble: 4 × 2
     fd path                                    
  <int> <chr>                                   
1     0 /dev/pts/1 (deleted)                    
2     1 /dev/pts/1 (deleted)                    
3     2 /dev/pts/1 (deleted)                    
4     4 /tmp/Rtmpul02DQ/Rfa09d9b77084d (deleted)
> f <- file(tmp <- tempfile(), "w")
> ps_open_files(p)
# A tibble: 5 × 2
     fd path                                    
  <int> <chr>                                   
1     0 /dev/pts/1 (deleted)                    
2     1 /dev/pts/1 (deleted)                    
3     2 /dev/pts/1 (deleted)                    
4     4 /tmp/Rtmpul02DQ/Rfa09d9b77084d (deleted)
5     6 /tmp/Rtmpul02DQ/filea09d9537a291        
> close(f)
> unlink(tmp)
> ps_open_files(p)
# A tibble: 4 × 2
     fd path                                    
  <int> <chr>                                   
1     0 /dev/pts/1 (deleted)                    
2     1 /dev/pts/1 (deleted)                    
3     2 /dev/pts/1 (deleted)                    
4     4 /tmp/Rtmpul02DQ/Rfa09d9b77084d (deleted)

## End(Don't show)

Examples for 'ps::ps_open_files'

Open files of a process