fixed recursion on non-directory-entries (FIFO, Dev, ..)

[juergenhoetzel]

current implementation also does recursion on FIFOs and device files:

# ls_rec ".";;
Exception: (Sys_error "./fifo: Not a directory").