[education/rkward/releases/0.7.2] rkward/rbackend/rkwarddevice: Fix for MSVC

[Thomas Friedrichsmeier]

Git commit 37a91641c341a4e672dcabee28204a88ac47aa61 by Thomas Friedrichsmeier.
Committed on 27/06/2021 at 07:52.
Pushed by tfry into branch 'releases/0.7.2'.

Fix for MSVC

M  +14   -0    rkward/rbackend/rkwarddevice/rkgraphicsdevice_stubs.cpp

https://invent.kde.org/education/rkward/commit/37a91641c341a4e672dcabee28204a88ac47aa61

diff --git a/rkward/rbackend/rkwarddevice/rkgraphicsdevice_stubs.cpp b/rkward/rbackend/rkwarddevice/rkgraphicsdevice_stubs.cpp
index b7be1609..a5b9b8ed 100644
--- a/rkward/rbackend/rkwarddevice/rkgraphicsdevice_stubs.cpp
+++ b/rkward/rbackend/rkwarddevice/rkgraphicsdevice_stubs.cpp
@@ -583,37 +583,51 @@ void RKD_onExit (pDevDesc dev) {
 
 #if R_VERSION >= R_Version (2, 14, 0)
 int RKD_HoldFlush (pDevDesc dev, int level) {
+#ifdef __GNUC__
 #warning implement me
+#endif
 	return 0;
 }
 #endif
 
 #if R_VERSION >= R_Version (4, 1, 0)
 SEXP RKD_SetPattern (SEXP pattern, pDevDesc dd) {
+#ifdef __GNUC__
 #warning implement me
+#endif
 	return R_NilValue;
 }
 
 void RKD_ReleasePattern (SEXP ref, pDevDesc dd) {
+#ifdef __GNUC__
 #warning implement me
+#endif
 }
 
 SEXP RKD_SetClipPath (SEXP path, SEXP ref, pDevDesc dd) {
+#ifdef __GNUC__
 #warning implement me
+#endif
 	return R_NilValue;
 }
 
 void RKD_ReleaseClipPath (SEXP ref, pDevDesc dd) {
+#ifdef __GNUC__
 #warning implement me
+#endif
 }
 
 SEXP RKD_SetMask (SEXP path, SEXP ref, pDevDesc dd) {
+#ifdef __GNUC__
 #warning implement me
+#endif
 	return R_NilValue;
 }
 
 void RKD_ReleaseMask (SEXP ref, pDevDesc dd) {
+#ifdef __GNUC__
 #warning implement me
+#endif
 }
 
 #endif