1 /*******************************************************************************
2 Copyright (c) 2016, Michael Wallner <mike@php.net>.
5 Redistribution and use in source and binary forms, with or without
6 modification, are permitted provided that the following conditions are met:
8 * Redistributions of source code must retain the above copyright notice,
9 this list of conditions and the following disclaimer.
10 * Redistributions in binary form must reproduce the above copyright
11 notice, this list of conditions and the following disclaimer in the
12 documentation and/or other materials provided with the distribution.
14 THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
15 AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
17 DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE
18 FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
20 SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
21 CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
22 OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
23 OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
24 *******************************************************************************/
26 #include "php_psi_stdinc.h"
31 static inline token_t
psi_calc_cmp_eq(token_t t1
, impl_val
*v1
, token_t t2
, impl_val
*v2
, impl_val
*res
)
37 res
->u8
= v1
->i8
== v2
->i8
;
40 res
->u8
= v1
->i8
== v2
->u8
;
43 res
->u8
= v1
->i8
== v2
->i16
;
46 res
->u8
= v1
->i8
== v2
->u16
;
49 res
->u8
= v1
->i8
== v2
->i32
;
52 res
->u8
= v1
->i8
== v2
->u32
;
55 res
->u8
= v1
->i8
== v2
->i64
;
58 res
->u8
= v1
->i8
== v2
->u64
;
62 res
->u8
= v1
->i8
== v2
->i128
;
68 res
->u8
= v1
->i8
== v2
->u128
;
73 res
->u8
= v1
->i8
== v2
->fval
;
76 res
->u8
= v1
->i8
== v2
->dval
;
79 case PSI_T_LONG_DOUBLE
:
80 res
->u8
= v1
->i8
== v2
->ldval
;
92 res
->u8
= v1
->u8
== v2
->i8
;
95 res
->u8
= v1
->u8
== v2
->u8
;
98 res
->u8
= v1
->u8
== v2
->i16
;
101 res
->u8
= v1
->u8
== v2
->u16
;
104 res
->u8
= v1
->u8
== v2
->i32
;
107 res
->u8
= v1
->u8
== v2
->u32
;
110 res
->u8
= v1
->u8
== v2
->i64
;
113 res
->u8
= v1
->u8
== v2
->u64
;
117 res
->u8
= v1
->u8
== v2
->i128
;
123 res
->u8
= v1
->u8
== v2
->u128
;
128 res
->u8
= v1
->u8
== v2
->fval
;
131 res
->u8
= v1
->u8
== v2
->dval
;
133 # if HAVE_LONG_DOUBLE
134 case PSI_T_LONG_DOUBLE
:
135 res
->u8
= v1
->u8
== v2
->ldval
;
147 res
->u8
= v1
->i16
== v2
->i8
;
150 res
->u8
= v1
->i16
== v2
->u8
;
153 res
->u8
= v1
->i16
== v2
->i16
;
156 res
->u8
= v1
->i16
== v2
->u16
;
159 res
->u8
= v1
->i16
== v2
->i32
;
162 res
->u8
= v1
->i16
== v2
->u32
;
165 res
->u8
= v1
->i16
== v2
->i64
;
168 res
->u8
= v1
->i16
== v2
->u64
;
172 res
->u8
= v1
->i16
== v2
->i128
;
178 res
->u8
= v1
->i16
== v2
->u128
;
183 res
->u8
= v1
->i16
== v2
->fval
;
186 res
->u8
= v1
->i16
== v2
->dval
;
188 # if HAVE_LONG_DOUBLE
189 case PSI_T_LONG_DOUBLE
:
190 res
->u8
= v1
->i16
== v2
->ldval
;
202 res
->u8
= v1
->u16
== v2
->i8
;
205 res
->u8
= v1
->u16
== v2
->u8
;
208 res
->u8
= v1
->u16
== v2
->i16
;
211 res
->u8
= v1
->u16
== v2
->u16
;
214 res
->u8
= v1
->u16
== v2
->i32
;
217 res
->u8
= v1
->u16
== v2
->u32
;
220 res
->u8
= v1
->u16
== v2
->i64
;
223 res
->u8
= v1
->u16
== v2
->u64
;
227 res
->u8
= v1
->u16
== v2
->i128
;
233 res
->u8
= v1
->u16
== v2
->u128
;
238 res
->u8
= v1
->u16
== v2
->fval
;
241 res
->u8
= v1
->u16
== v2
->dval
;
243 # if HAVE_LONG_DOUBLE
244 case PSI_T_LONG_DOUBLE
:
245 res
->u8
= v1
->u16
== v2
->ldval
;
257 res
->u8
= v1
->i32
== v2
->i8
;
260 res
->u8
= v1
->i32
== v2
->u8
;
263 res
->u8
= v1
->i32
== v2
->i16
;
266 res
->u8
= v1
->i32
== v2
->u16
;
269 res
->u8
= v1
->i32
== v2
->i32
;
272 res
->u8
= v1
->i32
== v2
->u32
;
275 res
->u8
= v1
->i32
== v2
->i64
;
278 res
->u8
= v1
->i32
== v2
->u64
;
282 res
->u8
= v1
->i32
== v2
->i128
;
288 res
->u8
= v1
->i32
== v2
->u128
;
293 res
->u8
= v1
->i32
== v2
->fval
;
296 res
->u8
= v1
->i32
== v2
->dval
;
298 # if HAVE_LONG_DOUBLE
299 case PSI_T_LONG_DOUBLE
:
300 res
->u8
= v1
->i32
== v2
->ldval
;
312 res
->u8
= v1
->u32
== v2
->i8
;
315 res
->u8
= v1
->u32
== v2
->u8
;
318 res
->u8
= v1
->u32
== v2
->i16
;
321 res
->u8
= v1
->u32
== v2
->u16
;
324 res
->u8
= v1
->u32
== v2
->i32
;
327 res
->u8
= v1
->u32
== v2
->u32
;
330 res
->u8
= v1
->u32
== v2
->i64
;
333 res
->u8
= v1
->u32
== v2
->u64
;
337 res
->u8
= v1
->u32
== v2
->i128
;
343 res
->u8
= v1
->u32
== v2
->u128
;
348 res
->u8
= v1
->u32
== v2
->fval
;
351 res
->u8
= v1
->u32
== v2
->dval
;
353 # if HAVE_LONG_DOUBLE
354 case PSI_T_LONG_DOUBLE
:
355 res
->u8
= v1
->u32
== v2
->ldval
;
367 res
->u8
= v1
->i64
== v2
->i8
;
370 res
->u8
= v1
->i64
== v2
->u8
;
373 res
->u8
= v1
->i64
== v2
->i16
;
376 res
->u8
= v1
->i64
== v2
->u16
;
379 res
->u8
= v1
->i64
== v2
->i32
;
382 res
->u8
= v1
->i64
== v2
->u32
;
385 res
->u8
= v1
->i64
== v2
->i64
;
388 res
->u8
= v1
->i64
== v2
->u64
;
392 res
->u8
= v1
->i64
== v2
->i128
;
398 res
->u8
= v1
->i64
== v2
->u128
;
403 res
->u8
= v1
->i64
== v2
->fval
;
406 res
->u8
= v1
->i64
== v2
->dval
;
408 # if HAVE_LONG_DOUBLE
409 case PSI_T_LONG_DOUBLE
:
410 res
->u8
= v1
->i64
== v2
->ldval
;
422 res
->u8
= v1
->u64
== v2
->i8
;
425 res
->u8
= v1
->u64
== v2
->u8
;
428 res
->u8
= v1
->u64
== v2
->i16
;
431 res
->u8
= v1
->u64
== v2
->u16
;
434 res
->u8
= v1
->u64
== v2
->i32
;
437 res
->u8
= v1
->u64
== v2
->u32
;
440 res
->u8
= v1
->u64
== v2
->i64
;
443 res
->u8
= v1
->u64
== v2
->u64
;
447 res
->u8
= v1
->u64
== v2
->i128
;
453 res
->u8
= v1
->u64
== v2
->u128
;
458 res
->u8
= v1
->u64
== v2
->fval
;
461 res
->u8
= v1
->u64
== v2
->dval
;
463 # if HAVE_LONG_DOUBLE
464 case PSI_T_LONG_DOUBLE
:
465 res
->u8
= v1
->u64
== v2
->ldval
;
478 res
->u8
= v1
->i128
== v2
->i8
;
481 res
->u8
= v1
->i128
== v2
->u8
;
484 res
->u8
= v1
->i128
== v2
->i16
;
487 res
->u8
= v1
->i128
== v2
->u16
;
490 res
->u8
= v1
->i128
== v2
->i32
;
493 res
->u8
= v1
->i128
== v2
->u32
;
496 res
->u8
= v1
->i128
== v2
->i64
;
499 res
->u8
= v1
->i128
== v2
->u64
;
503 res
->u8
= v1
->i128
== v2
->i128
;
509 res
->u8
= v1
->i128
== v2
->u128
;
514 res
->u8
= v1
->i128
== v2
->fval
;
517 res
->u8
= v1
->i128
== v2
->dval
;
519 # if HAVE_LONG_DOUBLE
520 case PSI_T_LONG_DOUBLE
:
521 res
->u8
= v1
->i128
== v2
->ldval
;
536 res
->u8
= v1
->u128
== v2
->i8
;
539 res
->u8
= v1
->u128
== v2
->u8
;
542 res
->u8
= v1
->u128
== v2
->i16
;
545 res
->u8
= v1
->u128
== v2
->u16
;
548 res
->u8
= v1
->u128
== v2
->i32
;
551 res
->u8
= v1
->u128
== v2
->u32
;
554 res
->u8
= v1
->u128
== v2
->i64
;
557 res
->u8
= v1
->u128
== v2
->u64
;
561 res
->u8
= v1
->u128
== v2
->i128
;
567 res
->u8
= v1
->u128
== v2
->u128
;
572 res
->u8
= v1
->u128
== v2
->fval
;
575 res
->u8
= v1
->u128
== v2
->dval
;
577 # if HAVE_LONG_DOUBLE
578 case PSI_T_LONG_DOUBLE
:
579 res
->u8
= v1
->u128
== v2
->ldval
;
593 res
->u8
= v1
->fval
== v2
->i8
;
596 res
->u8
= v1
->fval
== v2
->u8
;
599 res
->u8
= v1
->fval
== v2
->i16
;
602 res
->u8
= v1
->fval
== v2
->u16
;
605 res
->u8
= v1
->fval
== v2
->i32
;
608 res
->u8
= v1
->fval
== v2
->u32
;
611 res
->u8
= v1
->fval
== v2
->i64
;
614 res
->u8
= v1
->fval
== v2
->u64
;
618 res
->u8
= v1
->fval
== v2
->i128
;
624 res
->u8
= v1
->fval
== v2
->u128
;
629 res
->u8
= v1
->fval
== v2
->fval
;
632 res
->u8
= v1
->fval
== v2
->dval
;
634 # if HAVE_LONG_DOUBLE
635 case PSI_T_LONG_DOUBLE
:
636 res
->u8
= v1
->fval
== v2
->ldval
;
648 res
->u8
= v1
->dval
== v2
->i8
;
651 res
->u8
= v1
->dval
== v2
->u8
;
654 res
->u8
= v1
->dval
== v2
->i16
;
657 res
->u8
= v1
->dval
== v2
->u16
;
660 res
->u8
= v1
->dval
== v2
->i32
;
663 res
->u8
= v1
->dval
== v2
->u32
;
666 res
->u8
= v1
->dval
== v2
->i64
;
669 res
->u8
= v1
->dval
== v2
->u64
;
673 res
->u8
= v1
->dval
== v2
->i128
;
679 res
->u8
= v1
->dval
== v2
->u128
;
684 res
->u8
= v1
->dval
== v2
->fval
;
687 res
->u8
= v1
->dval
== v2
->dval
;
689 # if HAVE_LONG_DOUBLE
690 case PSI_T_LONG_DOUBLE
:
691 res
->u8
= v1
->dval
== v2
->ldval
;
701 case PSI_T_LONG_DOUBLE
:
704 res
->u8
= v1
->ldval
== v2
->i8
;
707 res
->u8
= v1
->ldval
== v2
->u8
;
710 res
->u8
= v1
->ldval
== v2
->i16
;
713 res
->u8
= v1
->ldval
== v2
->u16
;
716 res
->u8
= v1
->ldval
== v2
->i32
;
719 res
->u8
= v1
->ldval
== v2
->u32
;
722 res
->u8
= v1
->ldval
== v2
->i64
;
725 res
->u8
= v1
->ldval
== v2
->u64
;
729 res
->u8
= v1
->ldval
== v2
->i128
;
735 res
->u8
= v1
->ldval
== v2
->u128
;
740 res
->u8
= v1
->ldval
== v2
->fval
;
743 res
->u8
= v1
->ldval
== v2
->dval
;
745 # if HAVE_LONG_DOUBLE
746 case PSI_T_LONG_DOUBLE
:
747 res
->u8
= v1
->ldval
== v2
->ldval
;
765 static inline token_t
psi_calc_cmp_ne(token_t t1
, impl_val
*v1
, token_t t2
, impl_val
*v2
, impl_val
*res
)
771 res
->u8
= v1
->i8
!= v2
->i8
;
774 res
->u8
= v1
->i8
!= v2
->u8
;
777 res
->u8
= v1
->i8
!= v2
->i16
;
780 res
->u8
= v1
->i8
!= v2
->u16
;
783 res
->u8
= v1
->i8
!= v2
->i32
;
786 res
->u8
= v1
->i8
!= v2
->u32
;
789 res
->u8
= v1
->i8
!= v2
->i64
;
792 res
->u8
= v1
->i8
!= v2
->u64
;
796 res
->u8
= v1
->i8
!= v2
->i128
;
802 res
->u8
= v1
->i8
!= v2
->u128
;
807 res
->u8
= v1
->i8
!= v2
->fval
;
810 res
->u8
= v1
->i8
!= v2
->dval
;
812 # if HAVE_LONG_DOUBLE
813 case PSI_T_LONG_DOUBLE
:
814 res
->u8
= v1
->i8
!= v2
->ldval
;
826 res
->u8
= v1
->u8
!= v2
->i8
;
829 res
->u8
= v1
->u8
!= v2
->u8
;
832 res
->u8
= v1
->u8
!= v2
->i16
;
835 res
->u8
= v1
->u8
!= v2
->u16
;
838 res
->u8
= v1
->u8
!= v2
->i32
;
841 res
->u8
= v1
->u8
!= v2
->u32
;
844 res
->u8
= v1
->u8
!= v2
->i64
;
847 res
->u8
= v1
->u8
!= v2
->u64
;
851 res
->u8
= v1
->u8
!= v2
->i128
;
857 res
->u8
= v1
->u8
!= v2
->u128
;
862 res
->u8
= v1
->u8
!= v2
->fval
;
865 res
->u8
= v1
->u8
!= v2
->dval
;
867 # if HAVE_LONG_DOUBLE
868 case PSI_T_LONG_DOUBLE
:
869 res
->u8
= v1
->u8
!= v2
->ldval
;
881 res
->u8
= v1
->i16
!= v2
->i8
;
884 res
->u8
= v1
->i16
!= v2
->u8
;
887 res
->u8
= v1
->i16
!= v2
->i16
;
890 res
->u8
= v1
->i16
!= v2
->u16
;
893 res
->u8
= v1
->i16
!= v2
->i32
;
896 res
->u8
= v1
->i16
!= v2
->u32
;
899 res
->u8
= v1
->i16
!= v2
->i64
;
902 res
->u8
= v1
->i16
!= v2
->u64
;
906 res
->u8
= v1
->i16
!= v2
->i128
;
912 res
->u8
= v1
->i16
!= v2
->u128
;
917 res
->u8
= v1
->i16
!= v2
->fval
;
920 res
->u8
= v1
->i16
!= v2
->dval
;
922 # if HAVE_LONG_DOUBLE
923 case PSI_T_LONG_DOUBLE
:
924 res
->u8
= v1
->i16
!= v2
->ldval
;
936 res
->u8
= v1
->u16
!= v2
->i8
;
939 res
->u8
= v1
->u16
!= v2
->u8
;
942 res
->u8
= v1
->u16
!= v2
->i16
;
945 res
->u8
= v1
->u16
!= v2
->u16
;
948 res
->u8
= v1
->u16
!= v2
->i32
;
951 res
->u8
= v1
->u16
!= v2
->u32
;
954 res
->u8
= v1
->u16
!= v2
->i64
;
957 res
->u8
= v1
->u16
!= v2
->u64
;
961 res
->u8
= v1
->u16
!= v2
->i128
;
967 res
->u8
= v1
->u16
!= v2
->u128
;
972 res
->u8
= v1
->u16
!= v2
->fval
;
975 res
->u8
= v1
->u16
!= v2
->dval
;
977 # if HAVE_LONG_DOUBLE
978 case PSI_T_LONG_DOUBLE
:
979 res
->u8
= v1
->u16
!= v2
->ldval
;
991 res
->u8
= v1
->i32
!= v2
->i8
;
994 res
->u8
= v1
->i32
!= v2
->u8
;
997 res
->u8
= v1
->i32
!= v2
->i16
;
1000 res
->u8
= v1
->i32
!= v2
->u16
;
1003 res
->u8
= v1
->i32
!= v2
->i32
;
1006 res
->u8
= v1
->i32
!= v2
->u32
;
1009 res
->u8
= v1
->i32
!= v2
->i64
;
1012 res
->u8
= v1
->i32
!= v2
->u64
;
1016 res
->u8
= v1
->i32
!= v2
->i128
;
1022 res
->u8
= v1
->i32
!= v2
->u128
;
1027 res
->u8
= v1
->i32
!= v2
->fval
;
1030 res
->u8
= v1
->i32
!= v2
->dval
;
1032 # if HAVE_LONG_DOUBLE
1033 case PSI_T_LONG_DOUBLE
:
1034 res
->u8
= v1
->i32
!= v2
->ldval
;
1046 res
->u8
= v1
->u32
!= v2
->i8
;
1049 res
->u8
= v1
->u32
!= v2
->u8
;
1052 res
->u8
= v1
->u32
!= v2
->i16
;
1055 res
->u8
= v1
->u32
!= v2
->u16
;
1058 res
->u8
= v1
->u32
!= v2
->i32
;
1061 res
->u8
= v1
->u32
!= v2
->u32
;
1064 res
->u8
= v1
->u32
!= v2
->i64
;
1067 res
->u8
= v1
->u32
!= v2
->u64
;
1071 res
->u8
= v1
->u32
!= v2
->i128
;
1077 res
->u8
= v1
->u32
!= v2
->u128
;
1082 res
->u8
= v1
->u32
!= v2
->fval
;
1085 res
->u8
= v1
->u32
!= v2
->dval
;
1087 # if HAVE_LONG_DOUBLE
1088 case PSI_T_LONG_DOUBLE
:
1089 res
->u8
= v1
->u32
!= v2
->ldval
;
1101 res
->u8
= v1
->i64
!= v2
->i8
;
1104 res
->u8
= v1
->i64
!= v2
->u8
;
1107 res
->u8
= v1
->i64
!= v2
->i16
;
1110 res
->u8
= v1
->i64
!= v2
->u16
;
1113 res
->u8
= v1
->i64
!= v2
->i32
;
1116 res
->u8
= v1
->i64
!= v2
->u32
;
1119 res
->u8
= v1
->i64
!= v2
->i64
;
1122 res
->u8
= v1
->i64
!= v2
->u64
;
1126 res
->u8
= v1
->i64
!= v2
->i128
;
1132 res
->u8
= v1
->i64
!= v2
->u128
;
1137 res
->u8
= v1
->i64
!= v2
->fval
;
1140 res
->u8
= v1
->i64
!= v2
->dval
;
1142 # if HAVE_LONG_DOUBLE
1143 case PSI_T_LONG_DOUBLE
:
1144 res
->u8
= v1
->i64
!= v2
->ldval
;
1156 res
->u8
= v1
->u64
!= v2
->i8
;
1159 res
->u8
= v1
->u64
!= v2
->u8
;
1162 res
->u8
= v1
->u64
!= v2
->i16
;
1165 res
->u8
= v1
->u64
!= v2
->u16
;
1168 res
->u8
= v1
->u64
!= v2
->i32
;
1171 res
->u8
= v1
->u64
!= v2
->u32
;
1174 res
->u8
= v1
->u64
!= v2
->i64
;
1177 res
->u8
= v1
->u64
!= v2
->u64
;
1181 res
->u8
= v1
->u64
!= v2
->i128
;
1187 res
->u8
= v1
->u64
!= v2
->u128
;
1192 res
->u8
= v1
->u64
!= v2
->fval
;
1195 res
->u8
= v1
->u64
!= v2
->dval
;
1197 # if HAVE_LONG_DOUBLE
1198 case PSI_T_LONG_DOUBLE
:
1199 res
->u8
= v1
->u64
!= v2
->ldval
;
1212 res
->u8
= v1
->i128
!= v2
->i8
;
1215 res
->u8
= v1
->i128
!= v2
->u8
;
1218 res
->u8
= v1
->i128
!= v2
->i16
;
1221 res
->u8
= v1
->i128
!= v2
->u16
;
1224 res
->u8
= v1
->i128
!= v2
->i32
;
1227 res
->u8
= v1
->i128
!= v2
->u32
;
1230 res
->u8
= v1
->i128
!= v2
->i64
;
1233 res
->u8
= v1
->i128
!= v2
->u64
;
1237 res
->u8
= v1
->i128
!= v2
->i128
;
1243 res
->u8
= v1
->i128
!= v2
->u128
;
1248 res
->u8
= v1
->i128
!= v2
->fval
;
1251 res
->u8
= v1
->i128
!= v2
->dval
;
1253 # if HAVE_LONG_DOUBLE
1254 case PSI_T_LONG_DOUBLE
:
1255 res
->u8
= v1
->i128
!= v2
->ldval
;
1270 res
->u8
= v1
->u128
!= v2
->i8
;
1273 res
->u8
= v1
->u128
!= v2
->u8
;
1276 res
->u8
= v1
->u128
!= v2
->i16
;
1279 res
->u8
= v1
->u128
!= v2
->u16
;
1282 res
->u8
= v1
->u128
!= v2
->i32
;
1285 res
->u8
= v1
->u128
!= v2
->u32
;
1288 res
->u8
= v1
->u128
!= v2
->i64
;
1291 res
->u8
= v1
->u128
!= v2
->u64
;
1295 res
->u8
= v1
->u128
!= v2
->i128
;
1301 res
->u8
= v1
->u128
!= v2
->u128
;
1306 res
->u8
= v1
->u128
!= v2
->fval
;
1309 res
->u8
= v1
->u128
!= v2
->dval
;
1311 # if HAVE_LONG_DOUBLE
1312 case PSI_T_LONG_DOUBLE
:
1313 res
->u8
= v1
->u128
!= v2
->ldval
;
1327 res
->u8
= v1
->fval
!= v2
->i8
;
1330 res
->u8
= v1
->fval
!= v2
->u8
;
1333 res
->u8
= v1
->fval
!= v2
->i16
;
1336 res
->u8
= v1
->fval
!= v2
->u16
;
1339 res
->u8
= v1
->fval
!= v2
->i32
;
1342 res
->u8
= v1
->fval
!= v2
->u32
;
1345 res
->u8
= v1
->fval
!= v2
->i64
;
1348 res
->u8
= v1
->fval
!= v2
->u64
;
1352 res
->u8
= v1
->fval
!= v2
->i128
;
1358 res
->u8
= v1
->fval
!= v2
->u128
;
1363 res
->u8
= v1
->fval
!= v2
->fval
;
1366 res
->u8
= v1
->fval
!= v2
->dval
;
1368 # if HAVE_LONG_DOUBLE
1369 case PSI_T_LONG_DOUBLE
:
1370 res
->u8
= v1
->fval
!= v2
->ldval
;
1382 res
->u8
= v1
->dval
!= v2
->i8
;
1385 res
->u8
= v1
->dval
!= v2
->u8
;
1388 res
->u8
= v1
->dval
!= v2
->i16
;
1391 res
->u8
= v1
->dval
!= v2
->u16
;
1394 res
->u8
= v1
->dval
!= v2
->i32
;
1397 res
->u8
= v1
->dval
!= v2
->u32
;
1400 res
->u8
= v1
->dval
!= v2
->i64
;
1403 res
->u8
= v1
->dval
!= v2
->u64
;
1407 res
->u8
= v1
->dval
!= v2
->i128
;
1413 res
->u8
= v1
->dval
!= v2
->u128
;
1418 res
->u8
= v1
->dval
!= v2
->fval
;
1421 res
->u8
= v1
->dval
!= v2
->dval
;
1423 # if HAVE_LONG_DOUBLE
1424 case PSI_T_LONG_DOUBLE
:
1425 res
->u8
= v1
->dval
!= v2
->ldval
;
1434 #if HAVE_LONG_DOUBLE
1435 case PSI_T_LONG_DOUBLE
:
1438 res
->u8
= v1
->ldval
!= v2
->i8
;
1441 res
->u8
= v1
->ldval
!= v2
->u8
;
1444 res
->u8
= v1
->ldval
!= v2
->i16
;
1447 res
->u8
= v1
->ldval
!= v2
->u16
;
1450 res
->u8
= v1
->ldval
!= v2
->i32
;
1453 res
->u8
= v1
->ldval
!= v2
->u32
;
1456 res
->u8
= v1
->ldval
!= v2
->i64
;
1459 res
->u8
= v1
->ldval
!= v2
->u64
;
1463 res
->u8
= v1
->ldval
!= v2
->i128
;
1469 res
->u8
= v1
->ldval
!= v2
->u128
;
1474 res
->u8
= v1
->ldval
!= v2
->fval
;
1477 res
->u8
= v1
->ldval
!= v2
->dval
;
1479 # if HAVE_LONG_DOUBLE
1480 case PSI_T_LONG_DOUBLE
:
1481 res
->u8
= v1
->ldval
!= v2
->ldval
;
1499 static inline token_t
psi_calc_cmp_lt(token_t t1
, impl_val
*v1
, token_t t2
, impl_val
*v2
, impl_val
*res
)
1505 res
->u8
= v1
->i8
< v2
->i8
;
1508 res
->u8
= v1
->i8
< v2
->u8
;
1511 res
->u8
= v1
->i8
< v2
->i16
;
1514 res
->u8
= v1
->i8
< v2
->u16
;
1517 res
->u8
= v1
->i8
< v2
->i32
;
1520 res
->u8
= v1
->i8
< v2
->u32
;
1523 res
->u8
= v1
->i8
< v2
->i64
;
1526 res
->u8
= v1
->i8
< v2
->u64
;
1530 res
->u8
= v1
->i8
< v2
->i128
;
1536 res
->u8
= v1
->i8
< v2
->u128
;
1541 res
->u8
= v1
->i8
< v2
->fval
;
1544 res
->u8
= v1
->i8
< v2
->dval
;
1546 # if HAVE_LONG_DOUBLE
1547 case PSI_T_LONG_DOUBLE
:
1548 res
->u8
= v1
->i8
< v2
->ldval
;
1560 res
->u8
= v1
->u8
< v2
->i8
;
1563 res
->u8
= v1
->u8
< v2
->u8
;
1566 res
->u8
= v1
->u8
< v2
->i16
;
1569 res
->u8
= v1
->u8
< v2
->u16
;
1572 res
->u8
= v1
->u8
< v2
->i32
;
1575 res
->u8
= v1
->u8
< v2
->u32
;
1578 res
->u8
= v1
->u8
< v2
->i64
;
1581 res
->u8
= v1
->u8
< v2
->u64
;
1585 res
->u8
= v1
->u8
< v2
->i128
;
1591 res
->u8
= v1
->u8
< v2
->u128
;
1596 res
->u8
= v1
->u8
< v2
->fval
;
1599 res
->u8
= v1
->u8
< v2
->dval
;
1601 # if HAVE_LONG_DOUBLE
1602 case PSI_T_LONG_DOUBLE
:
1603 res
->u8
= v1
->u8
< v2
->ldval
;
1615 res
->u8
= v1
->i16
< v2
->i8
;
1618 res
->u8
= v1
->i16
< v2
->u8
;
1621 res
->u8
= v1
->i16
< v2
->i16
;
1624 res
->u8
= v1
->i16
< v2
->u16
;
1627 res
->u8
= v1
->i16
< v2
->i32
;
1630 res
->u8
= v1
->i16
< v2
->u32
;
1633 res
->u8
= v1
->i16
< v2
->i64
;
1636 res
->u8
= v1
->i16
< v2
->u64
;
1640 res
->u8
= v1
->i16
< v2
->i128
;
1646 res
->u8
= v1
->i16
< v2
->u128
;
1651 res
->u8
= v1
->i16
< v2
->fval
;
1654 res
->u8
= v1
->i16
< v2
->dval
;
1656 # if HAVE_LONG_DOUBLE
1657 case PSI_T_LONG_DOUBLE
:
1658 res
->u8
= v1
->i16
< v2
->ldval
;
1670 res
->u8
= v1
->u16
< v2
->i8
;
1673 res
->u8
= v1
->u16
< v2
->u8
;
1676 res
->u8
= v1
->u16
< v2
->i16
;
1679 res
->u8
= v1
->u16
< v2
->u16
;
1682 res
->u8
= v1
->u16
< v2
->i32
;
1685 res
->u8
= v1
->u16
< v2
->u32
;
1688 res
->u8
= v1
->u16
< v2
->i64
;
1691 res
->u8
= v1
->u16
< v2
->u64
;
1695 res
->u8
= v1
->u16
< v2
->i128
;
1701 res
->u8
= v1
->u16
< v2
->u128
;
1706 res
->u8
= v1
->u16
< v2
->fval
;
1709 res
->u8
= v1
->u16
< v2
->dval
;
1711 # if HAVE_LONG_DOUBLE
1712 case PSI_T_LONG_DOUBLE
:
1713 res
->u8
= v1
->u16
< v2
->ldval
;
1725 res
->u8
= v1
->i32
< v2
->i8
;
1728 res
->u8
= v1
->i32
< v2
->u8
;
1731 res
->u8
= v1
->i32
< v2
->i16
;
1734 res
->u8
= v1
->i32
< v2
->u16
;
1737 res
->u8
= v1
->i32
< v2
->i32
;
1740 res
->u8
= v1
->i32
< v2
->u32
;
1743 res
->u8
= v1
->i32
< v2
->i64
;
1746 res
->u8
= v1
->i32
< v2
->u64
;
1750 res
->u8
= v1
->i32
< v2
->i128
;
1756 res
->u8
= v1
->i32
< v2
->u128
;
1761 res
->u8
= v1
->i32
< v2
->fval
;
1764 res
->u8
= v1
->i32
< v2
->dval
;
1766 # if HAVE_LONG_DOUBLE
1767 case PSI_T_LONG_DOUBLE
:
1768 res
->u8
= v1
->i32
< v2
->ldval
;
1780 res
->u8
= v1
->u32
< v2
->i8
;
1783 res
->u8
= v1
->u32
< v2
->u8
;
1786 res
->u8
= v1
->u32
< v2
->i16
;
1789 res
->u8
= v1
->u32
< v2
->u16
;
1792 res
->u8
= v1
->u32
< v2
->i32
;
1795 res
->u8
= v1
->u32
< v2
->u32
;
1798 res
->u8
= v1
->u32
< v2
->i64
;
1801 res
->u8
= v1
->u32
< v2
->u64
;
1805 res
->u8
= v1
->u32
< v2
->i128
;
1811 res
->u8
= v1
->u32
< v2
->u128
;
1816 res
->u8
= v1
->u32
< v2
->fval
;
1819 res
->u8
= v1
->u32
< v2
->dval
;
1821 # if HAVE_LONG_DOUBLE
1822 case PSI_T_LONG_DOUBLE
:
1823 res
->u8
= v1
->u32
< v2
->ldval
;
1835 res
->u8
= v1
->i64
< v2
->i8
;
1838 res
->u8
= v1
->i64
< v2
->u8
;
1841 res
->u8
= v1
->i64
< v2
->i16
;
1844 res
->u8
= v1
->i64
< v2
->u16
;
1847 res
->u8
= v1
->i64
< v2
->i32
;
1850 res
->u8
= v1
->i64
< v2
->u32
;
1853 res
->u8
= v1
->i64
< v2
->i64
;
1856 res
->u8
= v1
->i64
< v2
->u64
;
1860 res
->u8
= v1
->i64
< v2
->i128
;
1866 res
->u8
= v1
->i64
< v2
->u128
;
1871 res
->u8
= v1
->i64
< v2
->fval
;
1874 res
->u8
= v1
->i64
< v2
->dval
;
1876 # if HAVE_LONG_DOUBLE
1877 case PSI_T_LONG_DOUBLE
:
1878 res
->u8
= v1
->i64
< v2
->ldval
;
1890 res
->u8
= v1
->u64
< v2
->i8
;
1893 res
->u8
= v1
->u64
< v2
->u8
;
1896 res
->u8
= v1
->u64
< v2
->i16
;
1899 res
->u8
= v1
->u64
< v2
->u16
;
1902 res
->u8
= v1
->u64
< v2
->i32
;
1905 res
->u8
= v1
->u64
< v2
->u32
;
1908 res
->u8
= v1
->u64
< v2
->i64
;
1911 res
->u8
= v1
->u64
< v2
->u64
;
1915 res
->u8
= v1
->u64
< v2
->i128
;
1921 res
->u8
= v1
->u64
< v2
->u128
;
1926 res
->u8
= v1
->u64
< v2
->fval
;
1929 res
->u8
= v1
->u64
< v2
->dval
;
1931 # if HAVE_LONG_DOUBLE
1932 case PSI_T_LONG_DOUBLE
:
1933 res
->u8
= v1
->u64
< v2
->ldval
;
1946 res
->u8
= v1
->i128
< v2
->i8
;
1949 res
->u8
= v1
->i128
< v2
->u8
;
1952 res
->u8
= v1
->i128
< v2
->i16
;
1955 res
->u8
= v1
->i128
< v2
->u16
;
1958 res
->u8
= v1
->i128
< v2
->i32
;
1961 res
->u8
= v1
->i128
< v2
->u32
;
1964 res
->u8
= v1
->i128
< v2
->i64
;
1967 res
->u8
= v1
->i128
< v2
->u64
;
1971 res
->u8
= v1
->i128
< v2
->i128
;
1977 res
->u8
= v1
->i128
< v2
->u128
;
1982 res
->u8
= v1
->i128
< v2
->fval
;
1985 res
->u8
= v1
->i128
< v2
->dval
;
1987 # if HAVE_LONG_DOUBLE
1988 case PSI_T_LONG_DOUBLE
:
1989 res
->u8
= v1
->i128
< v2
->ldval
;
2004 res
->u8
= v1
->u128
< v2
->i8
;
2007 res
->u8
= v1
->u128
< v2
->u8
;
2010 res
->u8
= v1
->u128
< v2
->i16
;
2013 res
->u8
= v1
->u128
< v2
->u16
;
2016 res
->u8
= v1
->u128
< v2
->i32
;
2019 res
->u8
= v1
->u128
< v2
->u32
;
2022 res
->u8
= v1
->u128
< v2
->i64
;
2025 res
->u8
= v1
->u128
< v2
->u64
;
2029 res
->u8
= v1
->u128
< v2
->i128
;
2035 res
->u8
= v1
->u128
< v2
->u128
;
2040 res
->u8
= v1
->u128
< v2
->fval
;
2043 res
->u8
= v1
->u128
< v2
->dval
;
2045 # if HAVE_LONG_DOUBLE
2046 case PSI_T_LONG_DOUBLE
:
2047 res
->u8
= v1
->u128
< v2
->ldval
;
2061 res
->u8
= v1
->fval
< v2
->i8
;
2064 res
->u8
= v1
->fval
< v2
->u8
;
2067 res
->u8
= v1
->fval
< v2
->i16
;
2070 res
->u8
= v1
->fval
< v2
->u16
;
2073 res
->u8
= v1
->fval
< v2
->i32
;
2076 res
->u8
= v1
->fval
< v2
->u32
;
2079 res
->u8
= v1
->fval
< v2
->i64
;
2082 res
->u8
= v1
->fval
< v2
->u64
;
2086 res
->u8
= v1
->fval
< v2
->i128
;
2092 res
->u8
= v1
->fval
< v2
->u128
;
2097 res
->u8
= v1
->fval
< v2
->fval
;
2100 res
->u8
= v1
->fval
< v2
->dval
;
2102 # if HAVE_LONG_DOUBLE
2103 case PSI_T_LONG_DOUBLE
:
2104 res
->u8
= v1
->fval
< v2
->ldval
;
2116 res
->u8
= v1
->dval
< v2
->i8
;
2119 res
->u8
= v1
->dval
< v2
->u8
;
2122 res
->u8
= v1
->dval
< v2
->i16
;
2125 res
->u8
= v1
->dval
< v2
->u16
;
2128 res
->u8
= v1
->dval
< v2
->i32
;
2131 res
->u8
= v1
->dval
< v2
->u32
;
2134 res
->u8
= v1
->dval
< v2
->i64
;
2137 res
->u8
= v1
->dval
< v2
->u64
;
2141 res
->u8
= v1
->dval
< v2
->i128
;
2147 res
->u8
= v1
->dval
< v2
->u128
;
2152 res
->u8
= v1
->dval
< v2
->fval
;
2155 res
->u8
= v1
->dval
< v2
->dval
;
2157 # if HAVE_LONG_DOUBLE
2158 case PSI_T_LONG_DOUBLE
:
2159 res
->u8
= v1
->dval
< v2
->ldval
;
2168 #if HAVE_LONG_DOUBLE
2169 case PSI_T_LONG_DOUBLE
:
2172 res
->u8
= v1
->ldval
< v2
->i8
;
2175 res
->u8
= v1
->ldval
< v2
->u8
;
2178 res
->u8
= v1
->ldval
< v2
->i16
;
2181 res
->u8
= v1
->ldval
< v2
->u16
;
2184 res
->u8
= v1
->ldval
< v2
->i32
;
2187 res
->u8
= v1
->ldval
< v2
->u32
;
2190 res
->u8
= v1
->ldval
< v2
->i64
;
2193 res
->u8
= v1
->ldval
< v2
->u64
;
2197 res
->u8
= v1
->ldval
< v2
->i128
;
2203 res
->u8
= v1
->ldval
< v2
->u128
;
2208 res
->u8
= v1
->ldval
< v2
->fval
;
2211 res
->u8
= v1
->ldval
< v2
->dval
;
2213 # if HAVE_LONG_DOUBLE
2214 case PSI_T_LONG_DOUBLE
:
2215 res
->u8
= v1
->ldval
< v2
->ldval
;
2233 static inline token_t
psi_calc_cmp_gt(token_t t1
, impl_val
*v1
, token_t t2
, impl_val
*v2
, impl_val
*res
)
2239 res
->u8
= v1
->i8
> v2
->i8
;
2242 res
->u8
= v1
->i8
> v2
->u8
;
2245 res
->u8
= v1
->i8
> v2
->i16
;
2248 res
->u8
= v1
->i8
> v2
->u16
;
2251 res
->u8
= v1
->i8
> v2
->i32
;
2254 res
->u8
= v1
->i8
> v2
->u32
;
2257 res
->u8
= v1
->i8
> v2
->i64
;
2260 res
->u8
= v1
->i8
> v2
->u64
;
2264 res
->u8
= v1
->i8
> v2
->i128
;
2270 res
->u8
= v1
->i8
> v2
->u128
;
2275 res
->u8
= v1
->i8
> v2
->fval
;
2278 res
->u8
= v1
->i8
> v2
->dval
;
2280 # if HAVE_LONG_DOUBLE
2281 case PSI_T_LONG_DOUBLE
:
2282 res
->u8
= v1
->i8
> v2
->ldval
;
2294 res
->u8
= v1
->u8
> v2
->i8
;
2297 res
->u8
= v1
->u8
> v2
->u8
;
2300 res
->u8
= v1
->u8
> v2
->i16
;
2303 res
->u8
= v1
->u8
> v2
->u16
;
2306 res
->u8
= v1
->u8
> v2
->i32
;
2309 res
->u8
= v1
->u8
> v2
->u32
;
2312 res
->u8
= v1
->u8
> v2
->i64
;
2315 res
->u8
= v1
->u8
> v2
->u64
;
2319 res
->u8
= v1
->u8
> v2
->i128
;
2325 res
->u8
= v1
->u8
> v2
->u128
;
2330 res
->u8
= v1
->u8
> v2
->fval
;
2333 res
->u8
= v1
->u8
> v2
->dval
;
2335 # if HAVE_LONG_DOUBLE
2336 case PSI_T_LONG_DOUBLE
:
2337 res
->u8
= v1
->u8
> v2
->ldval
;
2349 res
->u8
= v1
->i16
> v2
->i8
;
2352 res
->u8
= v1
->i16
> v2
->u8
;
2355 res
->u8
= v1
->i16
> v2
->i16
;
2358 res
->u8
= v1
->i16
> v2
->u16
;
2361 res
->u8
= v1
->i16
> v2
->i32
;
2364 res
->u8
= v1
->i16
> v2
->u32
;
2367 res
->u8
= v1
->i16
> v2
->i64
;
2370 res
->u8
= v1
->i16
> v2
->u64
;
2374 res
->u8
= v1
->i16
> v2
->i128
;
2380 res
->u8
= v1
->i16
> v2
->u128
;
2385 res
->u8
= v1
->i16
> v2
->fval
;
2388 res
->u8
= v1
->i16
> v2
->dval
;
2390 # if HAVE_LONG_DOUBLE
2391 case PSI_T_LONG_DOUBLE
:
2392 res
->u8
= v1
->i16
> v2
->ldval
;
2404 res
->u8
= v1
->u16
> v2
->i8
;
2407 res
->u8
= v1
->u16
> v2
->u8
;
2410 res
->u8
= v1
->u16
> v2
->i16
;
2413 res
->u8
= v1
->u16
> v2
->u16
;
2416 res
->u8
= v1
->u16
> v2
->i32
;
2419 res
->u8
= v1
->u16
> v2
->u32
;
2422 res
->u8
= v1
->u16
> v2
->i64
;
2425 res
->u8
= v1
->u16
> v2
->u64
;
2429 res
->u8
= v1
->u16
> v2
->i128
;
2435 res
->u8
= v1
->u16
> v2
->u128
;
2440 res
->u8
= v1
->u16
> v2
->fval
;
2443 res
->u8
= v1
->u16
> v2
->dval
;
2445 # if HAVE_LONG_DOUBLE
2446 case PSI_T_LONG_DOUBLE
:
2447 res
->u8
= v1
->u16
> v2
->ldval
;
2459 res
->u8
= v1
->i32
> v2
->i8
;
2462 res
->u8
= v1
->i32
> v2
->u8
;
2465 res
->u8
= v1
->i32
> v2
->i16
;
2468 res
->u8
= v1
->i32
> v2
->u16
;
2471 res
->u8
= v1
->i32
> v2
->i32
;
2474 res
->u8
= v1
->i32
> v2
->u32
;
2477 res
->u8
= v1
->i32
> v2
->i64
;
2480 res
->u8
= v1
->i32
> v2
->u64
;
2484 res
->u8
= v1
->i32
> v2
->i128
;
2490 res
->u8
= v1
->i32
> v2
->u128
;
2495 res
->u8
= v1
->i32
> v2
->fval
;
2498 res
->u8
= v1
->i32
> v2
->dval
;
2500 # if HAVE_LONG_DOUBLE
2501 case PSI_T_LONG_DOUBLE
:
2502 res
->u8
= v1
->i32
> v2
->ldval
;
2514 res
->u8
= v1
->u32
> v2
->i8
;
2517 res
->u8
= v1
->u32
> v2
->u8
;
2520 res
->u8
= v1
->u32
> v2
->i16
;
2523 res
->u8
= v1
->u32
> v2
->u16
;
2526 res
->u8
= v1
->u32
> v2
->i32
;
2529 res
->u8
= v1
->u32
> v2
->u32
;
2532 res
->u8
= v1
->u32
> v2
->i64
;
2535 res
->u8
= v1
->u32
> v2
->u64
;
2539 res
->u8
= v1
->u32
> v2
->i128
;
2545 res
->u8
= v1
->u32
> v2
->u128
;
2550 res
->u8
= v1
->u32
> v2
->fval
;
2553 res
->u8
= v1
->u32
> v2
->dval
;
2555 # if HAVE_LONG_DOUBLE
2556 case PSI_T_LONG_DOUBLE
:
2557 res
->u8
= v1
->u32
> v2
->ldval
;
2569 res
->u8
= v1
->i64
> v2
->i8
;
2572 res
->u8
= v1
->i64
> v2
->u8
;
2575 res
->u8
= v1
->i64
> v2
->i16
;
2578 res
->u8
= v1
->i64
> v2
->u16
;
2581 res
->u8
= v1
->i64
> v2
->i32
;
2584 res
->u8
= v1
->i64
> v2
->u32
;
2587 res
->u8
= v1
->i64
> v2
->i64
;
2590 res
->u8
= v1
->i64
> v2
->u64
;
2594 res
->u8
= v1
->i64
> v2
->i128
;
2600 res
->u8
= v1
->i64
> v2
->u128
;
2605 res
->u8
= v1
->i64
> v2
->fval
;
2608 res
->u8
= v1
->i64
> v2
->dval
;
2610 # if HAVE_LONG_DOUBLE
2611 case PSI_T_LONG_DOUBLE
:
2612 res
->u8
= v1
->i64
> v2
->ldval
;
2624 res
->u8
= v1
->u64
> v2
->i8
;
2627 res
->u8
= v1
->u64
> v2
->u8
;
2630 res
->u8
= v1
->u64
> v2
->i16
;
2633 res
->u8
= v1
->u64
> v2
->u16
;
2636 res
->u8
= v1
->u64
> v2
->i32
;
2639 res
->u8
= v1
->u64
> v2
->u32
;
2642 res
->u8
= v1
->u64
> v2
->i64
;
2645 res
->u8
= v1
->u64
> v2
->u64
;
2649 res
->u8
= v1
->u64
> v2
->i128
;
2655 res
->u8
= v1
->u64
> v2
->u128
;
2660 res
->u8
= v1
->u64
> v2
->fval
;
2663 res
->u8
= v1
->u64
> v2
->dval
;
2665 # if HAVE_LONG_DOUBLE
2666 case PSI_T_LONG_DOUBLE
:
2667 res
->u8
= v1
->u64
> v2
->ldval
;
2680 res
->u8
= v1
->i128
> v2
->i8
;
2683 res
->u8
= v1
->i128
> v2
->u8
;
2686 res
->u8
= v1
->i128
> v2
->i16
;
2689 res
->u8
= v1
->i128
> v2
->u16
;
2692 res
->u8
= v1
->i128
> v2
->i32
;
2695 res
->u8
= v1
->i128
> v2
->u32
;
2698 res
->u8
= v1
->i128
> v2
->i64
;
2701 res
->u8
= v1
->i128
> v2
->u64
;
2705 res
->u8
= v1
->i128
> v2
->i128
;
2711 res
->u8
= v1
->i128
> v2
->u128
;
2716 res
->u8
= v1
->i128
> v2
->fval
;
2719 res
->u8
= v1
->i128
> v2
->dval
;
2721 # if HAVE_LONG_DOUBLE
2722 case PSI_T_LONG_DOUBLE
:
2723 res
->u8
= v1
->i128
> v2
->ldval
;
2738 res
->u8
= v1
->u128
> v2
->i8
;
2741 res
->u8
= v1
->u128
> v2
->u8
;
2744 res
->u8
= v1
->u128
> v2
->i16
;
2747 res
->u8
= v1
->u128
> v2
->u16
;
2750 res
->u8
= v1
->u128
> v2
->i32
;
2753 res
->u8
= v1
->u128
> v2
->u32
;
2756 res
->u8
= v1
->u128
> v2
->i64
;
2759 res
->u8
= v1
->u128
> v2
->u64
;
2763 res
->u8
= v1
->u128
> v2
->i128
;
2769 res
->u8
= v1
->u128
> v2
->u128
;
2774 res
->u8
= v1
->u128
> v2
->fval
;
2777 res
->u8
= v1
->u128
> v2
->dval
;
2779 # if HAVE_LONG_DOUBLE
2780 case PSI_T_LONG_DOUBLE
:
2781 res
->u8
= v1
->u128
> v2
->ldval
;
2795 res
->u8
= v1
->fval
> v2
->i8
;
2798 res
->u8
= v1
->fval
> v2
->u8
;
2801 res
->u8
= v1
->fval
> v2
->i16
;
2804 res
->u8
= v1
->fval
> v2
->u16
;
2807 res
->u8
= v1
->fval
> v2
->i32
;
2810 res
->u8
= v1
->fval
> v2
->u32
;
2813 res
->u8
= v1
->fval
> v2
->i64
;
2816 res
->u8
= v1
->fval
> v2
->u64
;
2820 res
->u8
= v1
->fval
> v2
->i128
;
2826 res
->u8
= v1
->fval
> v2
->u128
;
2831 res
->u8
= v1
->fval
> v2
->fval
;
2834 res
->u8
= v1
->fval
> v2
->dval
;
2836 # if HAVE_LONG_DOUBLE
2837 case PSI_T_LONG_DOUBLE
:
2838 res
->u8
= v1
->fval
> v2
->ldval
;
2850 res
->u8
= v1
->dval
> v2
->i8
;
2853 res
->u8
= v1
->dval
> v2
->u8
;
2856 res
->u8
= v1
->dval
> v2
->i16
;
2859 res
->u8
= v1
->dval
> v2
->u16
;
2862 res
->u8
= v1
->dval
> v2
->i32
;
2865 res
->u8
= v1
->dval
> v2
->u32
;
2868 res
->u8
= v1
->dval
> v2
->i64
;
2871 res
->u8
= v1
->dval
> v2
->u64
;
2875 res
->u8
= v1
->dval
> v2
->i128
;
2881 res
->u8
= v1
->dval
> v2
->u128
;
2886 res
->u8
= v1
->dval
> v2
->fval
;
2889 res
->u8
= v1
->dval
> v2
->dval
;
2891 # if HAVE_LONG_DOUBLE
2892 case PSI_T_LONG_DOUBLE
:
2893 res
->u8
= v1
->dval
> v2
->ldval
;
2902 #if HAVE_LONG_DOUBLE
2903 case PSI_T_LONG_DOUBLE
:
2906 res
->u8
= v1
->ldval
> v2
->i8
;
2909 res
->u8
= v1
->ldval
> v2
->u8
;
2912 res
->u8
= v1
->ldval
> v2
->i16
;
2915 res
->u8
= v1
->ldval
> v2
->u16
;
2918 res
->u8
= v1
->ldval
> v2
->i32
;
2921 res
->u8
= v1
->ldval
> v2
->u32
;
2924 res
->u8
= v1
->ldval
> v2
->i64
;
2927 res
->u8
= v1
->ldval
> v2
->u64
;
2931 res
->u8
= v1
->ldval
> v2
->i128
;
2937 res
->u8
= v1
->ldval
> v2
->u128
;
2942 res
->u8
= v1
->ldval
> v2
->fval
;
2945 res
->u8
= v1
->ldval
> v2
->dval
;
2947 # if HAVE_LONG_DOUBLE
2948 case PSI_T_LONG_DOUBLE
:
2949 res
->u8
= v1
->ldval
> v2
->ldval
;
2967 static inline token_t
psi_calc_cmp_le(token_t t1
, impl_val
*v1
, token_t t2
, impl_val
*v2
, impl_val
*res
)
2973 res
->u8
= v1
->i8
<= v2
->i8
;
2976 res
->u8
= v1
->i8
<= v2
->u8
;
2979 res
->u8
= v1
->i8
<= v2
->i16
;
2982 res
->u8
= v1
->i8
<= v2
->u16
;
2985 res
->u8
= v1
->i8
<= v2
->i32
;
2988 res
->u8
= v1
->i8
<= v2
->u32
;
2991 res
->u8
= v1
->i8
<= v2
->i64
;
2994 res
->u8
= v1
->i8
<= v2
->u64
;
2998 res
->u8
= v1
->i8
<= v2
->i128
;
3004 res
->u8
= v1
->i8
<= v2
->u128
;
3009 res
->u8
= v1
->i8
<= v2
->fval
;
3012 res
->u8
= v1
->i8
<= v2
->dval
;
3014 # if HAVE_LONG_DOUBLE
3015 case PSI_T_LONG_DOUBLE
:
3016 res
->u8
= v1
->i8
<= v2
->ldval
;
3028 res
->u8
= v1
->u8
<= v2
->i8
;
3031 res
->u8
= v1
->u8
<= v2
->u8
;
3034 res
->u8
= v1
->u8
<= v2
->i16
;
3037 res
->u8
= v1
->u8
<= v2
->u16
;
3040 res
->u8
= v1
->u8
<= v2
->i32
;
3043 res
->u8
= v1
->u8
<= v2
->u32
;
3046 res
->u8
= v1
->u8
<= v2
->i64
;
3049 res
->u8
= v1
->u8
<= v2
->u64
;
3053 res
->u8
= v1
->u8
<= v2
->i128
;
3059 res
->u8
= v1
->u8
<= v2
->u128
;
3064 res
->u8
= v1
->u8
<= v2
->fval
;
3067 res
->u8
= v1
->u8
<= v2
->dval
;
3069 # if HAVE_LONG_DOUBLE
3070 case PSI_T_LONG_DOUBLE
:
3071 res
->u8
= v1
->u8
<= v2
->ldval
;
3083 res
->u8
= v1
->i16
<= v2
->i8
;
3086 res
->u8
= v1
->i16
<= v2
->u8
;
3089 res
->u8
= v1
->i16
<= v2
->i16
;
3092 res
->u8
= v1
->i16
<= v2
->u16
;
3095 res
->u8
= v1
->i16
<= v2
->i32
;
3098 res
->u8
= v1
->i16
<= v2
->u32
;
3101 res
->u8
= v1
->i16
<= v2
->i64
;
3104 res
->u8
= v1
->i16
<= v2
->u64
;
3108 res
->u8
= v1
->i16
<= v2
->i128
;
3114 res
->u8
= v1
->i16
<= v2
->u128
;
3119 res
->u8
= v1
->i16
<= v2
->fval
;
3122 res
->u8
= v1
->i16
<= v2
->dval
;
3124 # if HAVE_LONG_DOUBLE
3125 case PSI_T_LONG_DOUBLE
:
3126 res
->u8
= v1
->i16
<= v2
->ldval
;
3138 res
->u8
= v1
->u16
<= v2
->i8
;
3141 res
->u8
= v1
->u16
<= v2
->u8
;
3144 res
->u8
= v1
->u16
<= v2
->i16
;
3147 res
->u8
= v1
->u16
<= v2
->u16
;
3150 res
->u8
= v1
->u16
<= v2
->i32
;
3153 res
->u8
= v1
->u16
<= v2
->u32
;
3156 res
->u8
= v1
->u16
<= v2
->i64
;
3159 res
->u8
= v1
->u16
<= v2
->u64
;
3163 res
->u8
= v1
->u16
<= v2
->i128
;
3169 res
->u8
= v1
->u16
<= v2
->u128
;
3174 res
->u8
= v1
->u16
<= v2
->fval
;
3177 res
->u8
= v1
->u16
<= v2
->dval
;
3179 # if HAVE_LONG_DOUBLE
3180 case PSI_T_LONG_DOUBLE
:
3181 res
->u8
= v1
->u16
<= v2
->ldval
;
3193 res
->u8
= v1
->i32
<= v2
->i8
;
3196 res
->u8
= v1
->i32
<= v2
->u8
;
3199 res
->u8
= v1
->i32
<= v2
->i16
;
3202 res
->u8
= v1
->i32
<= v2
->u16
;
3205 res
->u8
= v1
->i32
<= v2
->i32
;
3208 res
->u8
= v1
->i32
<= v2
->u32
;
3211 res
->u8
= v1
->i32
<= v2
->i64
;
3214 res
->u8
= v1
->i32
<= v2
->u64
;
3218 res
->u8
= v1
->i32
<= v2
->i128
;
3224 res
->u8
= v1
->i32
<= v2
->u128
;
3229 res
->u8
= v1
->i32
<= v2
->fval
;
3232 res
->u8
= v1
->i32
<= v2
->dval
;
3234 # if HAVE_LONG_DOUBLE
3235 case PSI_T_LONG_DOUBLE
:
3236 res
->u8
= v1
->i32
<= v2
->ldval
;
3248 res
->u8
= v1
->u32
<= v2
->i8
;
3251 res
->u8
= v1
->u32
<= v2
->u8
;
3254 res
->u8
= v1
->u32
<= v2
->i16
;
3257 res
->u8
= v1
->u32
<= v2
->u16
;
3260 res
->u8
= v1
->u32
<= v2
->i32
;
3263 res
->u8
= v1
->u32
<= v2
->u32
;
3266 res
->u8
= v1
->u32
<= v2
->i64
;
3269 res
->u8
= v1
->u32
<= v2
->u64
;
3273 res
->u8
= v1
->u32
<= v2
->i128
;
3279 res
->u8
= v1
->u32
<= v2
->u128
;
3284 res
->u8
= v1
->u32
<= v2
->fval
;
3287 res
->u8
= v1
->u32
<= v2
->dval
;
3289 # if HAVE_LONG_DOUBLE
3290 case PSI_T_LONG_DOUBLE
:
3291 res
->u8
= v1
->u32
<= v2
->ldval
;
3303 res
->u8
= v1
->i64
<= v2
->i8
;
3306 res
->u8
= v1
->i64
<= v2
->u8
;
3309 res
->u8
= v1
->i64
<= v2
->i16
;
3312 res
->u8
= v1
->i64
<= v2
->u16
;
3315 res
->u8
= v1
->i64
<= v2
->i32
;
3318 res
->u8
= v1
->i64
<= v2
->u32
;
3321 res
->u8
= v1
->i64
<= v2
->i64
;
3324 res
->u8
= v1
->i64
<= v2
->u64
;
3328 res
->u8
= v1
->i64
<= v2
->i128
;
3334 res
->u8
= v1
->i64
<= v2
->u128
;
3339 res
->u8
= v1
->i64
<= v2
->fval
;
3342 res
->u8
= v1
->i64
<= v2
->dval
;
3344 # if HAVE_LONG_DOUBLE
3345 case PSI_T_LONG_DOUBLE
:
3346 res
->u8
= v1
->i64
<= v2
->ldval
;
3358 res
->u8
= v1
->u64
<= v2
->i8
;
3361 res
->u8
= v1
->u64
<= v2
->u8
;
3364 res
->u8
= v1
->u64
<= v2
->i16
;
3367 res
->u8
= v1
->u64
<= v2
->u16
;
3370 res
->u8
= v1
->u64
<= v2
->i32
;
3373 res
->u8
= v1
->u64
<= v2
->u32
;
3376 res
->u8
= v1
->u64
<= v2
->i64
;
3379 res
->u8
= v1
->u64
<= v2
->u64
;
3383 res
->u8
= v1
->u64
<= v2
->i128
;
3389 res
->u8
= v1
->u64
<= v2
->u128
;
3394 res
->u8
= v1
->u64
<= v2
->fval
;
3397 res
->u8
= v1
->u64
<= v2
->dval
;
3399 # if HAVE_LONG_DOUBLE
3400 case PSI_T_LONG_DOUBLE
:
3401 res
->u8
= v1
->u64
<= v2
->ldval
;
3414 res
->u8
= v1
->i128
<= v2
->i8
;
3417 res
->u8
= v1
->i128
<= v2
->u8
;
3420 res
->u8
= v1
->i128
<= v2
->i16
;
3423 res
->u8
= v1
->i128
<= v2
->u16
;
3426 res
->u8
= v1
->i128
<= v2
->i32
;
3429 res
->u8
= v1
->i128
<= v2
->u32
;
3432 res
->u8
= v1
->i128
<= v2
->i64
;
3435 res
->u8
= v1
->i128
<= v2
->u64
;
3439 res
->u8
= v1
->i128
<= v2
->i128
;
3445 res
->u8
= v1
->i128
<= v2
->u128
;
3450 res
->u8
= v1
->i128
<= v2
->fval
;
3453 res
->u8
= v1
->i128
<= v2
->dval
;
3455 # if HAVE_LONG_DOUBLE
3456 case PSI_T_LONG_DOUBLE
:
3457 res
->u8
= v1
->i128
<= v2
->ldval
;
3472 res
->u8
= v1
->u128
<= v2
->i8
;
3475 res
->u8
= v1
->u128
<= v2
->u8
;
3478 res
->u8
= v1
->u128
<= v2
->i16
;
3481 res
->u8
= v1
->u128
<= v2
->u16
;
3484 res
->u8
= v1
->u128
<= v2
->i32
;
3487 res
->u8
= v1
->u128
<= v2
->u32
;
3490 res
->u8
= v1
->u128
<= v2
->i64
;
3493 res
->u8
= v1
->u128
<= v2
->u64
;
3497 res
->u8
= v1
->u128
<= v2
->i128
;
3503 res
->u8
= v1
->u128
<= v2
->u128
;
3508 res
->u8
= v1
->u128
<= v2
->fval
;
3511 res
->u8
= v1
->u128
<= v2
->dval
;
3513 # if HAVE_LONG_DOUBLE
3514 case PSI_T_LONG_DOUBLE
:
3515 res
->u8
= v1
->u128
<= v2
->ldval
;
3529 res
->u8
= v1
->fval
<= v2
->i8
;
3532 res
->u8
= v1
->fval
<= v2
->u8
;
3535 res
->u8
= v1
->fval
<= v2
->i16
;
3538 res
->u8
= v1
->fval
<= v2
->u16
;
3541 res
->u8
= v1
->fval
<= v2
->i32
;
3544 res
->u8
= v1
->fval
<= v2
->u32
;
3547 res
->u8
= v1
->fval
<= v2
->i64
;
3550 res
->u8
= v1
->fval
<= v2
->u64
;
3554 res
->u8
= v1
->fval
<= v2
->i128
;
3560 res
->u8
= v1
->fval
<= v2
->u128
;
3565 res
->u8
= v1
->fval
<= v2
->fval
;
3568 res
->u8
= v1
->fval
<= v2
->dval
;
3570 # if HAVE_LONG_DOUBLE
3571 case PSI_T_LONG_DOUBLE
:
3572 res
->u8
= v1
->fval
<= v2
->ldval
;
3584 res
->u8
= v1
->dval
<= v2
->i8
;
3587 res
->u8
= v1
->dval
<= v2
->u8
;
3590 res
->u8
= v1
->dval
<= v2
->i16
;
3593 res
->u8
= v1
->dval
<= v2
->u16
;
3596 res
->u8
= v1
->dval
<= v2
->i32
;
3599 res
->u8
= v1
->dval
<= v2
->u32
;
3602 res
->u8
= v1
->dval
<= v2
->i64
;
3605 res
->u8
= v1
->dval
<= v2
->u64
;
3609 res
->u8
= v1
->dval
<= v2
->i128
;
3615 res
->u8
= v1
->dval
<= v2
->u128
;
3620 res
->u8
= v1
->dval
<= v2
->fval
;
3623 res
->u8
= v1
->dval
<= v2
->dval
;
3625 # if HAVE_LONG_DOUBLE
3626 case PSI_T_LONG_DOUBLE
:
3627 res
->u8
= v1
->dval
<= v2
->ldval
;
3636 #if HAVE_LONG_DOUBLE
3637 case PSI_T_LONG_DOUBLE
:
3640 res
->u8
= v1
->ldval
<= v2
->i8
;
3643 res
->u8
= v1
->ldval
<= v2
->u8
;
3646 res
->u8
= v1
->ldval
<= v2
->i16
;
3649 res
->u8
= v1
->ldval
<= v2
->u16
;
3652 res
->u8
= v1
->ldval
<= v2
->i32
;
3655 res
->u8
= v1
->ldval
<= v2
->u32
;
3658 res
->u8
= v1
->ldval
<= v2
->i64
;
3661 res
->u8
= v1
->ldval
<= v2
->u64
;
3665 res
->u8
= v1
->ldval
<= v2
->i128
;
3671 res
->u8
= v1
->ldval
<= v2
->u128
;
3676 res
->u8
= v1
->ldval
<= v2
->fval
;
3679 res
->u8
= v1
->ldval
<= v2
->dval
;
3681 # if HAVE_LONG_DOUBLE
3682 case PSI_T_LONG_DOUBLE
:
3683 res
->u8
= v1
->ldval
<= v2
->ldval
;
3701 static inline token_t
psi_calc_cmp_ge(token_t t1
, impl_val
*v1
, token_t t2
, impl_val
*v2
, impl_val
*res
)
3707 res
->u8
= v1
->i8
>= v2
->i8
;
3710 res
->u8
= v1
->i8
>= v2
->u8
;
3713 res
->u8
= v1
->i8
>= v2
->i16
;
3716 res
->u8
= v1
->i8
>= v2
->u16
;
3719 res
->u8
= v1
->i8
>= v2
->i32
;
3722 res
->u8
= v1
->i8
>= v2
->u32
;
3725 res
->u8
= v1
->i8
>= v2
->i64
;
3728 res
->u8
= v1
->i8
>= v2
->u64
;
3732 res
->u8
= v1
->i8
>= v2
->i128
;
3738 res
->u8
= v1
->i8
>= v2
->u128
;
3743 res
->u8
= v1
->i8
>= v2
->fval
;
3746 res
->u8
= v1
->i8
>= v2
->dval
;
3748 # if HAVE_LONG_DOUBLE
3749 case PSI_T_LONG_DOUBLE
:
3750 res
->u8
= v1
->i8
>= v2
->ldval
;
3762 res
->u8
= v1
->u8
>= v2
->i8
;
3765 res
->u8
= v1
->u8
>= v2
->u8
;
3768 res
->u8
= v1
->u8
>= v2
->i16
;
3771 res
->u8
= v1
->u8
>= v2
->u16
;
3774 res
->u8
= v1
->u8
>= v2
->i32
;
3777 res
->u8
= v1
->u8
>= v2
->u32
;
3780 res
->u8
= v1
->u8
>= v2
->i64
;
3783 res
->u8
= v1
->u8
>= v2
->u64
;
3787 res
->u8
= v1
->u8
>= v2
->i128
;
3793 res
->u8
= v1
->u8
>= v2
->u128
;
3798 res
->u8
= v1
->u8
>= v2
->fval
;
3801 res
->u8
= v1
->u8
>= v2
->dval
;
3803 # if HAVE_LONG_DOUBLE
3804 case PSI_T_LONG_DOUBLE
:
3805 res
->u8
= v1
->u8
>= v2
->ldval
;
3817 res
->u8
= v1
->i16
>= v2
->i8
;
3820 res
->u8
= v1
->i16
>= v2
->u8
;
3823 res
->u8
= v1
->i16
>= v2
->i16
;
3826 res
->u8
= v1
->i16
>= v2
->u16
;
3829 res
->u8
= v1
->i16
>= v2
->i32
;
3832 res
->u8
= v1
->i16
>= v2
->u32
;
3835 res
->u8
= v1
->i16
>= v2
->i64
;
3838 res
->u8
= v1
->i16
>= v2
->u64
;
3842 res
->u8
= v1
->i16
>= v2
->i128
;
3848 res
->u8
= v1
->i16
>= v2
->u128
;
3853 res
->u8
= v1
->i16
>= v2
->fval
;
3856 res
->u8
= v1
->i16
>= v2
->dval
;
3858 # if HAVE_LONG_DOUBLE
3859 case PSI_T_LONG_DOUBLE
:
3860 res
->u8
= v1
->i16
>= v2
->ldval
;
3872 res
->u8
= v1
->u16
>= v2
->i8
;
3875 res
->u8
= v1
->u16
>= v2
->u8
;
3878 res
->u8
= v1
->u16
>= v2
->i16
;
3881 res
->u8
= v1
->u16
>= v2
->u16
;
3884 res
->u8
= v1
->u16
>= v2
->i32
;
3887 res
->u8
= v1
->u16
>= v2
->u32
;
3890 res
->u8
= v1
->u16
>= v2
->i64
;
3893 res
->u8
= v1
->u16
>= v2
->u64
;
3897 res
->u8
= v1
->u16
>= v2
->i128
;
3903 res
->u8
= v1
->u16
>= v2
->u128
;
3908 res
->u8
= v1
->u16
>= v2
->fval
;
3911 res
->u8
= v1
->u16
>= v2
->dval
;
3913 # if HAVE_LONG_DOUBLE
3914 case PSI_T_LONG_DOUBLE
:
3915 res
->u8
= v1
->u16
>= v2
->ldval
;
3927 res
->u8
= v1
->i32
>= v2
->i8
;
3930 res
->u8
= v1
->i32
>= v2
->u8
;
3933 res
->u8
= v1
->i32
>= v2
->i16
;
3936 res
->u8
= v1
->i32
>= v2
->u16
;
3939 res
->u8
= v1
->i32
>= v2
->i32
;
3942 res
->u8
= v1
->i32
>= v2
->u32
;
3945 res
->u8
= v1
->i32
>= v2
->i64
;
3948 res
->u8
= v1
->i32
>= v2
->u64
;
3952 res
->u8
= v1
->i32
>= v2
->i128
;
3958 res
->u8
= v1
->i32
>= v2
->u128
;
3963 res
->u8
= v1
->i32
>= v2
->fval
;
3966 res
->u8
= v1
->i32
>= v2
->dval
;
3968 # if HAVE_LONG_DOUBLE
3969 case PSI_T_LONG_DOUBLE
:
3970 res
->u8
= v1
->i32
>= v2
->ldval
;
3982 res
->u8
= v1
->u32
>= v2
->i8
;
3985 res
->u8
= v1
->u32
>= v2
->u8
;
3988 res
->u8
= v1
->u32
>= v2
->i16
;
3991 res
->u8
= v1
->u32
>= v2
->u16
;
3994 res
->u8
= v1
->u32
>= v2
->i32
;
3997 res
->u8
= v1
->u32
>= v2
->u32
;
4000 res
->u8
= v1
->u32
>= v2
->i64
;
4003 res
->u8
= v1
->u32
>= v2
->u64
;
4007 res
->u8
= v1
->u32
>= v2
->i128
;
4013 res
->u8
= v1
->u32
>= v2
->u128
;
4018 res
->u8
= v1
->u32
>= v2
->fval
;
4021 res
->u8
= v1
->u32
>= v2
->dval
;
4023 # if HAVE_LONG_DOUBLE
4024 case PSI_T_LONG_DOUBLE
:
4025 res
->u8
= v1
->u32
>= v2
->ldval
;
4037 res
->u8
= v1
->i64
>= v2
->i8
;
4040 res
->u8
= v1
->i64
>= v2
->u8
;
4043 res
->u8
= v1
->i64
>= v2
->i16
;
4046 res
->u8
= v1
->i64
>= v2
->u16
;
4049 res
->u8
= v1
->i64
>= v2
->i32
;
4052 res
->u8
= v1
->i64
>= v2
->u32
;
4055 res
->u8
= v1
->i64
>= v2
->i64
;
4058 res
->u8
= v1
->i64
>= v2
->u64
;
4062 res
->u8
= v1
->i64
>= v2
->i128
;
4068 res
->u8
= v1
->i64
>= v2
->u128
;
4073 res
->u8
= v1
->i64
>= v2
->fval
;
4076 res
->u8
= v1
->i64
>= v2
->dval
;
4078 # if HAVE_LONG_DOUBLE
4079 case PSI_T_LONG_DOUBLE
:
4080 res
->u8
= v1
->i64
>= v2
->ldval
;
4092 res
->u8
= v1
->u64
>= v2
->i8
;
4095 res
->u8
= v1
->u64
>= v2
->u8
;
4098 res
->u8
= v1
->u64
>= v2
->i16
;
4101 res
->u8
= v1
->u64
>= v2
->u16
;
4104 res
->u8
= v1
->u64
>= v2
->i32
;
4107 res
->u8
= v1
->u64
>= v2
->u32
;
4110 res
->u8
= v1
->u64
>= v2
->i64
;
4113 res
->u8
= v1
->u64
>= v2
->u64
;
4117 res
->u8
= v1
->u64
>= v2
->i128
;
4123 res
->u8
= v1
->u64
>= v2
->u128
;
4128 res
->u8
= v1
->u64
>= v2
->fval
;
4131 res
->u8
= v1
->u64
>= v2
->dval
;
4133 # if HAVE_LONG_DOUBLE
4134 case PSI_T_LONG_DOUBLE
:
4135 res
->u8
= v1
->u64
>= v2
->ldval
;
4148 res
->u8
= v1
->i128
>= v2
->i8
;
4151 res
->u8
= v1
->i128
>= v2
->u8
;
4154 res
->u8
= v1
->i128
>= v2
->i16
;
4157 res
->u8
= v1
->i128
>= v2
->u16
;
4160 res
->u8
= v1
->i128
>= v2
->i32
;
4163 res
->u8
= v1
->i128
>= v2
->u32
;
4166 res
->u8
= v1
->i128
>= v2
->i64
;
4169 res
->u8
= v1
->i128
>= v2
->u64
;
4173 res
->u8
= v1
->i128
>= v2
->i128
;
4179 res
->u8
= v1
->i128
>= v2
->u128
;
4184 res
->u8
= v1
->i128
>= v2
->fval
;
4187 res
->u8
= v1
->i128
>= v2
->dval
;
4189 # if HAVE_LONG_DOUBLE
4190 case PSI_T_LONG_DOUBLE
:
4191 res
->u8
= v1
->i128
>= v2
->ldval
;
4206 res
->u8
= v1
->u128
>= v2
->i8
;
4209 res
->u8
= v1
->u128
>= v2
->u8
;
4212 res
->u8
= v1
->u128
>= v2
->i16
;
4215 res
->u8
= v1
->u128
>= v2
->u16
;
4218 res
->u8
= v1
->u128
>= v2
->i32
;
4221 res
->u8
= v1
->u128
>= v2
->u32
;
4224 res
->u8
= v1
->u128
>= v2
->i64
;
4227 res
->u8
= v1
->u128
>= v2
->u64
;
4231 res
->u8
= v1
->u128
>= v2
->i128
;
4237 res
->u8
= v1
->u128
>= v2
->u128
;
4242 res
->u8
= v1
->u128
>= v2
->fval
;
4245 res
->u8
= v1
->u128
>= v2
->dval
;
4247 # if HAVE_LONG_DOUBLE
4248 case PSI_T_LONG_DOUBLE
:
4249 res
->u8
= v1
->u128
>= v2
->ldval
;
4263 res
->u8
= v1
->fval
>= v2
->i8
;
4266 res
->u8
= v1
->fval
>= v2
->u8
;
4269 res
->u8
= v1
->fval
>= v2
->i16
;
4272 res
->u8
= v1
->fval
>= v2
->u16
;
4275 res
->u8
= v1
->fval
>= v2
->i32
;
4278 res
->u8
= v1
->fval
>= v2
->u32
;
4281 res
->u8
= v1
->fval
>= v2
->i64
;
4284 res
->u8
= v1
->fval
>= v2
->u64
;
4288 res
->u8
= v1
->fval
>= v2
->i128
;
4294 res
->u8
= v1
->fval
>= v2
->u128
;
4299 res
->u8
= v1
->fval
>= v2
->fval
;
4302 res
->u8
= v1
->fval
>= v2
->dval
;
4304 # if HAVE_LONG_DOUBLE
4305 case PSI_T_LONG_DOUBLE
:
4306 res
->u8
= v1
->fval
>= v2
->ldval
;
4318 res
->u8
= v1
->dval
>= v2
->i8
;
4321 res
->u8
= v1
->dval
>= v2
->u8
;
4324 res
->u8
= v1
->dval
>= v2
->i16
;
4327 res
->u8
= v1
->dval
>= v2
->u16
;
4330 res
->u8
= v1
->dval
>= v2
->i32
;
4333 res
->u8
= v1
->dval
>= v2
->u32
;
4336 res
->u8
= v1
->dval
>= v2
->i64
;
4339 res
->u8
= v1
->dval
>= v2
->u64
;
4343 res
->u8
= v1
->dval
>= v2
->i128
;
4349 res
->u8
= v1
->dval
>= v2
->u128
;
4354 res
->u8
= v1
->dval
>= v2
->fval
;
4357 res
->u8
= v1
->dval
>= v2
->dval
;
4359 # if HAVE_LONG_DOUBLE
4360 case PSI_T_LONG_DOUBLE
:
4361 res
->u8
= v1
->dval
>= v2
->ldval
;
4370 #if HAVE_LONG_DOUBLE
4371 case PSI_T_LONG_DOUBLE
:
4374 res
->u8
= v1
->ldval
>= v2
->i8
;
4377 res
->u8
= v1
->ldval
>= v2
->u8
;
4380 res
->u8
= v1
->ldval
>= v2
->i16
;
4383 res
->u8
= v1
->ldval
>= v2
->u16
;
4386 res
->u8
= v1
->ldval
>= v2
->i32
;
4389 res
->u8
= v1
->ldval
>= v2
->u32
;
4392 res
->u8
= v1
->ldval
>= v2
->i64
;
4395 res
->u8
= v1
->ldval
>= v2
->u64
;
4399 res
->u8
= v1
->ldval
>= v2
->i128
;
4405 res
->u8
= v1
->ldval
>= v2
->u128
;
4410 res
->u8
= v1
->ldval
>= v2
->fval
;
4413 res
->u8
= v1
->ldval
>= v2
->dval
;
4415 # if HAVE_LONG_DOUBLE
4416 case PSI_T_LONG_DOUBLE
:
4417 res
->u8
= v1
->ldval
>= v2
->ldval
;