USING: accessors combinators csv kernel sequences ;

IN: io.files.info.unix.linux

: mtab-csv>mtab-entry ( csv -- mtab-entry )
[ mtab-entry new ] dip {
[ first >>file-system-name ]
[ second >>mount-point ]
[ third >>type ]
[ fourth string>csv first >>options ]
[ 4 swap ?nth [ 0 ] unless* >>frequency ]
[ 5 swap ?nth [ 0 ] unless* >>pass-number ]
} cleave ;