("-failsafe",Arg.Set(Globals.failsafe), "Never crash. Be stupid, but never crash. Use at your own risk.");
]
("-failsafe",Arg.Set(Globals.failsafe), "Never crash. Be stupid, but never crash. Use at your own risk.");
]
let felst = List.map
(fun lst->let (x,y)=lst in
logprint "Slice %s (%s)\n" x y;
let felst = List.map
(fun lst->let (x,y)=lst in
logprint "Slice %s (%s)\n" x y;