add stringfeatures check typemap

shogun-toolbox · Jul 22, 2011 · 334cc39 · 334cc39
1 parent c3d0e6d
commit 334cc39
Showing 1 changed file with 16 additions and 0 deletions.
diff --git a/src/interfaces/lua_modular/swig_typemaps.i b/src/interfaces/lua_modular/swig_typemaps.i
@@ -197,6 +197,22 @@ TYPEMAP_SGMATRIX(float64_t)
 /* input/output typemap for CStringFeatures */
 %define TYPEMAP_STRINGFEATURES(SGTYPE, TYPECODE)
 
+%typemap(typecheck, precedence=SWIG_TYPECHECK_POINTER) shogun::SGStringList<SGTYPE> {
+	if(!lua_istable(L, $input)) {
+		luaL_typerror(L, $input, "table");		
+		$1 = 0;
+	}
+	else {
+		$1 = 1;
+		int numitems = 0;
+		numitems = lua_objlen(L, $input);
+		if(numitems == 0) {
+			luaL_argerror(L, $input, "empty table");
+			$1 = 0;
+		}
+	}
+}
+
 %typemap(in) shogun::SGStringList<SGTYPE> {
 	int32_t size = 0;
 	int32_t i;