projects/ldc: dmd/impcnvgen.c annotate

annotate dmd/impcnvgen.c @ 1138:4c8bb03e4fbc

Update DtoConstFP() to be correct after LLVM r67562, which changed the way the APFloat constructor expects its i80 APInts to be formatted. (They're now actually consistent with the x87 format)

author	Frits van Bommel <fvbommel wxs.nl>
date	Tue, 24 Mar 2009 15:24:59 +0100
parents	a26b0c5d5942
children

rev	line source
1 c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	1
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	2 // Copyright (c) 1999-2006 by Digital Mars
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	3 // All Rights Reserved
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	4 // written by Walter Bright
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	5 // http://www.digitalmars.com
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	6 // License for redistribution is by either the Artistic License
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	7 // in artistic.txt, or the GNU General Public License in gnu.txt.
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	8 // See the included readme.txt for details.
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	9
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	10 #include <stdio.h>
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	11 #include <stdlib.h>
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	12
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	13 #include "mtype.h"
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	14
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	15 enum TY impcnvResult[TMAX][TMAX];
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	16 enum TY impcnvType1[TMAX][TMAX];
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	17 enum TY impcnvType2[TMAX][TMAX];
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	18 int impcnvWarn[TMAX][TMAX];
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	19
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	20 int integral_promotion(int t)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	21 {
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	22 switch (t)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	23 {
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	24 case Tchar:
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	25 case Twchar:
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	26 case Tbit:
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	27 case Tbool:
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	28 case Tint8:
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	29 case Tuns8:
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	30 case Tint16:
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	31 case Tuns16: return Tint32;
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	32 case Tdchar: return Tuns32;
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	33 default: return t;
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	34 }
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	35 }
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	36
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	37 void init()
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	38 { int i, j;
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	39
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	40 // Set conversion tables
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	41 for (i = 0; i < TMAX; i++)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	42 for (j = 0; j < TMAX; j++)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	43 { impcnvResult[i][j] = Terror;
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	44 impcnvType1[i][j] = Terror;
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	45 impcnvType2[i][j] = Terror;
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	46 impcnvWarn[i][j] = 0;
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	47 }
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	48
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	49 #define X(t1,t2, nt1,nt2, rt) \
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	50 impcnvResult[t1][t2] = rt; \
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	51 impcnvType1[t1][t2] = nt1; \
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	52 impcnvType2[t1][t2] = nt2;
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	53
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	54 /* ======================= */
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	55
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	56 X(Tbit,Tbit, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	57 X(Tbit,Tint8, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	58 X(Tbit,Tuns8, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	59 X(Tbit,Tint16, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	60 X(Tbit,Tuns16, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	61 X(Tbit,Tint32, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	62 X(Tbit,Tuns32, Tuns32,Tuns32, Tuns32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	63 X(Tbit,Tint64, Tint64,Tint64, Tint64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	64 X(Tbit,Tuns64, Tuns64,Tuns64, Tuns64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	65
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	66 X(Tbit,Tfloat32, Tfloat32,Tfloat32, Tfloat32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	67 X(Tbit,Tfloat64, Tfloat64,Tfloat64, Tfloat64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	68 X(Tbit,Tfloat80, Tfloat80,Tfloat80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	69 X(Tbit,Timaginary32, Tfloat32,Timaginary32, Tfloat32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	70 X(Tbit,Timaginary64, Tfloat64,Timaginary64, Tfloat64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	71 X(Tbit,Timaginary80, Tfloat80,Timaginary80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	72 X(Tbit,Tcomplex32, Tfloat32,Tcomplex32, Tcomplex32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	73 X(Tbit,Tcomplex64, Tfloat64,Tcomplex64, Tcomplex64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	74 X(Tbit,Tcomplex80, Tfloat80,Tcomplex80, Tcomplex80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	75
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	76 /* ======================= */
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	77
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	78 X(Tbool,Tbool, Tbool,Tbool, Tbool)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	79 X(Tbool,Tint8, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	80 X(Tbool,Tuns8, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	81 X(Tbool,Tint16, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	82 X(Tbool,Tuns16, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	83 X(Tbool,Tint32, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	84 X(Tbool,Tuns32, Tuns32,Tuns32, Tuns32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	85 X(Tbool,Tint64, Tint64,Tint64, Tint64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	86 X(Tbool,Tuns64, Tuns64,Tuns64, Tuns64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	87
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	88 X(Tbool,Tfloat32, Tfloat32,Tfloat32, Tfloat32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	89 X(Tbool,Tfloat64, Tfloat64,Tfloat64, Tfloat64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	90 X(Tbool,Tfloat80, Tfloat80,Tfloat80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	91 X(Tbool,Timaginary32, Tfloat32,Timaginary32, Tfloat32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	92 X(Tbool,Timaginary64, Tfloat64,Timaginary64, Tfloat64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	93 X(Tbool,Timaginary80, Tfloat80,Timaginary80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	94 X(Tbool,Tcomplex32, Tfloat32,Tcomplex32, Tcomplex32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	95 X(Tbool,Tcomplex64, Tfloat64,Tcomplex64, Tcomplex64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	96 X(Tbool,Tcomplex80, Tfloat80,Tcomplex80, Tcomplex80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	97
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	98 /* ======================= */
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	99
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	100 X(Tint8,Tint8, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	101 X(Tint8,Tuns8, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	102 X(Tint8,Tint16, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	103 X(Tint8,Tuns16, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	104 X(Tint8,Tint32, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	105 X(Tint8,Tuns32, Tuns32,Tuns32, Tuns32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	106 X(Tint8,Tint64, Tint64,Tint64, Tint64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	107 X(Tint8,Tuns64, Tuns64,Tuns64, Tuns64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	108
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	109 X(Tint8,Tfloat32, Tfloat32,Tfloat32, Tfloat32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	110 X(Tint8,Tfloat64, Tfloat64,Tfloat64, Tfloat64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	111 X(Tint8,Tfloat80, Tfloat80,Tfloat80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	112 X(Tint8,Timaginary32, Tfloat32,Timaginary32, Tfloat32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	113 X(Tint8,Timaginary64, Tfloat64,Timaginary64, Tfloat64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	114 X(Tint8,Timaginary80, Tfloat80,Timaginary80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	115 X(Tint8,Tcomplex32, Tfloat32,Tcomplex32, Tcomplex32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	116 X(Tint8,Tcomplex64, Tfloat64,Tcomplex64, Tcomplex64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	117 X(Tint8,Tcomplex80, Tfloat80,Tcomplex80, Tcomplex80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	118
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	119 /* ======================= */
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	120
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	121 X(Tuns8,Tuns8, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	122 X(Tuns8,Tint16, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	123 X(Tuns8,Tuns16, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	124 X(Tuns8,Tint32, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	125 X(Tuns8,Tuns32, Tuns32,Tuns32, Tuns32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	126 X(Tuns8,Tint64, Tint64,Tint64, Tint64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	127 X(Tuns8,Tuns64, Tuns64,Tuns64, Tuns64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	128
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	129 X(Tuns8,Tfloat32, Tfloat32,Tfloat32, Tfloat32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	130 X(Tuns8,Tfloat64, Tfloat64,Tfloat64, Tfloat64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	131 X(Tuns8,Tfloat80, Tfloat80,Tfloat80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	132 X(Tuns8,Timaginary32, Tfloat32,Timaginary32, Tfloat32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	133 X(Tuns8,Timaginary64, Tfloat64,Timaginary64, Tfloat64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	134 X(Tuns8,Timaginary80, Tfloat80,Timaginary80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	135 X(Tuns8,Tcomplex32, Tfloat32,Tcomplex32, Tcomplex32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	136 X(Tuns8,Tcomplex64, Tfloat64,Tcomplex64, Tcomplex64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	137 X(Tuns8,Tcomplex80, Tfloat80,Tcomplex80, Tcomplex80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	138
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	139 /* ======================= */
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	140
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	141 X(Tint16,Tint16, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	142 X(Tint16,Tuns16, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	143 X(Tint16,Tint32, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	144 X(Tint16,Tuns32, Tuns32,Tuns32, Tuns32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	145 X(Tint16,Tint64, Tint64,Tint64, Tint64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	146 X(Tint16,Tuns64, Tuns64,Tuns64, Tuns64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	147
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	148 X(Tint16,Tfloat32, Tfloat32,Tfloat32, Tfloat32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	149 X(Tint16,Tfloat64, Tfloat64,Tfloat64, Tfloat64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	150 X(Tint16,Tfloat80, Tfloat80,Tfloat80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	151 X(Tint16,Timaginary32, Tfloat32,Timaginary32, Tfloat32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	152 X(Tint16,Timaginary64, Tfloat64,Timaginary64, Tfloat64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	153 X(Tint16,Timaginary80, Tfloat80,Timaginary80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	154 X(Tint16,Tcomplex32, Tfloat32,Tcomplex32, Tcomplex32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	155 X(Tint16,Tcomplex64, Tfloat64,Tcomplex64, Tcomplex64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	156 X(Tint16,Tcomplex80, Tfloat80,Tcomplex80, Tcomplex80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	157
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	158 /* ======================= */
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	159
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	160 X(Tuns16,Tuns16, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	161 X(Tuns16,Tint32, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	162 X(Tuns16,Tuns32, Tuns32,Tuns32, Tuns32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	163 X(Tuns16,Tint64, Tint64,Tint64, Tint64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	164 X(Tuns16,Tuns64, Tuns64,Tuns64, Tuns64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	165
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	166 X(Tuns16,Tfloat32, Tfloat32,Tfloat32, Tfloat32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	167 X(Tuns16,Tfloat64, Tfloat64,Tfloat64, Tfloat64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	168 X(Tuns16,Tfloat80, Tfloat80,Tfloat80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	169 X(Tuns16,Timaginary32, Tfloat32,Timaginary32, Tfloat32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	170 X(Tuns16,Timaginary64, Tfloat64,Timaginary64, Tfloat64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	171 X(Tuns16,Timaginary80, Tfloat80,Timaginary80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	172 X(Tuns16,Tcomplex32, Tfloat32,Tcomplex32, Tcomplex32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	173 X(Tuns16,Tcomplex64, Tfloat64,Tcomplex64, Tcomplex64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	174 X(Tuns16,Tcomplex80, Tfloat80,Tcomplex80, Tcomplex80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	175
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	176 /* ======================= */
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	177
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	178 X(Tint32,Tint32, Tint32,Tint32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	179 X(Tint32,Tuns32, Tuns32,Tuns32, Tuns32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	180 X(Tint32,Tint64, Tint64,Tint64, Tint64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	181 X(Tint32,Tuns64, Tuns64,Tuns64, Tuns64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	182
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	183 X(Tint32,Tfloat32, Tfloat32,Tfloat32, Tfloat32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	184 X(Tint32,Tfloat64, Tfloat64,Tfloat64, Tfloat64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	185 X(Tint32,Tfloat80, Tfloat80,Tfloat80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	186 X(Tint32,Timaginary32, Tfloat32,Timaginary32, Tfloat32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	187 X(Tint32,Timaginary64, Tfloat64,Timaginary64, Tfloat64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	188 X(Tint32,Timaginary80, Tfloat80,Timaginary80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	189 X(Tint32,Tcomplex32, Tfloat32,Tcomplex32, Tcomplex32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	190 X(Tint32,Tcomplex64, Tfloat64,Tcomplex64, Tcomplex64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	191 X(Tint32,Tcomplex80, Tfloat80,Tcomplex80, Tcomplex80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	192
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	193 /* ======================= */
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	194
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	195 X(Tuns32,Tuns32, Tuns32,Tuns32, Tuns32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	196 X(Tuns32,Tint64, Tint64,Tint64, Tint64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	197 X(Tuns32,Tuns64, Tuns64,Tuns64, Tuns64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	198
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	199 X(Tuns32,Tfloat32, Tfloat32,Tfloat32, Tfloat32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	200 X(Tuns32,Tfloat64, Tfloat64,Tfloat64, Tfloat64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	201 X(Tuns32,Tfloat80, Tfloat80,Tfloat80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	202 X(Tuns32,Timaginary32, Tfloat32,Timaginary32, Tfloat32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	203 X(Tuns32,Timaginary64, Tfloat64,Timaginary64, Tfloat64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	204 X(Tuns32,Timaginary80, Tfloat80,Timaginary80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	205 X(Tuns32,Tcomplex32, Tfloat32,Tcomplex32, Tcomplex32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	206 X(Tuns32,Tcomplex64, Tfloat64,Tcomplex64, Tcomplex64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	207 X(Tuns32,Tcomplex80, Tfloat80,Tcomplex80, Tcomplex80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	208
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	209 /* ======================= */
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	210
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	211 X(Tint64,Tint64, Tint64,Tint64, Tint64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	212 X(Tint64,Tuns64, Tuns64,Tuns64, Tuns64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	213
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	214 X(Tint64,Tfloat32, Tfloat32,Tfloat32, Tfloat32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	215 X(Tint64,Tfloat64, Tfloat64,Tfloat64, Tfloat64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	216 X(Tint64,Tfloat80, Tfloat80,Tfloat80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	217 X(Tint64,Timaginary32, Tfloat32,Timaginary32, Tfloat32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	218 X(Tint64,Timaginary64, Tfloat64,Timaginary64, Tfloat64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	219 X(Tint64,Timaginary80, Tfloat80,Timaginary80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	220 X(Tint64,Tcomplex32, Tfloat32,Tcomplex32, Tcomplex32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	221 X(Tint64,Tcomplex64, Tfloat64,Tcomplex64, Tcomplex64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	222 X(Tint64,Tcomplex80, Tfloat80,Tcomplex80, Tcomplex80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	223
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	224 /* ======================= */
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	225
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	226 X(Tuns64,Tuns64, Tuns64,Tuns64, Tuns64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	227
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	228 X(Tuns64,Tfloat32, Tfloat32,Tfloat32, Tfloat32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	229 X(Tuns64,Tfloat64, Tfloat64,Tfloat64, Tfloat64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	230 X(Tuns64,Tfloat80, Tfloat80,Tfloat80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	231 X(Tuns64,Timaginary32, Tfloat32,Timaginary32, Tfloat32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	232 X(Tuns64,Timaginary64, Tfloat64,Timaginary64, Tfloat64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	233 X(Tuns64,Timaginary80, Tfloat80,Timaginary80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	234 X(Tuns64,Tcomplex32, Tfloat32,Tcomplex32, Tcomplex32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	235 X(Tuns64,Tcomplex64, Tfloat64,Tcomplex64, Tcomplex64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	236 X(Tuns64,Tcomplex80, Tfloat80,Tcomplex80, Tcomplex80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	237
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	238 /* ======================= */
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	239
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	240 X(Tfloat32,Tfloat32, Tfloat32,Tfloat32, Tfloat32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	241 X(Tfloat32,Tfloat64, Tfloat64,Tfloat64, Tfloat64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	242 X(Tfloat32,Tfloat80, Tfloat80,Tfloat80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	243
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	244 X(Tfloat32,Timaginary32, Tfloat32,Timaginary32, Tfloat32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	245 X(Tfloat32,Timaginary64, Tfloat64,Timaginary64, Tfloat64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	246 X(Tfloat32,Timaginary80, Tfloat80,Timaginary80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	247
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	248 X(Tfloat32,Tcomplex32, Tfloat32,Tcomplex32, Tcomplex32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	249 X(Tfloat32,Tcomplex64, Tfloat64,Tcomplex64, Tcomplex64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	250 X(Tfloat32,Tcomplex80, Tfloat80,Tcomplex80, Tcomplex80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	251
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	252 /* ======================= */
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	253
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	254 X(Tfloat64,Tfloat64, Tfloat64,Tfloat64, Tfloat64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	255 X(Tfloat64,Tfloat80, Tfloat80,Tfloat80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	256
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	257 X(Tfloat64,Timaginary32, Tfloat64,Timaginary64, Tfloat64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	258 X(Tfloat64,Timaginary64, Tfloat64,Timaginary64, Tfloat64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	259 X(Tfloat64,Timaginary80, Tfloat80,Timaginary80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	260
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	261 X(Tfloat64,Tcomplex32, Tfloat64,Tcomplex64, Tcomplex64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	262 X(Tfloat64,Tcomplex64, Tfloat64,Tcomplex64, Tcomplex64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	263 X(Tfloat64,Tcomplex80, Tfloat80,Tcomplex80, Tcomplex80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	264
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	265 /* ======================= */
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	266
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	267 X(Tfloat80,Tfloat80, Tfloat80,Tfloat80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	268
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	269 X(Tfloat80,Timaginary32, Tfloat80,Timaginary80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	270 X(Tfloat80,Timaginary64, Tfloat80,Timaginary80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	271 X(Tfloat80,Timaginary80, Tfloat80,Timaginary80, Tfloat80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	272
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	273 X(Tfloat80,Tcomplex32, Tfloat80,Tcomplex80, Tcomplex80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	274 X(Tfloat80,Tcomplex64, Tfloat80,Tcomplex80, Tcomplex80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	275 X(Tfloat80,Tcomplex80, Tfloat80,Tcomplex80, Tcomplex80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	276
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	277 /* ======================= */
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	278
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	279 X(Timaginary32,Timaginary32, Timaginary32,Timaginary32, Timaginary32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	280 X(Timaginary32,Timaginary64, Timaginary64,Timaginary64, Timaginary64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	281 X(Timaginary32,Timaginary80, Timaginary80,Timaginary80, Timaginary80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	282
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	283 X(Timaginary32,Tcomplex32, Timaginary32,Tcomplex32, Tcomplex32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	284 X(Timaginary32,Tcomplex64, Timaginary64,Tcomplex64, Tcomplex64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	285 X(Timaginary32,Tcomplex80, Timaginary80,Tcomplex80, Tcomplex80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	286
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	287 /* ======================= */
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	288
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	289 X(Timaginary64,Timaginary64, Timaginary64,Timaginary64, Timaginary64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	290 X(Timaginary64,Timaginary80, Timaginary80,Timaginary80, Timaginary80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	291
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	292 X(Timaginary64,Tcomplex32, Timaginary64,Tcomplex64, Tcomplex64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	293 X(Timaginary64,Tcomplex64, Timaginary64,Tcomplex64, Tcomplex64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	294 X(Timaginary64,Tcomplex80, Timaginary80,Tcomplex80, Tcomplex80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	295
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	296 /* ======================= */
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	297
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	298 X(Timaginary80,Timaginary80, Timaginary80,Timaginary80, Timaginary80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	299
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	300 X(Timaginary80,Tcomplex32, Timaginary80,Tcomplex80, Tcomplex80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	301 X(Timaginary80,Tcomplex64, Timaginary80,Tcomplex80, Tcomplex80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	302 X(Timaginary80,Tcomplex80, Timaginary80,Tcomplex80, Tcomplex80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	303
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	304 /* ======================= */
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	305
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	306 X(Tcomplex32,Tcomplex32, Tcomplex32,Tcomplex32, Tcomplex32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	307 X(Tcomplex32,Tcomplex64, Tcomplex64,Tcomplex64, Tcomplex64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	308 X(Tcomplex32,Tcomplex80, Tcomplex80,Tcomplex80, Tcomplex80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	309
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	310 /* ======================= */
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	311
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	312 X(Tcomplex64,Tcomplex64, Tcomplex64,Tcomplex64, Tcomplex64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	313 X(Tcomplex64,Tcomplex80, Tcomplex80,Tcomplex80, Tcomplex80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	314
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	315 /* ======================= */
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	316
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	317 X(Tcomplex80,Tcomplex80, Tcomplex80,Tcomplex80, Tcomplex80)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	318
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	319 #undef X
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	320
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	321 #define Y(t1,t2) impcnvWarn[t1][t2] = 1;
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	322 Y(Tint8, Tbit)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	323 Y(Tuns8, Tbit)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	324 Y(Tint16, Tbit)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	325 Y(Tuns16, Tbit)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	326 Y(Tint32, Tbit)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	327 Y(Tuns32, Tbit)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	328 Y(Tint64, Tbit)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	329 Y(Tuns64, Tbit)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	330
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	331 Y(Tuns8, Tint8)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	332 Y(Tint16, Tint8)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	333 Y(Tuns16, Tint8)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	334 Y(Tint32, Tint8)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	335 Y(Tuns32, Tint8)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	336 Y(Tint64, Tint8)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	337 Y(Tuns64, Tint8)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	338
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	339 Y(Tint8, Tuns8)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	340 Y(Tint16, Tuns8)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	341 Y(Tuns16, Tuns8)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	342 Y(Tint32, Tuns8)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	343 Y(Tuns32, Tuns8)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	344 Y(Tint64, Tuns8)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	345 Y(Tuns64, Tuns8)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	346
717 a26b0c5d5942 Merged DMD 1.036. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 1 diff changeset	347 Y(Tint8, Tchar)
a26b0c5d5942 Merged DMD 1.036. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 1 diff changeset	348 Y(Tint16, Tchar)
a26b0c5d5942 Merged DMD 1.036. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 1 diff changeset	349 Y(Tuns16, Tchar)
a26b0c5d5942 Merged DMD 1.036. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 1 diff changeset	350 Y(Tint32, Tchar)
a26b0c5d5942 Merged DMD 1.036. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 1 diff changeset	351 Y(Tuns32, Tchar)
a26b0c5d5942 Merged DMD 1.036. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 1 diff changeset	352 Y(Tint64, Tchar)
a26b0c5d5942 Merged DMD 1.036. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 1 diff changeset	353 Y(Tuns64, Tchar)
a26b0c5d5942 Merged DMD 1.036. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 1 diff changeset	354
1 c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	355 Y(Tuns16, Tint16)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	356 Y(Tint32, Tint16)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	357 Y(Tuns32, Tint16)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	358 Y(Tint64, Tint16)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	359 Y(Tuns64, Tint16)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	360
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	361 Y(Tint16, Tuns16)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	362 Y(Tint32, Tuns16)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	363 Y(Tuns32, Tuns16)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	364 Y(Tint64, Tuns16)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	365 Y(Tuns64, Tuns16)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	366
717 a26b0c5d5942 Merged DMD 1.036. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 1 diff changeset	367 Y(Tint16, Twchar)
a26b0c5d5942 Merged DMD 1.036. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 1 diff changeset	368 Y(Tint32, Twchar)
a26b0c5d5942 Merged DMD 1.036. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 1 diff changeset	369 Y(Tuns32, Twchar)
a26b0c5d5942 Merged DMD 1.036. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 1 diff changeset	370 Y(Tint64, Twchar)
a26b0c5d5942 Merged DMD 1.036. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 1 diff changeset	371 Y(Tuns64, Twchar)
a26b0c5d5942 Merged DMD 1.036. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 1 diff changeset	372
1 c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	373 // Y(Tuns32, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	374 Y(Tint64, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	375 Y(Tuns64, Tint32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	376
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	377 // Y(Tint32, Tuns32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	378 Y(Tint64, Tuns32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	379 Y(Tuns64, Tuns32)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	380
717 a26b0c5d5942 Merged DMD 1.036. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 1 diff changeset	381 Y(Tint64, Tdchar)
a26b0c5d5942 Merged DMD 1.036. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 1 diff changeset	382 Y(Tuns64, Tdchar)
a26b0c5d5942 Merged DMD 1.036. Tomas Lindquist Olsen <tomas.l.olsen@gmail.com> parents: 1 diff changeset	383
1 c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	384 Y(Tint64, Tuns64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	385 Y(Tuns64, Tint64)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	386
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	387 for (i = 0; i < TMAX; i++)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	388 for (j = 0; j < TMAX; j++)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	389 {
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	390 if (impcnvResult[i][j] == Terror)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	391 {
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	392 impcnvResult[i][j] = impcnvResult[j][i];
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	393 impcnvType1[i][j] = impcnvType2[j][i];
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	394 impcnvType2[i][j] = impcnvType1[j][i];
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	395 }
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	396 }
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	397 }
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	398
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	399 int main()
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	400 { FILE *fp;
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	401 int i;
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	402 int j;
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	403
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	404 init();
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	405
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	406 fp = fopen("impcnvtab.c","w");
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	407
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	408 fprintf(fp,"// This file is generated by impcnvgen.c\n");
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	409 fprintf(fp,"#include \"mtype.h\"\n");
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	410
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	411 fprintf(fp,"unsigned char Type::impcnvResult[TMAX][TMAX] =\n{\n");
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	412 for (i = 0; i < TMAX; i++)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	413 {
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	414 for (j = 0; j < TMAX; j++)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	415 {
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	416 fprintf(fp, "%d,",impcnvResult[i][j]);
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	417 }
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	418 fprintf(fp, "\n");
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	419 }
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	420 fprintf(fp,"};\n");
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	421
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	422 fprintf(fp,"unsigned char Type::impcnvType1[TMAX][TMAX] =\n{\n");
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	423 for (i = 0; i < TMAX; i++)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	424 {
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	425 for (j = 0; j < TMAX; j++)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	426 {
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	427 fprintf(fp, "%d,",impcnvType1[i][j]);
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	428 }
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	429 fprintf(fp, "\n");
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	430 }
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	431 fprintf(fp,"};\n");
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	432
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	433 fprintf(fp,"unsigned char Type::impcnvType2[TMAX][TMAX] =\n{\n");
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	434 for (i = 0; i < TMAX; i++)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	435 {
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	436 for (j = 0; j < TMAX; j++)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	437 {
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	438 fprintf(fp, "%d,",impcnvType2[i][j]);
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	439 }
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	440 fprintf(fp, "\n");
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	441 }
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	442 fprintf(fp,"};\n");
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	443
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	444 fprintf(fp,"unsigned char Type::impcnvWarn[TMAX][TMAX] =\n{\n");
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	445 for (i = 0; i < TMAX; i++)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	446 {
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	447 for (j = 0; j < TMAX; j++)
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	448 {
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	449 fprintf(fp, "%d,",impcnvWarn[i][j]);
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	450 }
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	451 fprintf(fp, "\n");
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	452 }
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	453 fprintf(fp,"};\n");
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	454
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	455 fclose(fp);
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	456 return EXIT_SUCCESS;
c53b6e3fe49a [svn r5] Initial commit. Most things are very rough. lindquist parents: diff changeset	457 }

Mercurial > projects > ldc

annotate dmd/impcnvgen.c @ 1138:4c8bb03e4fbc