1/*
2 * Copyright 2017, Data61
3 * Commonwealth Scientific and Industrial Research Organisation (CSIRO)
4 * ABN 41 687 119 230.
5 *
6 * This software may be distributed and modified according to the terms of
7 * the BSD 2-Clause license. Note that NO WARRANTY is provided.
8 * See "LICENSE_BSD2.txt" for details.
9 *
10 * @TAG(DATA61_BSD)
11 */
12
13#pragma once
14
15/* Macros relevant for verification. */
16
17#include <assert.h>
18
19/* This induces a guard containing the given expression in the lifted
20 * specification of your function in Isabelle. You can think of this as an
21 * assertion that is also visible (and necessary to prove) in Isabelle.
22 */
23#define GUARD(x) \
24    do { \
25        assert(x); \
26        if (!(x)) { \
27            for (;;); \
28        } \
29    } while (0)
30