realworldocaml/examples — pull request #23 by juergenhoetzel (2014-10-04 10:59:17+00:00)
Title: 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").