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

current implementation also does recursion on FIFOs and device files:

    # ls_rec ".";;
    Exception: (Sys_error "./fifo: Not a directory").