1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
#[macro_export]
macro_rules! write_to_stdout {
($($arg:tt)*) => ({
use std::io::Write;
match write!(std::io::stdout(), $($arg)*) {
Ok(()) => (),
Err(ref err) if err.kind() == std::io::ErrorKind::BrokenPipe => std::process::exit(141),
Err(ref err) => panic!("{}", err),
};
})
}
#[macro_export]
macro_rules! _log {
($verbosity:expr, $level:expr, $($arg:tt)*) => {
if $crate::config::ENABLE_LOGGING && $level <= $verbosity
{
write_to_stdout!($($arg)*);
write_to_stdout!("\n");
}
}
}
#[macro_export]
macro_rules! log {
($checker:expr, $level:expr, $($arg:tt)*) => {
_log!($checker.flags.verbosity, $level, $($arg)*)
};
}
#[macro_export]
macro_rules! defer_log {
($checker:expr, $level:expr, $($arg:tt)*) => {
let verbosity = $checker.flags.verbosity;
defer!(
_log!(verbosity, $level, $($arg)*)
);
}
}
#[macro_export]
macro_rules! warn {
($($arg:tt)*) => ({
use ansi_term;
let style = if $crate::output::is_a_tty() {
ansi_term::Colour::Yellow.normal()
} else {
ansi_term::Style::default()
};
write_to_stdout!("{}", style.paint("Warning: "));
write_to_stdout!("{}\n", style.paint(&format!($($arg)*)));
})
}
#[macro_export]
macro_rules! die {
($($arg:tt)*) => ({
use ansi_term;
let style = if $crate::output::is_a_tty() {
ansi_term::Colour::Red.normal()
} else {
ansi_term::Style::default()
};
write_to_stdout!("{}", style.paint("Error: "));
write_to_stdout!("{}\n", style.paint(&format!($($arg)*)));
std::process::exit(2);
})
}
#[macro_export]
macro_rules! invariant {
($($arg:tt)*) => ({
if $crate::config::CHECK_INVARIANTS {
assert!($($arg)*);
}
})
}
#[macro_export]
macro_rules! requires {
($($arg:tt)*) => ({
if $crate::config::CHECK_PRECONDITIONS {
assert!($($arg)*);
}
})
}
#[macro_export]
macro_rules! comment {
($($arg:tt)*) => ({
write_to_stdout!("c ");
write_to_stdout!($($arg)*);
write_to_stdout!("\n");
})
}