[PATCH 2/2] silence comment5 warnings

Reini Urban <[email protected]>
Newsgroups gmane.lisp.clisp.devel
Message-ID <[email protected]>
Like "End of comment outside comment in line"
caused by multi-line comments not detected as such with #define.
---
 src/aridecl.d  | 10 +++++-----
 src/lispbibl.d |  6 +++---
 2 files changed, 8 insertions(+), 8 deletions(-)




Reini

------------------------------------------------------------------------------
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot

_______________________________________________
clisp-devel mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/clisp-devel
0002-silence-comment5-warnings.patch (application/octet-stream, 3.1 KB)
From 34cbe9899a317e54cbaef69d12fb1b9c318a4fec Mon Sep 17 00:00:00 2001
From: Reini Urban <[email protected]>
Date: Sat, 18 Mar 2017 18:58:06 +0100
Subject: [PATCH 2/2] silence comment5 warnings

Like "End of comment outside comment in line"
caused by multi-line comments not detected as such with #define.
---
 src/aridecl.d  | 10 +++++-----
 src/lispbibl.d |  6 +++---
 2 files changed, 8 insertions(+), 8 deletions(-)

diff --git src/aridecl.d src/aridecl.d
index 208b6dfa7..20018c2ab 100644
--- src/aridecl.d
+++ src/aridecl.d
@@ -150,8 +150,8 @@
      2. in the FFI, the conversion from a Lisp ffloat to a C 'float' is
         trivial.  */
 #define FF_exp_low  1
-#define FF_exp_mid  126  /* It is unclear to me why that is the "middle",
-                            but IEEE 754 specifies it like this. */
+#define FF_exp_mid  126  /* It is unclear to me why that is the "middle", */
+                         /* but IEEE 754 specifies it like this. */
 #define FF_exp_high 254  /* Exponent 255 is interpreted as NaN/Inf! */
 #ifdef TYPECODES
 /* Typeinfo-Byte for FF >=0 : */
@@ -188,15 +188,15 @@
                     Bit 63 = s, Bits 62..52 = e, Bits 51..0 = m.
                The number 0.0 is represented by s=0, e=0, m=0. */
 #define DF_exp_len   11  /* Number of exponent bits */
-#define DF_mant_len  52  /* Anzahl der Bits der Mantisse */
+#define DF_mant_len  52  /* Number of mantissa bits */
 /* On platforms with FAST_FLOAT we obey the IEEE 754 values. Choose the same
    values on other platforms as well, so that
      1. most-positive-double-float etc. will be platform independent,
      2. in the FFI, the conversion from a Lisp dfloat to a C 'double' is
         trivial.  */
 #define DF_exp_low  1
-#define DF_exp_mid  1022 /* It is unclear to me why that is the "middle",
-                            but IEEE 754 specifies it like this. */
+#define DF_exp_mid  1022 /* It is unclear to me why that is the "middle" */
+                         /* but IEEE 754 specifies it like this. */
 #define DF_exp_high 2046 /* Exponent 2047 is interpreted as NaN/Inf! */
 #ifdef TYPECODES
 /* Typeinfo-Byte for DF >=0 : */
diff --git src/lispbibl.d src/lispbibl.d
index ac046f029..533d8e60b 100644
--- src/lispbibl.d
+++ src/lispbibl.d
@@ -6020,9 +6020,9 @@ typedef iarray_ *  Iarray;
 #define arrayflags_adjustable_bit  7 /* set, if array is adjustable */
 #define arrayflags_fillp_bit       6 /* set, if a fill-pointer exists (only possible for n=1) */
 #define arrayflags_displaced_bit   5 /* set, if array is displaced */
-#define arrayflags_dispoffset_bit  4 /* set, if there is space for the
-                                        displaced-offset
-                                        (<==> array adjustable or displaced) */
+#define arrayflags_dispoffset_bit  4 /* set, if there is space for the */
+                                     /* displaced-offset */
+                                     /* (<==> array adjustable or displaced) */
 #define arrayflags_atype_mask  0x0F  /* mask for the element-type */
 /* Element-types of arrays in Bits 3..0 of its flags:
  The first ones are chosen, so that 2^Atype_nBit = n. */
-- 
2.12.0
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.