closes tcl-[f6fc75cbdd0fa593]: silence unknown pragma warning for no-trapv (__GNUC__ is also defined by clang)

sebres · sebres · commit 12a0e1ad7c9c · 2024-09-18T17:51:31.000+02:00
diff --git a/generic/tclClockFmt.c b/generic/tclClockFmt.c
@@ -95,7 +95,7 @@ _str2wideInt_no(
 }
 
 /* int & Tcl_WideInt overflows may happens here (expected case) */
-#if defined(__GNUC__) || defined(__GNUG__)
+#if (defined(__GNUC__) || defined(__GNUG__)) && !defined(__clang__)
 # pragma GCC optimize("no-trapv")
 #endif
 
@@ -187,7 +187,7 @@ TclAtoWIe(
     return _str2wideInt(out, p, e, sign);
 }
 
-#if defined(__GNUC__) || defined(__GNUG__)
+#if (defined(__GNUC__) || defined(__GNUG__)) && !defined(__clang__)
 # pragma GCC reset_options
 #endif
 

Original file line number	Diff line number	Diff line change
`@@ -95,7 +95,7 @@ _str2wideInt_no(`
`95`	`95`	`}`
`96`	`96`
`97`	`97`	`/* int & Tcl_WideInt overflows may happens here (expected case) */`
`98`		`-#if defined(__GNUC__) \|\| defined(__GNUG__)`
	`98`	`+#if (defined(__GNUC__) \|\| defined(__GNUG__)) && !defined(__clang__)`
`99`	`99`	`# pragma GCC optimize("no-trapv")`
`100`	`100`	`#endif`
`101`	`101`
`@@ -187,7 +187,7 @@ TclAtoWIe(`
`187`	`187`	`return _str2wideInt(out, p, e, sign);`
`188`	`188`	`}`
`189`	`189`
`190`		`-#if defined(__GNUC__) \|\| defined(__GNUG__)`
	`190`	`+#if (defined(__GNUC__) \|\| defined(__GNUG__)) && !defined(__clang__)`
`191`	`191`	`# pragma GCC reset_options`
`192`	`192`	`#endif`
`193`	`193`