| /dports/lang/gcc48/gcc-4.8.5/gcc/testsuite/gfortran.dg/ |
| H A D | value_1.f90 | 9 type :: mytype type
12 end type mytype
15 type(mytype), value :: dt
16 if (dtne (dt, mytype (42.0, "lmno"))) call abort ()
17 dt = mytype (21.0, "wxyz")
18 if (dtne (dt, mytype (21.0, "wxyz"))) call abort ()
22 type(mytype) :: a, b
34 type(mytype) :: dt = mytype (42.0, "lmno")
49 if (dtne (dt, mytype (42.0, "lmno"))) call abort ()
|
| H A D | alloc_comp_constructor_1.f90 | 17 type :: mytype type
20 end type mytype
22 type (mytype) :: x
30 x = mytype(null(), null())
34 x = mytype(yy, bar)
38 x = mytype(y, [foo, foo])
53 x = mytype(yy, bar)
62 x = mytype(bluhu(), null())
67 x = mytype(blaha(), null())
72 call check_mytype (mytype(y, [foo, foo]))
[all …]
|
| /dports/devel/arm-none-eabi-gcc492/gcc-4.9.2/gcc/testsuite/gfortran.dg/ |
| H A D | value_1.f90 | 9 type :: mytype type
12 end type mytype
15 type(mytype), value :: dt
16 if (dtne (dt, mytype (42.0, "lmno"))) call abort ()
17 dt = mytype (21.0, "wxyz")
18 if (dtne (dt, mytype (21.0, "wxyz"))) call abort ()
22 type(mytype) :: a, b
34 type(mytype) :: dt = mytype (42.0, "lmno")
49 if (dtne (dt, mytype (42.0, "lmno"))) call abort ()
|
| H A D | alloc_comp_constructor_1.f90 | 17 type :: mytype type
20 end type mytype
27 type (mytype) :: x
33 x = mytype(null(), null())
37 x = mytype(yy, bar)
41 x = mytype(y, [foo, foo])
56 x = mytype(yy, bar)
65 x = mytype(bluhu(), null())
70 x = mytype(blaha(), null())
75 call check_mytype (mytype(y, [foo, foo]))
[all …]
|
| /dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/testsuite/gfortran.dg/ |
| H A D | value_1.f90 | 9 type :: mytype type
12 end type mytype
15 type(mytype), value :: dt
16 if (dtne (dt, mytype (42.0, "lmno"))) STOP 1
17 dt = mytype (21.0, "wxyz")
18 if (dtne (dt, mytype (21.0, "wxyz"))) STOP 2
22 type(mytype) :: a, b
34 type(mytype) :: dt = mytype (42.0, "lmno")
49 if (dtne (dt, mytype (42.0, "lmno"))) STOP 7
|
| H A D | alloc_comp_constructor_1.f90 | 17 type :: mytype type
20 end type mytype
27 type (mytype) :: x
33 x = mytype(null(), null())
37 x = mytype(yy, bar)
41 x = mytype(y, [foo, foo])
56 x = mytype(yy, bar)
65 x = mytype(bluhu(), null())
70 x = mytype(blaha(), null())
75 call check_mytype (mytype(y, [foo, foo]))
[all …]
|
| /dports/devel/avr-gcc/gcc-10.2.0/gcc/testsuite/gfortran.dg/ |
| H A D | value_1.f90 | 9 type :: mytype type
12 end type mytype
15 type(mytype), value :: dt
16 if (dtne (dt, mytype (42.0, "lmno"))) STOP 1
17 dt = mytype (21.0, "wxyz")
18 if (dtne (dt, mytype (21.0, "wxyz"))) STOP 2
22 type(mytype) :: a, b
34 type(mytype) :: dt = mytype (42.0, "lmno")
49 if (dtne (dt, mytype (42.0, "lmno"))) STOP 7
|
| /dports/devel/riscv64-gcc/gcc-8.3.0/gcc/testsuite/gfortran.dg/ |
| H A D | value_1.f90 | 9 type :: mytype type
12 end type mytype
15 type(mytype), value :: dt
16 if (dtne (dt, mytype (42.0, "lmno"))) STOP 1
17 dt = mytype (21.0, "wxyz")
18 if (dtne (dt, mytype (21.0, "wxyz"))) STOP 2
22 type(mytype) :: a, b
34 type(mytype) :: dt = mytype (42.0, "lmno")
49 if (dtne (dt, mytype (42.0, "lmno"))) STOP 7
|
| /dports/lang/gcc11/gcc-11.2.0/gcc/testsuite/gfortran.dg/ |
| H A D | value_1.f90 | 9 type :: mytype type
12 end type mytype
15 type(mytype), value :: dt
16 if (dtne (dt, mytype (42.0, "lmno"))) STOP 1
17 dt = mytype (21.0, "wxyz")
18 if (dtne (dt, mytype (21.0, "wxyz"))) STOP 2
22 type(mytype) :: a, b
34 type(mytype) :: dt = mytype (42.0, "lmno")
49 if (dtne (dt, mytype (42.0, "lmno"))) STOP 7
|
| H A D | alloc_comp_constructor_1.f90 | 17 type :: mytype type
20 end type mytype
27 type (mytype) :: x
33 x = mytype(null(), null())
37 x = mytype(yy, bar)
41 x = mytype(y, [foo, foo])
56 x = mytype(yy, bar)
65 x = mytype(bluhu(), null())
70 x = mytype(blaha(), null())
75 call check_mytype (mytype(y, [foo, foo]))
[all …]
|
| /dports/lang/gcc10-devel/gcc-10-20211008/gcc/testsuite/gfortran.dg/ |
| H A D | value_1.f90 | 9 type :: mytype type
12 end type mytype
15 type(mytype), value :: dt
16 if (dtne (dt, mytype (42.0, "lmno"))) STOP 1
17 dt = mytype (21.0, "wxyz")
18 if (dtne (dt, mytype (21.0, "wxyz"))) STOP 2
22 type(mytype) :: a, b
34 type(mytype) :: dt = mytype (42.0, "lmno")
49 if (dtne (dt, mytype (42.0, "lmno"))) STOP 7
|
| /dports/lang/gcc9/gcc-9.4.0/gcc/testsuite/gfortran.dg/ |
| H A D | value_1.f90 | 9 type :: mytype type
12 end type mytype
15 type(mytype), value :: dt
16 if (dtne (dt, mytype (42.0, "lmno"))) STOP 1
17 dt = mytype (21.0, "wxyz")
18 if (dtne (dt, mytype (21.0, "wxyz"))) STOP 2
22 type(mytype) :: a, b
34 type(mytype) :: dt = mytype (42.0, "lmno")
49 if (dtne (dt, mytype (42.0, "lmno"))) STOP 7
|
| /dports/lang/gcc9-aux/gcc-9.1.0/gcc/testsuite/gfortran.dg/ |
| H A D | value_1.f90 | 9 type :: mytype type
12 end type mytype
15 type(mytype), value :: dt
16 if (dtne (dt, mytype (42.0, "lmno"))) STOP 1
17 dt = mytype (21.0, "wxyz")
18 if (dtne (dt, mytype (21.0, "wxyz"))) STOP 2
22 type(mytype) :: a, b
34 type(mytype) :: dt = mytype (42.0, "lmno")
49 if (dtne (dt, mytype (42.0, "lmno"))) STOP 7
|
| /dports/devel/mingw32-gcc/gcc-4.8.1/gcc/testsuite/gfortran.dg/ |
| H A D | value_1.f90 | 9 type :: mytype type
12 end type mytype
15 type(mytype), value :: dt
16 if (dtne (dt, mytype (42.0, "lmno"))) call abort ()
17 dt = mytype (21.0, "wxyz")
18 if (dtne (dt, mytype (21.0, "wxyz"))) call abort ()
22 type(mytype) :: a, b
34 type(mytype) :: dt = mytype (42.0, "lmno")
49 if (dtne (dt, mytype (42.0, "lmno"))) call abort ()
|
| /dports/finance/weberp/webERP/xmlrpc/src/ |
| H A D | Value.php | 41 public $mytype = 0; variable in PhpXmlRpc\\Value
126 switch ($this->mytype) {
162 if ($this->mytype == 0) {
193 if ($this->mytype == 0) {
216 switch ($this->mytype) {
469 switch ($this->mytype) {
487 switch ($this->mytype) {
502 switch ($this->mytype) {
541 switch ($this->mytype) {
555 switch ($this->mytype) {
[all …]
|
| /dports/net/mpich2/mpich2-1.5/test/mpi/datatype/ |
| H A D | hindexed-zeros.c | 59 MPI_Datatype mytype; in hindexed_zerotype_test() local
74 MPI_Type_commit(&mytype); in hindexed_zerotype_test()
84 err = MPI_Send(NULL, 1, mytype, 0, 0, MPI_COMM_SELF); in hindexed_zerotype_test()
101 err = MPI_Get_count(&status, mytype, &count); in hindexed_zerotype_test()
115 err = MPI_Get_elements(&status, mytype, &elements); in hindexed_zerotype_test()
129 MPI_Type_free(&mytype); in hindexed_zerotype_test()
142 MPI_Datatype mytype; in hindexed_sparsetype_test() local
162 MPI_Type_commit(&mytype); in hindexed_sparsetype_test()
202 err = MPI_Get_count(&status, mytype, &count); in hindexed_sparsetype_test()
217 err = MPI_Get_elements(&status, mytype, &elements); in hindexed_sparsetype_test()
[all …]
|
| /dports/lang/gcc6-aux/gcc-6-20180516/gcc/testsuite/gfortran.dg/ |
| H A D | alloc_comp_constructor_1.f90 | 17 type :: mytype type
20 end type mytype
27 type (mytype) :: x
33 x = mytype(null(), null())
37 x = mytype(yy, bar)
41 x = mytype(y, [foo, foo])
56 x = mytype(yy, bar)
65 x = mytype(bluhu(), null())
70 x = mytype(blaha(), null())
75 call check_mytype (mytype(y, [foo, foo]))
[all …]
|
| /dports/devel/riscv64-none-elf-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/ |
| H A D | alloc_comp_constructor_1.f90 | 17 type :: mytype type
20 end type mytype
27 type (mytype) :: x
33 x = mytype(null(), null())
37 x = mytype(yy, bar)
41 x = mytype(y, [foo, foo])
56 x = mytype(yy, bar)
65 x = mytype(bluhu(), null())
70 x = mytype(blaha(), null())
75 call check_mytype (mytype(y, [foo, foo]))
[all …]
|
| /dports/lang/gcc12-devel/gcc-12-20211205/gcc/testsuite/gfortran.dg/ |
| H A D | alloc_comp_constructor_1.f90 | 17 type :: mytype type
20 end type mytype
27 type (mytype) :: x
33 x = mytype(null(), null())
37 x = mytype(yy, bar)
41 x = mytype(y, [foo, foo])
56 x = mytype(yy, bar)
65 x = mytype(bluhu(), null())
70 x = mytype(blaha(), null())
75 call check_mytype (mytype(y, [foo, foo]))
[all …]
|
| /dports/lang/gcc10/gcc-10.3.0/gcc/testsuite/gfortran.dg/ |
| H A D | alloc_comp_constructor_1.f90 | 17 type :: mytype type
20 end type mytype
27 type (mytype) :: x
33 x = mytype(null(), null())
37 x = mytype(yy, bar)
41 x = mytype(y, [foo, foo])
56 x = mytype(yy, bar)
65 x = mytype(bluhu(), null())
70 x = mytype(blaha(), null())
75 call check_mytype (mytype(y, [foo, foo]))
[all …]
|
| /dports/devel/arm-none-eabi-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/ |
| H A D | alloc_comp_constructor_1.f90 | 17 type :: mytype type
20 end type mytype
27 type (mytype) :: x
33 x = mytype(null(), null())
37 x = mytype(yy, bar)
41 x = mytype(y, [foo, foo])
56 x = mytype(yy, bar)
65 x = mytype(bluhu(), null())
70 x = mytype(blaha(), null())
75 call check_mytype (mytype(y, [foo, foo]))
[all …]
|
| /dports/lang/gcc9-devel/gcc-9-20211007/gcc/testsuite/gfortran.dg/ |
| H A D | alloc_comp_constructor_1.f90 | 17 type :: mytype type
20 end type mytype
27 type (mytype) :: x
33 x = mytype(null(), null())
37 x = mytype(yy, bar)
41 x = mytype(y, [foo, foo])
56 x = mytype(yy, bar)
65 x = mytype(bluhu(), null())
70 x = mytype(blaha(), null())
75 call check_mytype (mytype(y, [foo, foo]))
[all …]
|
| /dports/devel/riscv32-unknown-elf-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/ |
| H A D | alloc_comp_constructor_1.f90 | 17 type :: mytype type
20 end type mytype
27 type (mytype) :: x
33 x = mytype(null(), null())
37 x = mytype(yy, bar)
41 x = mytype(y, [foo, foo])
56 x = mytype(yy, bar)
65 x = mytype(bluhu(), null())
70 x = mytype(blaha(), null())
75 call check_mytype (mytype(y, [foo, foo]))
[all …]
|
| /dports/devel/aarch64-none-elf-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/ |
| H A D | alloc_comp_constructor_1.f90 | 17 type :: mytype type
20 end type mytype
27 type (mytype) :: x
33 x = mytype(null(), null())
37 x = mytype(yy, bar)
41 x = mytype(y, [foo, foo])
56 x = mytype(yy, bar)
65 x = mytype(bluhu(), null())
70 x = mytype(blaha(), null())
75 call check_mytype (mytype(y, [foo, foo]))
[all …]
|
| /dports/lang/gcc11-devel/gcc-11-20211009/gcc/testsuite/gfortran.dg/ |
| H A D | alloc_comp_constructor_1.f90 | 17 type :: mytype type
20 end type mytype
27 type (mytype) :: x
33 x = mytype(null(), null())
37 x = mytype(yy, bar)
41 x = mytype(y, [foo, foo])
56 x = mytype(yy, bar)
65 x = mytype(bluhu(), null())
70 x = mytype(blaha(), null())
75 call check_mytype (mytype(y, [foo, foo]))
[all …]
|