Mercurial > hg > octave-lyh

diff liboctave/mx-inlines.cc @ 8380:dbe67764e628

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix & improve speed of diagonal matrix multiplication
author Jaroslav Hajek <highegg@gmail.com>
date Sun, 07 Dec 2008 10:29:34 +0100
parents 82be108cc558
children a1ae2aae903e
line wrap: on
line diff
--- a/liboctave/mx-inlines.cc
+++ b/liboctave/mx-inlines.cc
@@ -30,6 +30,14 @@
 
 #include "oct-cmplx.h"
 
+template <class R, class S>
+inline void
+mx_inline_fill_vs (R *r, size_t n, S s)
+{
+  for (size_t i = 0; i < n; i++)
+    r[i] = s;
+}
+
 #define VS_OP_FCN(F, OP) \
   template <class R, class V, class S> \
   inline void \