| author | francesco-ST <francesco.abbate@st.com> | 2011年02月11日 18:38:36 +0100 |
|---|---|---|
| committer | francesco-ST <francesco.abbate@st.com> | 2011年02月11日 18:38:36 +0100 |
| commit | 4cf03e0628ea5ede4879b7b75e968bc7f576db4e (patch) | |
| tree | 96e0ad2cf3c273d05ef92fda160fefb5177bd6ac /matrix_source.c | |
| parent | 1bcb3786d4563ff571211e5c153cdca919c0b19c (diff) | |
| download | gsl-shell-4cf03e0628ea5ede4879b7b75e968bc7f576db4e.tar.gz | |
| -rw-r--r-- | matrix_source.c | 6 |
diff --git a/matrix_source.c b/matrix_source.c index 3f186c05..c8b6b581 100644 --- a/matrix_source.c +++ b/matrix_source.c @@ -138,7 +138,7 @@ FUNCTION(matrix, slice) (lua_State *L) } int -FUNCTION(matrix, get) (lua_State *L) +FUNCTION(matrix, get_elem) (lua_State *L) { const TYPE (gsl_matrix) *m = FUNCTION (matrix, check) (L, 1); lua_Integer r = luaL_checkinteger (L, 2); @@ -163,7 +163,7 @@ FUNCTION(matrix, get) (lua_State *L) } int -FUNCTION(matrix, set) (lua_State *L) +FUNCTION(matrix, set_elem) (lua_State *L) { TYPE (gsl_matrix) *m = FUNCTION (matrix, check) (L, 1); lua_Integer r = luaL_checkinteger (L, 2); @@ -302,7 +302,7 @@ FUNCTION(matrix, solve_raw) (lua_State *L, if (b->size2 != 1) gs_type_error (L, 1, "vector"); if (b->size1 != n) - luaL_error (L, "dimensions of vector does not match with matrix"); + luaL_error (L, "dimensions of vector does not match"); x = FUNCTION (matrix, push_raw) (L, n, 1); x_view = FUNCTION (gsl_matrix, column) (x, 0); |