From 2125f01f97abfe343fc5e0cc078bf1d081b2e441 Mon Sep 17 00:00:00 2001
From: Ian Jauslin <ian.jauslin@roma1.infn.it>
Date: Fri, 20 May 2016 20:30:15 +0000
Subject: Initial commit

---
 src/array_ldouble.h | 52 ++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 52 insertions(+)
 create mode 100644 src/array_ldouble.h

(limited to 'src/array_ldouble.h')

diff --git a/src/array_ldouble.h b/src/array_ldouble.h
new file mode 100644
index 0000000..d314906
--- /dev/null
+++ b/src/array_ldouble.h
@@ -0,0 +1,52 @@
+/*
+Copyright 2016 Ian Jauslin
+
+Licensed under the Apache License, Version 2.0 (the "License");
+you may not use this file except in compliance with the License.
+You may obtain a copy of the License at
+
+    http://www.apache.org/licenses/LICENSE-2.0
+
+Unless required by applicable law or agreed to in writing, software
+distributed under the License is distributed on an "AS IS" BASIS,
+WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+See the License for the specific language governing permissions and
+limitations under the License.
+*/
+
+/*
+  Preprocessor macros for long double arrays
+*/
+
+
+// reset CPP macros
+#undef ARRAY_TYPENAME
+#undef ARRAY_FUNC
+#undef ARRAY_VAL_TYPE
+#undef ARRAY_VAL_FREE
+#undef ARRAY_VAL_SET
+#undef ARRAY_VAL_CPY
+#undef ARRAY_VAL_IFEQ
+#undef ARRAY_VAL_IFLT
+#undef ARRAY_VAL_IFGT
+#undef ARRAY_VAL_PRINT
+
+
+// name of the polynomial type
+#define ARRAY_TYPENAME array_ldouble
+// prefix of function names
+#define ARRAY_FUNC(NAME) array_ldouble_ ## NAME
+
+// type of values
+#define ARRAY_VAL_TYPE long double
+// set values
+#define ARRAY_VAL_SET(VAL, NEWVAL) VAL = NEWVAL
+// copy values
+#define ARRAY_VAL_CPY(FROMVAL, TOVAL) TOVAL = FROMVAL
+// compare values
+#define ARRAY_VAL_IFEQ(VAL1, VAL2) VAL1==VAL2
+#define ARRAY_VAL_IFLT(VAL1, VAL2) VAL1<VAL2
+#define ARRAY_VAL_IFGT(VAL1, VAL2) VAL1>VAL2
+// print values
+#define ARRAY_VAL_PRINT(VAL) fprint_ldouble(stdout, VAL)
+
-- 
cgit v1.2.3-54-g00ecf