annotate src/OPERATORS/op-int-conv.cc @ 7789:82be108cc558

First attempt at single precision tyeps * * * corrections to qrupdate single precision routines * * * prefer demotion to single over promotion to double * * * Add single precision support to log2 function * * * Trivial PROJECT file update * * * Cache optimized hermitian/transpose methods * * * Add tests for tranpose/hermitian and ChangeLog entry for new transpose code
author David Bateman <dbateman@free.fr>
date Sun, 27 Apr 2008 22:34:17 +0200
parents a1dbe9d80eee
children cd90e2842080
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
4901
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
1 /*
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
2
7017
a1dbe9d80eee [project @ 2007-10-12 21:27:11 by jwe]
jwe
parents: 7016
diff changeset
3 Copyright (C) 2004, 2005, 2007 John W. Eaton
4901
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
4
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
5 This file is part of Octave.
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
6
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
7 Octave is free software; you can redistribute it and/or modify it
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
8 under the terms of the GNU General Public License as published by the
7016
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe]
jwe
parents: 6600
diff changeset
9 Free Software Foundation; either version 3 of the License, or (at your
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe]
jwe
parents: 6600
diff changeset
10 option) any later version.
4901
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
11
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
12 Octave is distributed in the hope that it will be useful, but WITHOUT
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
15 for more details.
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
16
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
17 You should have received a copy of the GNU General Public License
7016
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe]
jwe
parents: 6600
diff changeset
18 along with Octave; see the file COPYING. If not, see
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe]
jwe
parents: 6600
diff changeset
19 <http://www.gnu.org/licenses/>.
4901
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
20
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
21 */
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
22
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
23 #ifdef HAVE_CONFIG_H
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
24 #include <config.h>
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
25 #endif
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
26
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
27 #include "gripes.h"
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
28 #include "oct-obj.h"
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
29 #include "ov.h"
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
30 #include "ov-int8.h"
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
31 #include "ov-int16.h"
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
32 #include "ov-int32.h"
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
33 #include "ov-int64.h"
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
34 #include "ov-uint8.h"
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
35 #include "ov-uint16.h"
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
36 #include "ov-uint32.h"
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
37 #include "ov-uint64.h"
4907
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
38 #include "ov-range.h"
5002
d894b803ccb5 [project @ 2004-09-16 01:11:39 by jwe]
jwe
parents: 4952
diff changeset
39 #include "ov-bool.h"
d894b803ccb5 [project @ 2004-09-16 01:11:39 by jwe]
jwe
parents: 4952
diff changeset
40 #include "ov-bool-mat.h"
4901
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
41 #include "ov-scalar.h"
7789
82be108cc558 First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents: 7017
diff changeset
42 #include "ov-float.h"
4901
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
43 #include "ov-re-mat.h"
7789
82be108cc558 First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents: 7017
diff changeset
44 #include "ov-flt-re-mat.h"
5032
3361e0846469 [project @ 2004-09-24 03:56:41 by jwe]
jwe
parents: 5002
diff changeset
45 #include "ov-str-mat.h"
4901
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
46 #include "ov-typeinfo.h"
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
47 #include "ops.h"
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
48
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
49 // conversion ops
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
50
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
51 DEFCONVFN (scalar_to_int8, scalar, int8)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
52 DEFCONVFN (scalar_to_int16, scalar, int16)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
53 DEFCONVFN (scalar_to_int32, scalar, int32)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
54 DEFCONVFN (scalar_to_int64, scalar, int64)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
55
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
56 DEFCONVFN (scalar_to_uint8, scalar, uint8)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
57 DEFCONVFN (scalar_to_uint16, scalar, uint16)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
58 DEFCONVFN (scalar_to_uint32, scalar, uint32)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
59 DEFCONVFN (scalar_to_uint64, scalar, uint64)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
60
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
61 DEFCONVFN (matrix_to_int8, matrix, int8)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
62 DEFCONVFN (matrix_to_int16, matrix, int16)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
63 DEFCONVFN (matrix_to_int32, matrix, int32)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
64 DEFCONVFN (matrix_to_int64, matrix, int64)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
65
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
66 DEFCONVFN (matrix_to_uint8, matrix, uint8)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
67 DEFCONVFN (matrix_to_uint16, matrix, uint16)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
68 DEFCONVFN (matrix_to_uint32, matrix, uint32)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
69 DEFCONVFN (matrix_to_uint64, matrix, uint64)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
70
7789
82be108cc558 First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents: 7017
diff changeset
71 DEFCONVFN (float_scalar_to_int8, float_scalar, int8)
82be108cc558 First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents: 7017
diff changeset
72 DEFCONVFN (float_scalar_to_int16, float_scalar, int16)
82be108cc558 First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents: 7017
diff changeset
73 DEFCONVFN (float_scalar_to_int32, float_scalar, int32)
82be108cc558 First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents: 7017
diff changeset
74 DEFCONVFN (float_scalar_to_int64, float_scalar, int64)
82be108cc558 First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents: 7017
diff changeset
75
82be108cc558 First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents: 7017
diff changeset
76 DEFCONVFN (float_scalar_to_uint8, float_scalar, uint8)
82be108cc558 First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents: 7017
diff changeset
77 DEFCONVFN (float_scalar_to_uint16, float_scalar, uint16)
82be108cc558 First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents: 7017
diff changeset
78 DEFCONVFN (float_scalar_to_uint32, float_scalar, uint32)
82be108cc558 First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents: 7017
diff changeset
79 DEFCONVFN (float_scalar_to_uint64, float_scalar, uint64)
82be108cc558 First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents: 7017
diff changeset
80
82be108cc558 First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents: 7017
diff changeset
81 DEFCONVFN (float_matrix_to_int8, float_matrix, int8)
82be108cc558 First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents: 7017
diff changeset
82 DEFCONVFN (float_matrix_to_int16, float_matrix, int16)
82be108cc558 First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents: 7017
diff changeset
83 DEFCONVFN (float_matrix_to_int32, float_matrix, int32)
82be108cc558 First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents: 7017
diff changeset
84 DEFCONVFN (float_matrix_to_int64, float_matrix, int64)
82be108cc558 First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents: 7017
diff changeset
85
82be108cc558 First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents: 7017
diff changeset
86 DEFCONVFN (float_matrix_to_uint8, float_matrix, uint8)
82be108cc558 First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents: 7017
diff changeset
87 DEFCONVFN (float_matrix_to_uint16, float_matrix, uint16)
82be108cc558 First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents: 7017
diff changeset
88 DEFCONVFN (float_matrix_to_uint32, float_matrix, uint32)
82be108cc558 First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents: 7017
diff changeset
89 DEFCONVFN (float_matrix_to_uint64, float_matrix, uint64)
82be108cc558 First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents: 7017
diff changeset
90
5002
d894b803ccb5 [project @ 2004-09-16 01:11:39 by jwe]
jwe
parents: 4952
diff changeset
91 DEFCONVFN (bool_to_int8, bool, int8)
d894b803ccb5 [project @ 2004-09-16 01:11:39 by jwe]
jwe
parents: 4952
diff changeset
92 DEFCONVFN (bool_to_int16, bool, int16)
d894b803ccb5 [project @ 2004-09-16 01:11:39 by jwe]
jwe
parents: 4952
diff changeset
93 DEFCONVFN (bool_to_int32, bool, int32)
d894b803ccb5 [project @ 2004-09-16 01:11:39 by jwe]
jwe
parents: 4952
diff changeset
94 DEFCONVFN (bool_to_int64, bool, int64)
d894b803ccb5 [project @ 2004-09-16 01:11:39 by jwe]
jwe
parents: 4952
diff changeset
95
d894b803ccb5 [project @ 2004-09-16 01:11:39 by jwe]
jwe
parents: 4952
diff changeset
96 DEFCONVFN (bool_to_uint8, bool, uint8)
d894b803ccb5 [project @ 2004-09-16 01:11:39 by jwe]
jwe
parents: 4952
diff changeset
97 DEFCONVFN (bool_to_uint16, bool, uint16)
d894b803ccb5 [project @ 2004-09-16 01:11:39 by jwe]
jwe
parents: 4952
diff changeset
98 DEFCONVFN (bool_to_uint32, bool, uint32)
d894b803ccb5 [project @ 2004-09-16 01:11:39 by jwe]
jwe
parents: 4952
diff changeset
99 DEFCONVFN (bool_to_uint64, bool, uint64)
d894b803ccb5 [project @ 2004-09-16 01:11:39 by jwe]
jwe
parents: 4952
diff changeset
100
d894b803ccb5 [project @ 2004-09-16 01:11:39 by jwe]
jwe
parents: 4952
diff changeset
101 DEFCONVFN (bool_matrix_to_int8, bool_matrix, int8)
d894b803ccb5 [project @ 2004-09-16 01:11:39 by jwe]
jwe
parents: 4952
diff changeset
102 DEFCONVFN (bool_matrix_to_int16, bool_matrix, int16)
d894b803ccb5 [project @ 2004-09-16 01:11:39 by jwe]
jwe
parents: 4952
diff changeset
103 DEFCONVFN (bool_matrix_to_int32, bool_matrix, int32)
d894b803ccb5 [project @ 2004-09-16 01:11:39 by jwe]
jwe
parents: 4952
diff changeset
104 DEFCONVFN (bool_matrix_to_int64, bool_matrix, int64)
d894b803ccb5 [project @ 2004-09-16 01:11:39 by jwe]
jwe
parents: 4952
diff changeset
105
d894b803ccb5 [project @ 2004-09-16 01:11:39 by jwe]
jwe
parents: 4952
diff changeset
106 DEFCONVFN (bool_matrix_to_uint8, bool_matrix, uint8)
d894b803ccb5 [project @ 2004-09-16 01:11:39 by jwe]
jwe
parents: 4952
diff changeset
107 DEFCONVFN (bool_matrix_to_uint16, bool_matrix, uint16)
d894b803ccb5 [project @ 2004-09-16 01:11:39 by jwe]
jwe
parents: 4952
diff changeset
108 DEFCONVFN (bool_matrix_to_uint32, bool_matrix, uint32)
d894b803ccb5 [project @ 2004-09-16 01:11:39 by jwe]
jwe
parents: 4952
diff changeset
109 DEFCONVFN (bool_matrix_to_uint64, bool_matrix, uint64)
d894b803ccb5 [project @ 2004-09-16 01:11:39 by jwe]
jwe
parents: 4952
diff changeset
110
6600
ecd3db9a1815 [project @ 2007-04-30 14:48:21 by jwe]
jwe
parents: 5307
diff changeset
111 DEFSTRINTCONVFN (char_matrix_sq_str_to_int8, int8)
ecd3db9a1815 [project @ 2007-04-30 14:48:21 by jwe]
jwe
parents: 5307
diff changeset
112 DEFSTRINTCONVFN (char_matrix_sq_str_to_int16, int16)
ecd3db9a1815 [project @ 2007-04-30 14:48:21 by jwe]
jwe
parents: 5307
diff changeset
113 DEFSTRINTCONVFN (char_matrix_sq_str_to_int32, int32)
ecd3db9a1815 [project @ 2007-04-30 14:48:21 by jwe]
jwe
parents: 5307
diff changeset
114 DEFSTRINTCONVFN (char_matrix_sq_str_to_int64, int64)
ecd3db9a1815 [project @ 2007-04-30 14:48:21 by jwe]
jwe
parents: 5307
diff changeset
115
ecd3db9a1815 [project @ 2007-04-30 14:48:21 by jwe]
jwe
parents: 5307
diff changeset
116 DEFSTRINTCONVFN (char_matrix_sq_str_to_uint8, uint8)
ecd3db9a1815 [project @ 2007-04-30 14:48:21 by jwe]
jwe
parents: 5307
diff changeset
117 DEFSTRINTCONVFN (char_matrix_sq_str_to_uint16, uint16)
ecd3db9a1815 [project @ 2007-04-30 14:48:21 by jwe]
jwe
parents: 5307
diff changeset
118 DEFSTRINTCONVFN (char_matrix_sq_str_to_uint32, uint32)
ecd3db9a1815 [project @ 2007-04-30 14:48:21 by jwe]
jwe
parents: 5307
diff changeset
119 DEFSTRINTCONVFN (char_matrix_sq_str_to_uint64, uint64)
5032
3361e0846469 [project @ 2004-09-24 03:56:41 by jwe]
jwe
parents: 5002
diff changeset
120
6600
ecd3db9a1815 [project @ 2007-04-30 14:48:21 by jwe]
jwe
parents: 5307
diff changeset
121 DEFSTRINTCONVFN (char_matrix_dq_str_to_int8, int8)
ecd3db9a1815 [project @ 2007-04-30 14:48:21 by jwe]
jwe
parents: 5307
diff changeset
122 DEFSTRINTCONVFN (char_matrix_dq_str_to_int16, int16)
ecd3db9a1815 [project @ 2007-04-30 14:48:21 by jwe]
jwe
parents: 5307
diff changeset
123 DEFSTRINTCONVFN (char_matrix_dq_str_to_int32, int32)
ecd3db9a1815 [project @ 2007-04-30 14:48:21 by jwe]
jwe
parents: 5307
diff changeset
124 DEFSTRINTCONVFN (char_matrix_dq_str_to_int64, int64)
ecd3db9a1815 [project @ 2007-04-30 14:48:21 by jwe]
jwe
parents: 5307
diff changeset
125
ecd3db9a1815 [project @ 2007-04-30 14:48:21 by jwe]
jwe
parents: 5307
diff changeset
126 DEFSTRINTCONVFN (char_matrix_dq_str_to_uint8, uint8)
ecd3db9a1815 [project @ 2007-04-30 14:48:21 by jwe]
jwe
parents: 5307
diff changeset
127 DEFSTRINTCONVFN (char_matrix_dq_str_to_uint16, uint16)
ecd3db9a1815 [project @ 2007-04-30 14:48:21 by jwe]
jwe
parents: 5307
diff changeset
128 DEFSTRINTCONVFN (char_matrix_dq_str_to_uint32, uint32)
ecd3db9a1815 [project @ 2007-04-30 14:48:21 by jwe]
jwe
parents: 5307
diff changeset
129 DEFSTRINTCONVFN (char_matrix_dq_str_to_uint64, uint64)
5032
3361e0846469 [project @ 2004-09-24 03:56:41 by jwe]
jwe
parents: 5002
diff changeset
130
4907
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
131 DEFCONVFN (range_to_int8, range, int8)
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
132 DEFCONVFN (range_to_int16, range, int16)
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
133 DEFCONVFN (range_to_int32, range, int32)
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
134 DEFCONVFN (range_to_int64, range, int64)
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
135
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
136 DEFCONVFN (range_to_uint8, range, uint8)
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
137 DEFCONVFN (range_to_uint16, range, uint16)
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
138 DEFCONVFN (range_to_uint32, range, uint32)
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
139 DEFCONVFN (range_to_uint64, range, uint64)
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
140
4901
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
141 #define INT_CONV_FUNCTIONS(tfrom) \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
142 DEFCONVFN2 (tfrom ## _scalar_to_int8, tfrom, scalar, int8) \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
143 DEFCONVFN2 (tfrom ## _scalar_to_int16, tfrom, scalar, int16) \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
144 DEFCONVFN2 (tfrom ## _scalar_to_int32, tfrom, scalar, int32) \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
145 DEFCONVFN2 (tfrom ## _scalar_to_int64, tfrom, scalar, int64) \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
146 \
4952
bfd57b466752 [project @ 2004-09-01 00:49:05 by jwe]
jwe
parents: 4907
diff changeset
147 DEFCONVFN2 (tfrom ## _scalar_to_uint8, tfrom, scalar, uint8) \
bfd57b466752 [project @ 2004-09-01 00:49:05 by jwe]
jwe
parents: 4907
diff changeset
148 DEFCONVFN2 (tfrom ## _scalar_to_uint16, tfrom, scalar, uint16) \
bfd57b466752 [project @ 2004-09-01 00:49:05 by jwe]
jwe
parents: 4907
diff changeset
149 DEFCONVFN2 (tfrom ## _scalar_to_uint32, tfrom, scalar, uint32) \
bfd57b466752 [project @ 2004-09-01 00:49:05 by jwe]
jwe
parents: 4907
diff changeset
150 DEFCONVFN2 (tfrom ## _scalar_to_uint64, tfrom, scalar, uint64) \
4901
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
151 \
4952
bfd57b466752 [project @ 2004-09-01 00:49:05 by jwe]
jwe
parents: 4907
diff changeset
152 DEFCONVFN2 (tfrom ## _matrix_to_int8, tfrom, matrix, int8) \
bfd57b466752 [project @ 2004-09-01 00:49:05 by jwe]
jwe
parents: 4907
diff changeset
153 DEFCONVFN2 (tfrom ## _matrix_to_int16, tfrom, matrix, int16) \
bfd57b466752 [project @ 2004-09-01 00:49:05 by jwe]
jwe
parents: 4907
diff changeset
154 DEFCONVFN2 (tfrom ## _matrix_to_int32, tfrom, matrix, int32) \
bfd57b466752 [project @ 2004-09-01 00:49:05 by jwe]
jwe
parents: 4907
diff changeset
155 DEFCONVFN2 (tfrom ## _matrix_to_int64, tfrom, matrix, int64) \
4901
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
156 \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
157 DEFCONVFN2 (tfrom ## _matrix_to_uint8, tfrom, matrix, uint8) \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
158 DEFCONVFN2 (tfrom ## _matrix_to_uint16, tfrom, matrix, uint16) \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
159 DEFCONVFN2 (tfrom ## _matrix_to_uint32, tfrom, matrix, uint32) \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
160 DEFCONVFN2 (tfrom ## _matrix_to_uint64, tfrom, matrix, uint64)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
161
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
162 INT_CONV_FUNCTIONS (int8)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
163 INT_CONV_FUNCTIONS (int16)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
164 INT_CONV_FUNCTIONS (int32)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
165 INT_CONV_FUNCTIONS (int64)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
166
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
167 INT_CONV_FUNCTIONS (uint8)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
168 INT_CONV_FUNCTIONS (uint16)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
169 INT_CONV_FUNCTIONS (uint32)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
170 INT_CONV_FUNCTIONS (uint64)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
171
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
172 #define INSTALL_INT_CONV_FUNCTIONS(tfrom) \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
173 INSTALL_CONVOP (octave_ ## tfrom ## _scalar, octave_int8_matrix, tfrom ## _scalar_to_int8) \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
174 INSTALL_CONVOP (octave_ ## tfrom ## _scalar, octave_int16_matrix, tfrom ## _scalar_to_int16) \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
175 INSTALL_CONVOP (octave_ ## tfrom ## _scalar, octave_int32_matrix, tfrom ## _scalar_to_int32) \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
176 INSTALL_CONVOP (octave_ ## tfrom ## _scalar, octave_int64_matrix, tfrom ## _scalar_to_int64) \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
177 \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
178 INSTALL_CONVOP (octave_ ## tfrom ## _scalar, octave_uint8_matrix, tfrom ## _scalar_to_uint8) \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
179 INSTALL_CONVOP (octave_ ## tfrom ## _scalar, octave_uint16_matrix, tfrom ## _scalar_to_uint16) \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
180 INSTALL_CONVOP (octave_ ## tfrom ## _scalar, octave_uint32_matrix, tfrom ## _scalar_to_uint32) \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
181 INSTALL_CONVOP (octave_ ## tfrom ## _scalar, octave_uint64_matrix, tfrom ## _scalar_to_uint64) \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
182 \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
183 INSTALL_CONVOP (octave_ ## tfrom ## _matrix, octave_int8_matrix, tfrom ## _matrix_to_int8) \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
184 INSTALL_CONVOP (octave_ ## tfrom ## _matrix, octave_int16_matrix, tfrom ## _matrix_to_int16) \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
185 INSTALL_CONVOP (octave_ ## tfrom ## _matrix, octave_int32_matrix, tfrom ## _matrix_to_int32) \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
186 INSTALL_CONVOP (octave_ ## tfrom ## _matrix, octave_int64_matrix, tfrom ## _matrix_to_int64) \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
187 \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
188 INSTALL_CONVOP (octave_ ## tfrom ## _matrix, octave_uint8_matrix, tfrom ## _matrix_to_uint8) \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
189 INSTALL_CONVOP (octave_ ## tfrom ## _matrix, octave_uint16_matrix, tfrom ## _matrix_to_uint16) \
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
190 INSTALL_CONVOP (octave_ ## tfrom ## _matrix, octave_uint32_matrix, tfrom ## _matrix_to_uint32) \
4907
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
191 INSTALL_CONVOP (octave_ ## tfrom ## _matrix, octave_uint64_matrix, tfrom ## _matrix_to_uint64)
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
192
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
193 #define INSTALL_CONVOPS(tfrom) \
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
194 INSTALL_CONVOP (octave_ ## tfrom, octave_int8_matrix, tfrom ## _to_int8) \
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
195 INSTALL_CONVOP (octave_ ## tfrom, octave_int16_matrix, tfrom ## _to_int16) \
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
196 INSTALL_CONVOP (octave_ ## tfrom, octave_int32_matrix, tfrom ## _to_int32) \
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
197 INSTALL_CONVOP (octave_ ## tfrom, octave_int64_matrix, tfrom ## _to_int64) \
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
198 \
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
199 INSTALL_CONVOP (octave_ ## tfrom, octave_uint8_matrix, tfrom ## _to_uint8) \
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
200 INSTALL_CONVOP (octave_ ## tfrom, octave_uint16_matrix, tfrom ## _to_uint16) \
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
201 INSTALL_CONVOP (octave_ ## tfrom, octave_uint32_matrix, tfrom ## _to_uint32) \
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
202 INSTALL_CONVOP (octave_ ## tfrom, octave_uint64_matrix, tfrom ## _to_uint64)
4901
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
203
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
204 void
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
205 install_int_conv_ops (void)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
206 {
4907
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
207 INSTALL_CONVOPS (scalar)
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
208 INSTALL_CONVOPS (matrix)
7789
82be108cc558 First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents: 7017
diff changeset
209 INSTALL_CONVOPS (float_scalar)
82be108cc558 First attempt at single precision tyeps
David Bateman <dbateman@free.fr>
parents: 7017
diff changeset
210 INSTALL_CONVOPS (float_matrix)
5002
d894b803ccb5 [project @ 2004-09-16 01:11:39 by jwe]
jwe
parents: 4952
diff changeset
211 INSTALL_CONVOPS (bool)
d894b803ccb5 [project @ 2004-09-16 01:11:39 by jwe]
jwe
parents: 4952
diff changeset
212 INSTALL_CONVOPS (bool_matrix)
4907
102f199a9a9e [project @ 2004-06-25 22:10:07 by jwe]
jwe
parents: 4901
diff changeset
213 INSTALL_CONVOPS (range)
6600
ecd3db9a1815 [project @ 2007-04-30 14:48:21 by jwe]
jwe
parents: 5307
diff changeset
214 INSTALL_CONVOPS (char_matrix_sq_str)
ecd3db9a1815 [project @ 2007-04-30 14:48:21 by jwe]
jwe
parents: 5307
diff changeset
215 INSTALL_CONVOPS (char_matrix_dq_str)
4901
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
216
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
217 INSTALL_INT_CONV_FUNCTIONS (int8)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
218 INSTALL_INT_CONV_FUNCTIONS (int16)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
219 INSTALL_INT_CONV_FUNCTIONS (int32)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
220 INSTALL_INT_CONV_FUNCTIONS (int64)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
221
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
222 INSTALL_INT_CONV_FUNCTIONS (uint8)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
223 INSTALL_INT_CONV_FUNCTIONS (uint16)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
224 INSTALL_INT_CONV_FUNCTIONS (uint32)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
225 INSTALL_INT_CONV_FUNCTIONS (uint64)
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
226 }
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
227
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
228 /*
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
229 ;;; Local Variables: ***
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
230 ;;; mode: C++ ***
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
231 ;;; End: ***
35bfb4e0b96b [project @ 2004-06-14 18:33:02 by jwe]
jwe
parents:
diff changeset
232 */