diff options
Diffstat (limited to 'cppawk-include/fun-priv.h')
| -rw-r--r-- | cppawk-include/fun-priv.h | 50 |
1 files changed, 0 insertions, 50 deletions
diff --git a/cppawk-include/fun-priv.h b/cppawk-include/fun-priv.h deleted file mode 100644 index 0f92a44..0000000 --- a/cppawk-include/fun-priv.h +++ /dev/null @@ -1,50 +0,0 @@ -// cppawk: C preprocessor wrapper around awk -// Copyright 2022 Kaz Kylheku <kaz@kylheku.com> -// -// BSD-2 License -// -// Redistribution and use in source and binary forms, with or without -// modification, are permitted provided that the following conditions are met: -// -// 1. Redistributions of source code must retain the above copyright notice, -// this list of conditions and the following disclaimer. -// -// 2. Redistributions in binary form must reproduce the above copyright notice, -// this list of conditions and the following disclaimer in the documentation -// and/or other materials provided with the distribution. -// -// THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" -// AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE -// IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE -// ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE -// LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR -// CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF -// SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS -// INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN -// CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) -// ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE -// POSSIBILITY OF SUCH DAMAGE. - -#ifndef __CPPAWK_FUN_PRIV_H -#define __CPPAWK_FUN_PRIV_H - -#ifndef __CPPAWK_BASE_H -#include "base.h" -#endif - -#ifndef __CPPAWK_CONS_H -#include "cons-priv.h" -#endif - -#if !__have_indirect_functions -#warning "<fun.h> requires an Awk with function indirection like newer GNU Awk" -#endif - -#define __bind(fname, env) __cons(__xstr(fname), env) -#define __fun_(fname) __xstr(fname) -#define __call(fobj, ...) (__consp(fobj) \ - ? __progn(__g(f) = __car(fobj), \ - @__g(f)(__cdr(fobj), ## __VA_ARGS__)) \ - : @fobj(__VA_ARGS__)) - -#endif |