diff --git a/Lib/r/rkw.swg b/Lib/r/rkw.swg
index 24bb5d83c..2c181faa0 100644
--- a/Lib/r/rkw.swg
+++ b/Lib/r/rkw.swg
@@ -4,14 +4,29 @@
 
 #define RKW(x) %keywordwarn("'" `x` "' is a R keyword, renaming to '_" `x`"'", rename="_%s")  `x`
 
-
 /*
-  Warnings for R keywords 
-  REFERENCE ????
+  Warnings for R reserved words taken from
+  http://cran.r-project.org/doc/manuals/R-lang.html#Reserved-words
 */
 
-RKW(except);
+RKW(if);
+RKW(else);
+RKW(repeat);
+RKW(while);
+RKW(function);
+RKW(for);
 RKW(in);
 RKW(next);
+RKW(break);
+RKW(TRUE);
+RKW(FALSE);
+RKW(NULL);
+RKW(Inf);
+RKW(NaN);
+RKW(NA);
+RKW(NA_integer_);
+RKW(NA_real_);
+RKW(NA_complex_);
+RKW(NA_character_);
 
 #undef RKW