diff --git a/Lib/r/r.swg b/Lib/r/r.swg
index 126611d61..a6014965e 100644
--- a/Lib/r/r.swg
+++ b/Lib/r/r.swg
@@ -264,8 +264,8 @@ x
 setAs('ExternalReference', 'character',
 function(from) {if (!is.null(from$"__str__")) from$"__str__"()})
 
-setMethod('print', 'ExternalReference',
-function(x) {print(as(x, "character"))})
+suppressWarnings(setMethod('print', 'ExternalReference',
+function(x) {print(as(x, "character"))}))
 %}