From 1d85e466972955db2c83532784c23d64a2637000 Mon Sep 17 00:00:00 2001
From: William S Fulton <wsf@fultondesigns.co.uk>
Date: Thu, 19 Jun 2008 21:15:48 +0000
Subject: [PATCH] add complete list of R reserved words

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@10531 626c5289-ae23-0410-ae9c-e8d60b6d4f22
---
 Lib/r/rkw.swg | 23 +++++++++++++++++++----
 1 file changed, 19 insertions(+), 4 deletions(-)

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