annotate tests/mini/structs3.d @ 445:cc40db549aea

Changed the handling of variadic intrinsics a bit. Removed the -fp80 option and made real be 80bit floats on X86, this is what the D spec really says it should be and fixes a bunch of issues. Changed the handling of parameter attributes to a bit more generalized approach. Added sext/zext attributes for byte/short/ubyte/ushort parameters, fixes #60 . Parameter attribs now properly set for intrinsic calls if necessary. Made the tango.math.Math patch less intrusive. Fixed/added some mini tests.
author Tomas Lindquist Olsen <tomas.l.olsen@gmail.com>
date Fri, 01 Aug 2008 17:59:58 +0200
parents 1bb99290e03a
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
7
7a155ba88c53 [svn r11] added another struct sample
lindquist
parents:
diff changeset
1 module structs3;
7a155ba88c53 [svn r11] added another struct sample
lindquist
parents:
diff changeset
2
7a155ba88c53 [svn r11] added another struct sample
lindquist
parents:
diff changeset
3 struct S
7a155ba88c53 [svn r11] added another struct sample
lindquist
parents:
diff changeset
4 {
7a155ba88c53 [svn r11] added another struct sample
lindquist
parents:
diff changeset
5 char c;
8
5e69b77a5c51 [svn r12] fixed accessing aggregate fields of aggregates
lindquist
parents: 7
diff changeset
6 float f;
7
7a155ba88c53 [svn r11] added another struct sample
lindquist
parents:
diff changeset
7 }
7a155ba88c53 [svn r11] added another struct sample
lindquist
parents:
diff changeset
8
7a155ba88c53 [svn r11] added another struct sample
lindquist
parents:
diff changeset
9 struct T
7a155ba88c53 [svn r11] added another struct sample
lindquist
parents:
diff changeset
10 {
7a155ba88c53 [svn r11] added another struct sample
lindquist
parents:
diff changeset
11 S s;
7a155ba88c53 [svn r11] added another struct sample
lindquist
parents:
diff changeset
12 long l;
7a155ba88c53 [svn r11] added another struct sample
lindquist
parents:
diff changeset
13 }
7a155ba88c53 [svn r11] added another struct sample
lindquist
parents:
diff changeset
14
7a155ba88c53 [svn r11] added another struct sample
lindquist
parents:
diff changeset
15 void main()
7a155ba88c53 [svn r11] added another struct sample
lindquist
parents:
diff changeset
16 {
8
5e69b77a5c51 [svn r12] fixed accessing aggregate fields of aggregates
lindquist
parents: 7
diff changeset
17 T t;
5e69b77a5c51 [svn r12] fixed accessing aggregate fields of aggregates
lindquist
parents: 7
diff changeset
18 float f = void;
5e69b77a5c51 [svn r12] fixed accessing aggregate fields of aggregates
lindquist
parents: 7
diff changeset
19 float* fp = void;
5e69b77a5c51 [svn r12] fixed accessing aggregate fields of aggregates
lindquist
parents: 7
diff changeset
20 {f = t.s.f;}
5e69b77a5c51 [svn r12] fixed accessing aggregate fields of aggregates
lindquist
parents: 7
diff changeset
21 {t.s.f = 0.0;}
5e69b77a5c51 [svn r12] fixed accessing aggregate fields of aggregates
lindquist
parents: 7
diff changeset
22 {fp = &t.s.f;}
5e69b77a5c51 [svn r12] fixed accessing aggregate fields of aggregates
lindquist
parents: 7
diff changeset
23 {*fp = 1.0;}
5e69b77a5c51 [svn r12] fixed accessing aggregate fields of aggregates
lindquist
parents: 7
diff changeset
24 {assert(t.s.f == 1.0);}
5e69b77a5c51 [svn r12] fixed accessing aggregate fields of aggregates
lindquist
parents: 7
diff changeset
25 {assert(*(&t.s.f) == 1.0);}
5e69b77a5c51 [svn r12] fixed accessing aggregate fields of aggregates
lindquist
parents: 7
diff changeset
26 {t.s.c = 'a';}
5e69b77a5c51 [svn r12] fixed accessing aggregate fields of aggregates
lindquist
parents: 7
diff changeset
27 {assert(t.s.c == 'a');}
5e69b77a5c51 [svn r12] fixed accessing aggregate fields of aggregates
lindquist
parents: 7
diff changeset
28 {t.l = 64;}
5e69b77a5c51 [svn r12] fixed accessing aggregate fields of aggregates
lindquist
parents: 7
diff changeset
29 {assert(t.l == 64);}
7
7a155ba88c53 [svn r11] added another struct sample
lindquist
parents:
diff changeset
30 }