package hack_parallel

  1. Overview
  2. Docs
Legend:
Page
Library
Module
Module type
Parameter
Class
Class type
Source

Source file hack_core_printf.ml

1
2
3
4
5
6
7
include Printf

(** failwith, invalid_arg, and exit accepting printf's format. *)

let failwithf    fmt = ksprintf (fun s () -> failwith s)                        fmt
let invalid_argf fmt = ksprintf (fun s () -> invalid_arg s)                     fmt
let exitf        fmt = ksprintf (fun s () -> Printf.eprintf "%s\n%!" s; exit 1) fmt