[Rcpp-commits] r2779 - pkg/Rcpp/inst/unitTests

[noreply at r-forge.r-project.org]

Author: romain
Date: 2010-12-12 12:43:50 +0100 (Sun, 12 Dec 2010)
New Revision: 2779

Modified:
   pkg/Rcpp/inst/unitTests/runit.macros.R
Log:
minor fix

Modified: pkg/Rcpp/inst/unitTests/runit.macros.R
===================================================================
--- pkg/Rcpp/inst/unitTests/runit.macros.R	2010-12-12 11:38:23 UTC (rev 2778)
+++ pkg/Rcpp/inst/unitTests/runit.macros.R	2010-12-12 11:43:50 UTC (rev 2779)
@@ -47,7 +47,7 @@
 	}
 	sexp_types <- c( integer = 13L, double = 14L, raw = 24L,
 		complex = 15L, logical = 10L, list = 19L,
-		"expression" = 20L, character = 16 )
+		"expression" = 20L, character = 16L )
 	checkEquals( rcpp_typeof(1L ), sexp_types[[ "integer" ]], msg = "RCPP_RETURN_VECTOR <INTSXP> " )
 	checkEquals( rcpp_typeof(1.0), sexp_types[["double"]], msg = "RCPP_RETURN_VECTOR <REALSXP> " )
 	checkEquals( rcpp_typeof(as.raw(0)), sexp_types[["raw"]] , msg = "RCPP_RETURN_VECTOR <RAWSXP> " )