# HG changeset patch # User jwe # Date 1082663984 0 # Node ID 0ab4fd8ded304dd927dc9ea8f2c35f777c3fb6ec # Parent 05d464a13f43fe29f162bd7126976f35579af14e [project @ 2004-04-22 19:59:44 by jwe] diff --git a/ChangeLog b/ChangeLog --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,8 @@ 2004-04-22 John W. Eaton + * configure.in: Add -Wl,-Bsymbolic to SH_LDFLAGS for GNU/Linux + systems. From Fredrik Lingvall . + * mkoctfile.in: Allow -Wx,option style options to be passed to the compiler. From Al Niessner . diff --git a/configure.in b/configure.in --- a/configure.in +++ b/configure.in @@ -29,7 +29,7 @@ EXTERN_CXXFLAGS="$CXXFLAGS" AC_INIT -AC_REVISION($Revision: 1.452 $) +AC_REVISION($Revision: 1.453 $) AC_PREREQ(2.57) AC_CONFIG_SRCDIR([src/octave.cc]) AC_CONFIG_HEADER(config.h) @@ -698,6 +698,7 @@ library_path_var=PATH ;; *-*-linux* | *-*-gnu*) + SH_LDFLAGS="-shared -Wl,-Bsymbolic" SONAME_FLAGS='-Wl,-soname -Wl,$@' RLD_FLAG='-Wl,-rpath -Wl,$(octlibdir)' ;; diff --git a/scripts/ChangeLog b/scripts/ChangeLog --- a/scripts/ChangeLog +++ b/scripts/ChangeLog @@ -1,3 +1,8 @@ +2004-04-22 John W. Eaton + + * quaternion/qtransvmat.m: Use continuation characters to make + sure result is a matrix instead of a vector. From . + 2004-04-21 David Bateman * scripts/elfun/lcm.m: Make N-d aware. diff --git a/scripts/quaternion/qtransvmat.m b/scripts/quaternion/qtransvmat.m --- a/scripts/quaternion/qtransvmat.m +++ b/scripts/quaternion/qtransvmat.m @@ -36,14 +36,15 @@ error ("qtransvmat: input values must be real"); endif - Aib = [(2.*(qib(1)^2 + qib(4)^2) -1.), - (2.*(qib(1)*qib(2)-qib(3)*qib(4))), + + Aib = [(2.*(qib(1)^2 + qib(4)^2) -1.), ... + (2.*(qib(1)*qib(2)-qib(3)*qib(4))), ... (2.*(qib(1)*qib(3)+qib(2)*qib(4))); - (2.*(qib(1)*qib(2)+qib(3)*qib(4))), - (2.*(qib(2)*qib(2)+qib(4)*qib(4))-1.), + (2.*(qib(1)*qib(2)+qib(3)*qib(4))), ... + (2.*(qib(2)*qib(2)+qib(4)*qib(4))-1.), ... (2.*(qib(2)*qib(3)-qib(1)*qib(4))); - (2.*(qib(1)*qib(3)-qib(2)*qib(4))), - (2.*(qib(2)*qib(3)+qib(1)*qib(4))), + (2.*(qib(1)*qib(3)-qib(2)*qib(4))), ... + (2.*(qib(2)*qib(3)+qib(1)*qib(4))), ... (2.*(qib(3)*qib(3)+qib(4)*qib(4))-1.)]; endfunction