[Toon-members] TooN Makefile.in TooN.h make_make_vector.awk in...

[Edward Rosten]

CVSROOT:        /cvsroot/toon
Module name:    TooN
Changes by:     Edward Rosten <edrosten>        09/01/13 15:06:53

Modified files:
        .              : Makefile.in TooN.h 
Added files:
        .              : make_make_vector.awk 
        internal       : make_vector.hh 
        test           : make_vector.cc 

Log message:
        Added makeVector function from 1--30 arguments.
        
        test/make_vector.cc  should just be compiled to asm.
        
        With g++ 4.3.1 and -O3, the asm cood looks as efficient as is should
        be.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/TooN/Makefile.in?cvsroot=toon&r1=1.3&r2=1.4
http://cvs.savannah.gnu.org/viewcvs/TooN/TooN.h?cvsroot=toon&r1=1.15&r2=1.16
http://cvs.savannah.gnu.org/viewcvs/TooN/make_make_vector.awk?cvsroot=toon&rev=1.1
http://cvs.savannah.gnu.org/viewcvs/TooN/internal/make_vector.hh?cvsroot=toon&rev=1.1
http://cvs.savannah.gnu.org/viewcvs/TooN/test/make_vector.cc?cvsroot=toon&rev=1.1

Patches:
Index: Makefile.in
===================================================================
RCS file: /cvsroot/toon/TooN/Makefile.in,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -b -r1.3 -r1.4
--- Makefile.in 5 Mar 2008 04:53:19 -0000       1.3
+++ Makefile.in 13 Jan 2009 15:06:52 -0000      1.4
@@ -14,6 +14,9 @@
        cp *.h *.hh $(hdr)
        cp -r optimization $(hdr)/
 
+internal/make_vector.hh:  make_make_vector.awk
+       awk -f make_make_vector.awk > $@
+
 clean:
        rm -rf html
 

Index: TooN.h
===================================================================
RCS file: /cvsroot/toon/TooN/TooN.h,v
retrieving revision 1.15
retrieving revision 1.16
diff -u -b -r1.15 -r1.16
--- TooN.h      13 Jan 2009 10:44:44 -0000      1.15
+++ TooN.h      13 Jan 2009 15:06:52 -0000      1.16
@@ -22,6 +22,7 @@
        #include <TooN/internal/debug.hh>
        #include <TooN/internal/vbase.hh>
        #include <TooN/internal/vector.hh>
+       #include <TooN/internal/make_vector.hh>
        #include <TooN/operators.h>
 }
 #endif

Index: make_make_vector.awk
===================================================================
RCS file: make_make_vector.awk
diff -N make_make_vector.awk
--- /dev/null   1 Jan 1970 00:00:00 -0000
+++ make_make_vector.awk        13 Jan 2009 15:06:52 -0000      1.1
@@ -0,0 +1,21 @@
+BEGIN{
+       N=30
+       print "//Mechanically generate code. Do not edit."
+       print "//modify make_make_vector.awk and run make 
internal/make_vector.hh"
+       for(i=1; i <= N; i++)
+       {
+               printf "inline Vector<" i "> makeVector(double x1"
+               
+               for(j=2; j<= i; j++)
+                       printf ", double x"j
+
+               print "){"
+               print  "  Vector<"i"> vals;"
+               for(j=1; j<= i; j++)
+                       print "  vals["j"] = x"j";"
+
+               print "  return vals;"
+               print "}"
+       }
+
+}

Index: internal/make_vector.hh
===================================================================
RCS file: internal/make_vector.hh
diff -N internal/make_vector.hh
--- /dev/null   1 Jan 1970 00:00:00 -0000
+++ internal/make_vector.hh     13 Jan 2009 15:06:52 -0000      1.1
@@ -0,0 +1,587 @@
+//Mechanically generate code. Do not edit.
+//modify make_make_vector.awk and run make internal/make_vector.hh
+inline Vector<1> makeVector(double x1){
+  Vector<1> vals;
+  vals[1] = x1;
+  return vals;
+}
+inline Vector<2> makeVector(double x1, double x2){
+  Vector<2> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  return vals;
+}
+inline Vector<3> makeVector(double x1, double x2, double x3){
+  Vector<3> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  return vals;
+}
+inline Vector<4> makeVector(double x1, double x2, double x3, double x4){
+  Vector<4> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  return vals;
+}
+inline Vector<5> makeVector(double x1, double x2, double x3, double x4, double 
x5){
+  Vector<5> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  return vals;
+}
+inline Vector<6> makeVector(double x1, double x2, double x3, double x4, double 
x5, double x6){
+  Vector<6> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  vals[6] = x6;
+  return vals;
+}
+inline Vector<7> makeVector(double x1, double x2, double x3, double x4, double 
x5, double x6, double x7){
+  Vector<7> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  vals[6] = x6;
+  vals[7] = x7;
+  return vals;
+}
+inline Vector<8> makeVector(double x1, double x2, double x3, double x4, double 
x5, double x6, double x7, double x8){
+  Vector<8> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  vals[6] = x6;
+  vals[7] = x7;
+  vals[8] = x8;
+  return vals;
+}
+inline Vector<9> makeVector(double x1, double x2, double x3, double x4, double 
x5, double x6, double x7, double x8, double x9){
+  Vector<9> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  vals[6] = x6;
+  vals[7] = x7;
+  vals[8] = x8;
+  vals[9] = x9;
+  return vals;
+}
+inline Vector<10> makeVector(double x1, double x2, double x3, double x4, 
double x5, double x6, double x7, double x8, double x9, double x10){
+  Vector<10> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  vals[6] = x6;
+  vals[7] = x7;
+  vals[8] = x8;
+  vals[9] = x9;
+  vals[10] = x10;
+  return vals;
+}
+inline Vector<11> makeVector(double x1, double x2, double x3, double x4, 
double x5, double x6, double x7, double x8, double x9, double x10, double x11){
+  Vector<11> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  vals[6] = x6;
+  vals[7] = x7;
+  vals[8] = x8;
+  vals[9] = x9;
+  vals[10] = x10;
+  vals[11] = x11;
+  return vals;
+}
+inline Vector<12> makeVector(double x1, double x2, double x3, double x4, 
double x5, double x6, double x7, double x8, double x9, double x10, double x11, 
double x12){
+  Vector<12> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  vals[6] = x6;
+  vals[7] = x7;
+  vals[8] = x8;
+  vals[9] = x9;
+  vals[10] = x10;
+  vals[11] = x11;
+  vals[12] = x12;
+  return vals;
+}
+inline Vector<13> makeVector(double x1, double x2, double x3, double x4, 
double x5, double x6, double x7, double x8, double x9, double x10, double x11, 
double x12, double x13){
+  Vector<13> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  vals[6] = x6;
+  vals[7] = x7;
+  vals[8] = x8;
+  vals[9] = x9;
+  vals[10] = x10;
+  vals[11] = x11;
+  vals[12] = x12;
+  vals[13] = x13;
+  return vals;
+}
+inline Vector<14> makeVector(double x1, double x2, double x3, double x4, 
double x5, double x6, double x7, double x8, double x9, double x10, double x11, 
double x12, double x13, double x14){
+  Vector<14> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  vals[6] = x6;
+  vals[7] = x7;
+  vals[8] = x8;
+  vals[9] = x9;
+  vals[10] = x10;
+  vals[11] = x11;
+  vals[12] = x12;
+  vals[13] = x13;
+  vals[14] = x14;
+  return vals;
+}
+inline Vector<15> makeVector(double x1, double x2, double x3, double x4, 
double x5, double x6, double x7, double x8, double x9, double x10, double x11, 
double x12, double x13, double x14, double x15){
+  Vector<15> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  vals[6] = x6;
+  vals[7] = x7;
+  vals[8] = x8;
+  vals[9] = x9;
+  vals[10] = x10;
+  vals[11] = x11;
+  vals[12] = x12;
+  vals[13] = x13;
+  vals[14] = x14;
+  vals[15] = x15;
+  return vals;
+}
+inline Vector<16> makeVector(double x1, double x2, double x3, double x4, 
double x5, double x6, double x7, double x8, double x9, double x10, double x11, 
double x12, double x13, double x14, double x15, double x16){
+  Vector<16> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  vals[6] = x6;
+  vals[7] = x7;
+  vals[8] = x8;
+  vals[9] = x9;
+  vals[10] = x10;
+  vals[11] = x11;
+  vals[12] = x12;
+  vals[13] = x13;
+  vals[14] = x14;
+  vals[15] = x15;
+  vals[16] = x16;
+  return vals;
+}
+inline Vector<17> makeVector(double x1, double x2, double x3, double x4, 
double x5, double x6, double x7, double x8, double x9, double x10, double x11, 
double x12, double x13, double x14, double x15, double x16, double x17){
+  Vector<17> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  vals[6] = x6;
+  vals[7] = x7;
+  vals[8] = x8;
+  vals[9] = x9;
+  vals[10] = x10;
+  vals[11] = x11;
+  vals[12] = x12;
+  vals[13] = x13;
+  vals[14] = x14;
+  vals[15] = x15;
+  vals[16] = x16;
+  vals[17] = x17;
+  return vals;
+}
+inline Vector<18> makeVector(double x1, double x2, double x3, double x4, 
double x5, double x6, double x7, double x8, double x9, double x10, double x11, 
double x12, double x13, double x14, double x15, double x16, double x17, double 
x18){
+  Vector<18> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  vals[6] = x6;
+  vals[7] = x7;
+  vals[8] = x8;
+  vals[9] = x9;
+  vals[10] = x10;
+  vals[11] = x11;
+  vals[12] = x12;
+  vals[13] = x13;
+  vals[14] = x14;
+  vals[15] = x15;
+  vals[16] = x16;
+  vals[17] = x17;
+  vals[18] = x18;
+  return vals;
+}
+inline Vector<19> makeVector(double x1, double x2, double x3, double x4, 
double x5, double x6, double x7, double x8, double x9, double x10, double x11, 
double x12, double x13, double x14, double x15, double x16, double x17, double 
x18, double x19){
+  Vector<19> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  vals[6] = x6;
+  vals[7] = x7;
+  vals[8] = x8;
+  vals[9] = x9;
+  vals[10] = x10;
+  vals[11] = x11;
+  vals[12] = x12;
+  vals[13] = x13;
+  vals[14] = x14;
+  vals[15] = x15;
+  vals[16] = x16;
+  vals[17] = x17;
+  vals[18] = x18;
+  vals[19] = x19;
+  return vals;
+}
+inline Vector<20> makeVector(double x1, double x2, double x3, double x4, 
double x5, double x6, double x7, double x8, double x9, double x10, double x11, 
double x12, double x13, double x14, double x15, double x16, double x17, double 
x18, double x19, double x20){
+  Vector<20> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  vals[6] = x6;
+  vals[7] = x7;
+  vals[8] = x8;
+  vals[9] = x9;
+  vals[10] = x10;
+  vals[11] = x11;
+  vals[12] = x12;
+  vals[13] = x13;
+  vals[14] = x14;
+  vals[15] = x15;
+  vals[16] = x16;
+  vals[17] = x17;
+  vals[18] = x18;
+  vals[19] = x19;
+  vals[20] = x20;
+  return vals;
+}
+inline Vector<21> makeVector(double x1, double x2, double x3, double x4, 
double x5, double x6, double x7, double x8, double x9, double x10, double x11, 
double x12, double x13, double x14, double x15, double x16, double x17, double 
x18, double x19, double x20, double x21){
+  Vector<21> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  vals[6] = x6;
+  vals[7] = x7;
+  vals[8] = x8;
+  vals[9] = x9;
+  vals[10] = x10;
+  vals[11] = x11;
+  vals[12] = x12;
+  vals[13] = x13;
+  vals[14] = x14;
+  vals[15] = x15;
+  vals[16] = x16;
+  vals[17] = x17;
+  vals[18] = x18;
+  vals[19] = x19;
+  vals[20] = x20;
+  vals[21] = x21;
+  return vals;
+}
+inline Vector<22> makeVector(double x1, double x2, double x3, double x4, 
double x5, double x6, double x7, double x8, double x9, double x10, double x11, 
double x12, double x13, double x14, double x15, double x16, double x17, double 
x18, double x19, double x20, double x21, double x22){
+  Vector<22> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  vals[6] = x6;
+  vals[7] = x7;
+  vals[8] = x8;
+  vals[9] = x9;
+  vals[10] = x10;
+  vals[11] = x11;
+  vals[12] = x12;
+  vals[13] = x13;
+  vals[14] = x14;
+  vals[15] = x15;
+  vals[16] = x16;
+  vals[17] = x17;
+  vals[18] = x18;
+  vals[19] = x19;
+  vals[20] = x20;
+  vals[21] = x21;
+  vals[22] = x22;
+  return vals;
+}
+inline Vector<23> makeVector(double x1, double x2, double x3, double x4, 
double x5, double x6, double x7, double x8, double x9, double x10, double x11, 
double x12, double x13, double x14, double x15, double x16, double x17, double 
x18, double x19, double x20, double x21, double x22, double x23){
+  Vector<23> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  vals[6] = x6;
+  vals[7] = x7;
+  vals[8] = x8;
+  vals[9] = x9;
+  vals[10] = x10;
+  vals[11] = x11;
+  vals[12] = x12;
+  vals[13] = x13;
+  vals[14] = x14;
+  vals[15] = x15;
+  vals[16] = x16;
+  vals[17] = x17;
+  vals[18] = x18;
+  vals[19] = x19;
+  vals[20] = x20;
+  vals[21] = x21;
+  vals[22] = x22;
+  vals[23] = x23;
+  return vals;
+}
+inline Vector<24> makeVector(double x1, double x2, double x3, double x4, 
double x5, double x6, double x7, double x8, double x9, double x10, double x11, 
double x12, double x13, double x14, double x15, double x16, double x17, double 
x18, double x19, double x20, double x21, double x22, double x23, double x24){
+  Vector<24> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  vals[6] = x6;
+  vals[7] = x7;
+  vals[8] = x8;
+  vals[9] = x9;
+  vals[10] = x10;
+  vals[11] = x11;
+  vals[12] = x12;
+  vals[13] = x13;
+  vals[14] = x14;
+  vals[15] = x15;
+  vals[16] = x16;
+  vals[17] = x17;
+  vals[18] = x18;
+  vals[19] = x19;
+  vals[20] = x20;
+  vals[21] = x21;
+  vals[22] = x22;
+  vals[23] = x23;
+  vals[24] = x24;
+  return vals;
+}
+inline Vector<25> makeVector(double x1, double x2, double x3, double x4, 
double x5, double x6, double x7, double x8, double x9, double x10, double x11, 
double x12, double x13, double x14, double x15, double x16, double x17, double 
x18, double x19, double x20, double x21, double x22, double x23, double x24, 
double x25){
+  Vector<25> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  vals[6] = x6;
+  vals[7] = x7;
+  vals[8] = x8;
+  vals[9] = x9;
+  vals[10] = x10;
+  vals[11] = x11;
+  vals[12] = x12;
+  vals[13] = x13;
+  vals[14] = x14;
+  vals[15] = x15;
+  vals[16] = x16;
+  vals[17] = x17;
+  vals[18] = x18;
+  vals[19] = x19;
+  vals[20] = x20;
+  vals[21] = x21;
+  vals[22] = x22;
+  vals[23] = x23;
+  vals[24] = x24;
+  vals[25] = x25;
+  return vals;
+}
+inline Vector<26> makeVector(double x1, double x2, double x3, double x4, 
double x5, double x6, double x7, double x8, double x9, double x10, double x11, 
double x12, double x13, double x14, double x15, double x16, double x17, double 
x18, double x19, double x20, double x21, double x22, double x23, double x24, 
double x25, double x26){
+  Vector<26> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  vals[6] = x6;
+  vals[7] = x7;
+  vals[8] = x8;
+  vals[9] = x9;
+  vals[10] = x10;
+  vals[11] = x11;
+  vals[12] = x12;
+  vals[13] = x13;
+  vals[14] = x14;
+  vals[15] = x15;
+  vals[16] = x16;
+  vals[17] = x17;
+  vals[18] = x18;
+  vals[19] = x19;
+  vals[20] = x20;
+  vals[21] = x21;
+  vals[22] = x22;
+  vals[23] = x23;
+  vals[24] = x24;
+  vals[25] = x25;
+  vals[26] = x26;
+  return vals;
+}
+inline Vector<27> makeVector(double x1, double x2, double x3, double x4, 
double x5, double x6, double x7, double x8, double x9, double x10, double x11, 
double x12, double x13, double x14, double x15, double x16, double x17, double 
x18, double x19, double x20, double x21, double x22, double x23, double x24, 
double x25, double x26, double x27){
+  Vector<27> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  vals[6] = x6;
+  vals[7] = x7;
+  vals[8] = x8;
+  vals[9] = x9;
+  vals[10] = x10;
+  vals[11] = x11;
+  vals[12] = x12;
+  vals[13] = x13;
+  vals[14] = x14;
+  vals[15] = x15;
+  vals[16] = x16;
+  vals[17] = x17;
+  vals[18] = x18;
+  vals[19] = x19;
+  vals[20] = x20;
+  vals[21] = x21;
+  vals[22] = x22;
+  vals[23] = x23;
+  vals[24] = x24;
+  vals[25] = x25;
+  vals[26] = x26;
+  vals[27] = x27;
+  return vals;
+}
+inline Vector<28> makeVector(double x1, double x2, double x3, double x4, 
double x5, double x6, double x7, double x8, double x9, double x10, double x11, 
double x12, double x13, double x14, double x15, double x16, double x17, double 
x18, double x19, double x20, double x21, double x22, double x23, double x24, 
double x25, double x26, double x27, double x28){
+  Vector<28> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  vals[6] = x6;
+  vals[7] = x7;
+  vals[8] = x8;
+  vals[9] = x9;
+  vals[10] = x10;
+  vals[11] = x11;
+  vals[12] = x12;
+  vals[13] = x13;
+  vals[14] = x14;
+  vals[15] = x15;
+  vals[16] = x16;
+  vals[17] = x17;
+  vals[18] = x18;
+  vals[19] = x19;
+  vals[20] = x20;
+  vals[21] = x21;
+  vals[22] = x22;
+  vals[23] = x23;
+  vals[24] = x24;
+  vals[25] = x25;
+  vals[26] = x26;
+  vals[27] = x27;
+  vals[28] = x28;
+  return vals;
+}
+inline Vector<29> makeVector(double x1, double x2, double x3, double x4, 
double x5, double x6, double x7, double x8, double x9, double x10, double x11, 
double x12, double x13, double x14, double x15, double x16, double x17, double 
x18, double x19, double x20, double x21, double x22, double x23, double x24, 
double x25, double x26, double x27, double x28, double x29){
+  Vector<29> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  vals[6] = x6;
+  vals[7] = x7;
+  vals[8] = x8;
+  vals[9] = x9;
+  vals[10] = x10;
+  vals[11] = x11;
+  vals[12] = x12;
+  vals[13] = x13;
+  vals[14] = x14;
+  vals[15] = x15;
+  vals[16] = x16;
+  vals[17] = x17;
+  vals[18] = x18;
+  vals[19] = x19;
+  vals[20] = x20;
+  vals[21] = x21;
+  vals[22] = x22;
+  vals[23] = x23;
+  vals[24] = x24;
+  vals[25] = x25;
+  vals[26] = x26;
+  vals[27] = x27;
+  vals[28] = x28;
+  vals[29] = x29;
+  return vals;
+}
+inline Vector<30> makeVector(double x1, double x2, double x3, double x4, 
double x5, double x6, double x7, double x8, double x9, double x10, double x11, 
double x12, double x13, double x14, double x15, double x16, double x17, double 
x18, double x19, double x20, double x21, double x22, double x23, double x24, 
double x25, double x26, double x27, double x28, double x29, double x30){
+  Vector<30> vals;
+  vals[1] = x1;
+  vals[2] = x2;
+  vals[3] = x3;
+  vals[4] = x4;
+  vals[5] = x5;
+  vals[6] = x6;
+  vals[7] = x7;
+  vals[8] = x8;
+  vals[9] = x9;
+  vals[10] = x10;
+  vals[11] = x11;
+  vals[12] = x12;
+  vals[13] = x13;
+  vals[14] = x14;
+  vals[15] = x15;
+  vals[16] = x16;
+  vals[17] = x17;
+  vals[18] = x18;
+  vals[19] = x19;
+  vals[20] = x20;
+  vals[21] = x21;
+  vals[22] = x22;
+  vals[23] = x23;
+  vals[24] = x24;
+  vals[25] = x25;
+  vals[26] = x26;
+  vals[27] = x27;
+  vals[28] = x28;
+  vals[29] = x29;
+  vals[30] = x30;
+  return vals;
+}

Index: test/make_vector.cc
===================================================================
RCS file: test/make_vector.cc
diff -N test/make_vector.cc
--- /dev/null   1 Jan 1970 00:00:00 -0000
+++ test/make_vector.cc 13 Jan 2009 15:06:53 -0000      1.1
@@ -0,0 +1,12 @@
+#include <TooN/TooN.h>
+using namespace TooN;
+
+Vector<5> return_a_vector()
+{
+       return makeVector(1, 2, 3, 4, 5);
+}
+
+double return_a_double()
+{
+       return makeVector(4, 5, 6, 7)[3] -6;
+}