| #include <stdio.h> |
| |
| #define MAX_ARR 24 |
| |
| const float fs_f[] = { |
| 0, 456.25, 3, -1, |
| 1384.5, -7.25, 1000000000, -5786.5, |
| 1752, 0.015625, 0.03125, -248562.75, |
| -45786.5, 456, 34.03125, 45786.75, |
| 1752065, 107, -45667.25, -7, |
| -347856.5, 356047.5, -1.0, 23.0625 |
| }; |
| |
| const float ft_f[] = { |
| -4578.5, 456.25, 34.03125, 4578.75, |
| 175, 107, -456.25, -7.25, |
| -3478.5, 356.5, -1.0, 23.0625, |
| 0, 456.25, 3, -1, |
| 1384.5, -7, 100, -5786.5, |
| 1752, 0.015625, 0.03125, -248562.75 |
| }; |
| |
| const double fs_d[] = { |
| 0, 456.25, 3, -1, |
| 1384.5, -7.25, 1000000000, -5786.5, |
| 1752, 0.015625, 0.03125, -248562.75, |
| -45786.5, 456, 34.03125, 45786.75, |
| 1752065, 107, -45667.25, -7, |
| -347856.5, 356047.5, -1.0, 23.0625 |
| }; |
| |
| const double ft_d[] = { |
| -45786.5, 456.25, 34.03125, 45786.75, |
| 1752065, 107, -45667.25, -7.25, |
| -347856.5, 356047.5, -1.0, 23.0625, |
| 0, 456.25, 3, -1, |
| 1384.5, -7, 1000000000, -5786.5, |
| 1752, 0.015625, 0.03125, -248562.75 |
| }; |
| |
| /* Conditional macros.*/ |
| #define TESTINST1s(instruction, RDval) \ |
| { \ |
| float outf = 0; \ |
| __asm__ __volatile__( \ |
| ".set noreorder" "\n\t" \ |
| "mov.s $f0, %1" "\n\t" \ |
| "mov.s $f2, %2" "\n\t" \ |
| "c.eq.s $f0, $f2" "\n\t" \ |
| instruction" end"instruction"s"#RDval "\n\t" \ |
| "nop" "\n\t" \ |
| "add.s $f0, $f0, $f2" "\n\t" \ |
| "end"instruction"s"#RDval":" "\n\t" \ |
| "mov.s %0, $f0" "\n\t" \ |
| ".set reorder" "\n\t" \ |
| : "=f" (outf) \ |
| : "f" (fs_f[i]) , "f" (ft_f[i]) \ |
| : "$f0", "$f2" \ |
| ); \ |
| printf("%s, c.eq.s out=%f, fs=%f, ft=%f\n", \ |
| instruction, outf, fs_f[i], ft_f[i]); \ |
| } |
| |
| #define TESTINST1d(instruction, RDval) \ |
| { \ |
| double outd = 0; \ |
| __asm__ __volatile__( \ |
| ".set noreorder" "\n\t" \ |
| "mov.d $f0, %1" "\n\t" \ |
| "mov.d $f2, %2" "\n\t" \ |
| "c.eq.d $f0, $f2" "\n\t" \ |
| instruction" end"instruction"d"#RDval "\n\t" \ |
| "nop" "\n\t" \ |
| "add.d $f0, $f0, $f2" "\n\t" \ |
| "end"instruction"d"#RDval":" "\n\t" \ |
| "mov.d %0, $f0" "\n\t" \ |
| ".set reorder" "\n\t" \ |
| : "=f" (outd) \ |
| : "f" (fs_d[i]) , "f" (ft_d[i]) \ |
| : "$f0", "$f1", "$f2", "$f3" \ |
| ); \ |
| printf("%s, c.eq.d out=%f, fs=%f, ft=%f\n", \ |
| instruction, outd, fs_d[i], ft_d[i]); \ |
| } |
| |
| #define TESTINST2s(instruction, RDval) \ |
| { \ |
| float outf = 0; \ |
| __asm__ __volatile__( \ |
| ".set noreorder" "\n\t" \ |
| "mov.s $f0, %1" "\n\t" \ |
| "mov.s $f2, %2" "\n\t" \ |
| "c.eq.s $f0, $f2" "\n\t" \ |
| instruction" end"instruction"s"#RDval "\n\t" \ |
| "add.s $f0, $f0, $f2" "\n\t" \ |
| "end"instruction"s"#RDval":" "\n\t" \ |
| "mov.s %0, $f0" "\n\t" \ |
| ".set reorder" "\n\t" \ |
| : "=f" (outf) \ |
| : "f" (fs_f[i]) , "f" (ft_f[i]) \ |
| : "$f0", "$f2" \ |
| ); \ |
| printf("%s, c.eq.s out=%f, fs=%f, ft=%f\n", \ |
| instruction, outf, fs_f[i], ft_f[i]); \ |
| } |
| |
| #define TESTINST2d(instruction, RDval) \ |
| { \ |
| double outd = 0; \ |
| __asm__ __volatile__( \ |
| ".set noreorder" "\n\t" \ |
| "mov.d $f0, %1" "\n\t" \ |
| "mov.d $f2, %2" "\n\t" \ |
| "c.eq.d $f0, $f2" "\n\t" \ |
| instruction" end"instruction"d"#RDval "\n\t" \ |
| "add.d $f0, $f0, $f2" "\n\t" \ |
| "end"instruction"d"#RDval":" "\n\t" \ |
| "mov.d %0, $f0" "\n\t" \ |
| ".set reorder" "\n\t" \ |
| : "=f" (outd) \ |
| : "f" (fs_d[i]) , "f" (ft_d[i]) \ |
| : "$f0", "$f1", "$f2", "$f3" \ |
| ); \ |
| printf("%s, c.eq.d out=%f, fs=%f, ft=%f\n", \ |
| instruction, outd, fs_d[i], ft_d[i]); \ |
| } |
| |
| #define TESTINST_CONDs(instruction, RDval) \ |
| { \ |
| float outf = 0; \ |
| __asm__ __volatile__( \ |
| ".set noreorder" "\n\t" \ |
| "mov.s $f0, %1" "\n\t" \ |
| "mov.s $f2, %2" "\n\t" \ |
| instruction" $f0, $f2" "\n\t" \ |
| "bc1f end"instruction"s"#RDval "\n\t" \ |
| "nop" "\n\t" \ |
| "add.s $f0, $f0, $f2" "\n\t" \ |
| "end"instruction"s"#RDval":" "\n\t" \ |
| "mov.s %0, $f0" "\n\t" \ |
| ".set reorder" "\n\t" \ |
| : "=f" (outf) \ |
| : "f" (fs_f[i]) , "f" (ft_f[i]) \ |
| : "$f0", "$f1", "$f2" \ |
| ); \ |
| printf("%s, bc1f out=%f, fs=%f, ft=%f\n", \ |
| instruction, outf, fs_f[i], ft_f[i]); \ |
| } |
| |
| #define TESTINST_CONDd(instruction, RDval) \ |
| { \ |
| double outd = 0; \ |
| __asm__ __volatile__( \ |
| ".set noreorder" "\n\t" \ |
| "mov.d $f0, %1" "\n\t" \ |
| "mov.d $f2, %2" "\n\t" \ |
| instruction" $f0, $f2" "\n\t" \ |
| "bc1f end"instruction"d"#RDval "\n\t" \ |
| "nop" "\n\t" \ |
| "add.d $f0, $f0, $f2" "\n\t" \ |
| "end"instruction"d"#RDval":" "\n\t" \ |
| "mov.d %0, $f0" "\n\t" \ |
| ".set reorder" "\n\t" \ |
| : "=f" (outd) \ |
| : "f" (fs_d[i]) , "f" (ft_d[i]) \ |
| : "$f0", "$f1", "$f2", "$f2" \ |
| ); \ |
| printf("%s, bc1f out=%f, fs=%f, ft=%f\n", \ |
| instruction, outd, fs_d[i], ft_d[i]); \ |
| } |
| |
| int main() |
| { |
| int i = 0; |
| |
| printf("--- BC1F --- if fs != ft then " \ |
| "out = fs else out = fs + ft\n"); |
| for (i = 0; i < MAX_ARR; i++) { |
| TESTINST1s("bc1f", i); |
| TESTINST1d("bc1f", i); |
| } |
| |
| printf("--- BC1T --- if fs == ft then " \ |
| "out = fs else out = fs + ft\n"); |
| for (i = 0; i < MAX_ARR; i++) { |
| TESTINST1s("bc1t", i); |
| TESTINST1d("bc1t", i); |
| } |
| |
| printf("--- BC1FL --- if fs == ft then " \ |
| "out = ft else out = fs + ft\n"); |
| for (i = 0; i < MAX_ARR; i++) { |
| TESTINST2s("bc1fl", i); |
| TESTINST2d("bc1fl", i); |
| } |
| |
| printf("--- BC1TL --- if fs != ft then " \ |
| "out = fs else out = fs + ft\n"); |
| for (i = 0; i < MAX_ARR; i++) { |
| TESTINST2s("bc1tl", i); |
| TESTINST2d("bc1tl", i); |
| } |
| |
| printf("--- C.F.S/D --- if false then " \ |
| "out = fs + ft else out = fs\n"); |
| for (i = 0; i < MAX_ARR; i++) { |
| TESTINST_CONDs("c.f.s", i); |
| TESTINST_CONDd("c.f.d", i); |
| } |
| |
| printf("--- C.UN.S/D --- if unordered(fs, ft) then " \ |
| "out = fs + ft else out = fs\n"); |
| for (i = 0; i < MAX_ARR; i++) { |
| TESTINST_CONDs("c.un.s", i); |
| TESTINST_CONDd("c.un.d", i); |
| } |
| |
| printf("--- C.EQ.S/D --- if fs == ft then " \ |
| "out = fs + ft else out = fs\n"); |
| for (i = 0; i < MAX_ARR; i++) { |
| TESTINST_CONDs("c.eq.s", i); |
| TESTINST_CONDd("c.eq.d", i); |
| } |
| |
| printf("--- C.UEQ.S/D --- if (unordered(fs, ft) or (fs == ft)) then " \ |
| "out = fs + ft else out = fs\n"); |
| for (i = 0; i < MAX_ARR; i++) { |
| TESTINST_CONDs("c.ueq.s", i); |
| TESTINST_CONDd("c.ueq.d", i); |
| } |
| |
| printf("--- C.OLT.S/D --- if (ordered(fs, ft) or (fs < ft)) then " \ |
| "out = fs + ft else out = fs\n"); |
| for (i = 0; i < MAX_ARR; i++) { |
| TESTINST_CONDs("c.olt.s", i); |
| TESTINST_CONDd("c.olt.d", i); |
| } |
| |
| printf("--- C.ULT.S/D --- if (unordered(fs, ft) or (fs < ft)) then " \ |
| "out = fs + ft else out = fs\n"); |
| for (i = 0; i < MAX_ARR; i++) { |
| TESTINST_CONDs("c.ult.s", i); |
| TESTINST_CONDd("c.ult.d", i); |
| } |
| |
| printf("--- C.OLE.S/D --- if (ordered(fs, ft) or (fs <= ft)) then " \ |
| "out = fs + ft else out = fs\n"); |
| for (i = 0; i < MAX_ARR; i++) { |
| TESTINST_CONDs("c.ole.s", i); |
| TESTINST_CONDd("c.ole.d", i); |
| } |
| |
| printf("--- C.ULE.S/D --- if (unordered(fs, ft) or (fs <= ft)) then " \ |
| "out = fs + ft else out = fs\n"); |
| for (i = 0; i < MAX_ARR; i++) { |
| TESTINST_CONDs("c.ule.s", i); |
| TESTINST_CONDd("c.ule.d", i); |
| } |
| |
| printf("--- C.SF.S/D --- if signaling false then " \ |
| "out = fs + ft else out = fs\n"); |
| for (i = 0; i < MAX_ARR; i++) { |
| TESTINST_CONDs("c.sf.s", i); |
| TESTINST_CONDd("c.sf.d", i); |
| } |
| |
| printf("--- C.NGLE.S/D --- if not ((fs > ft) or (fs <= ft)) then " \ |
| "out = fs + ft else out = fs\n"); |
| for (i = 0; i < MAX_ARR; i++) { |
| TESTINST_CONDs("c.ngle.s", i); |
| TESTINST_CONDd("c.ngle.d", i); |
| } |
| |
| printf("--- C.SEQ.S/D --- if signaling equal then " \ |
| "out = fs + ft else out = fs\n"); |
| for (i = 0; i < MAX_ARR; i++) { |
| TESTINST_CONDs("c.seq.s", i); |
| TESTINST_CONDd("c.seq.d", i); |
| } |
| |
| printf("--- C.NGL.S/D --- if not ((fs > ft) or (fs < ft)) then " \ |
| "out = fs + ft else out = fs\n"); |
| for (i = 0; i < MAX_ARR; i++) { |
| TESTINST_CONDs("c.ngl.s", i); |
| TESTINST_CONDd("c.ngl.d", i); |
| } |
| |
| printf("--- C.LT.S/D --- if fs < ft then " \ |
| "out = fs + ft else out = fs\n"); |
| for (i = 0; i < MAX_ARR; i++) { |
| TESTINST_CONDs("c.lt.s", i); |
| TESTINST_CONDd("c.lt.d", i); |
| } |
| |
| printf("--- C.NGE.S/D --- if not (fs >= ft) then " \ |
| "out = fs + ft else out = fs\n"); |
| for (i = 0; i < MAX_ARR; i++) { |
| TESTINST_CONDs("c.nge.s", i); |
| TESTINST_CONDd("c.nge.d", i); |
| } |
| |
| printf("--- C.LE.S/D --- if fs <= ft then " \ |
| "out = fs + ft else out = fs\n"); |
| for (i = 0; i < MAX_ARR; i++) { |
| TESTINST_CONDs("c.le.s", i); |
| TESTINST_CONDd("c.le.d", i); |
| } |
| |
| printf("--- C.NGT.S/D --- if not (fs > ft) then " \ |
| "out = fs + ft else out = fs\n"); |
| for (i = 0; i < MAX_ARR; i++) { |
| TESTINST_CONDs("c.ngt.s", i); |
| TESTINST_CONDd("c.ngt.d", i); |
| } |
| return 0; |
| } |
| |