| /dports/lang/gcc48/gcc-4.8.5/libgfortran/intrinsics/ |
| H A D | link.c | 54 while (path2_len > 0 && path2[path2_len - 1] == ' ') in link_i4_sub()
55 path2_len--; in link_i4_sub()
62 str2 = gfc_alloca (path2_len + 1); in link_i4_sub()
63 memcpy (str2, path2, path2_len); in link_i4_sub()
64 str2[path2_len] = '\0'; in link_i4_sub()
87 while (path2_len > 0 && path2[path2_len - 1] == ' ') in link_i8_sub()
88 path2_len--; in link_i8_sub()
95 str2 = gfc_alloca (path2_len + 1); in link_i8_sub()
96 memcpy (str2, path2, path2_len); in link_i8_sub()
97 str2[path2_len] = '\0'; in link_i8_sub()
[all …]
|
| H A D | rename.c | 49 while (path2_len > 0 && path2[path2_len - 1] == ' ') in rename_i4_sub()
50 path2_len--; in rename_i4_sub()
57 str2 = gfc_alloca (path2_len + 1); in rename_i4_sub()
58 memcpy (str2, path2, path2_len); in rename_i4_sub()
59 str2[path2_len] = '\0'; in rename_i4_sub()
82 while (path2_len > 0 && path2[path2_len - 1] == ' ') in rename_i8_sub()
83 path2_len--; in rename_i8_sub()
91 memcpy (str2, path2, path2_len); in rename_i8_sub()
92 str2[path2_len] = '\0'; in rename_i8_sub()
107 gfc_charlen_type path2_len) in rename_i4() argument
[all …]
|
| H A D | symlnk.c | 54 while (path2_len > 0 && path2[path2_len - 1] == ' ') in symlnk_i4_sub()
55 path2_len--; in symlnk_i4_sub()
62 str2 = gfc_alloca (path2_len + 1); in symlnk_i4_sub()
63 memcpy (str2, path2, path2_len); in symlnk_i4_sub()
64 str2[path2_len] = '\0'; in symlnk_i4_sub()
87 while (path2_len > 0 && path2[path2_len - 1] == ' ') in symlnk_i8_sub()
88 path2_len--; in symlnk_i8_sub()
95 str2 = gfc_alloca (path2_len + 1); in symlnk_i8_sub()
96 memcpy (str2, path2, path2_len); in symlnk_i8_sub()
97 str2[path2_len] = '\0'; in symlnk_i8_sub()
[all …]
|
| /dports/devel/arm-none-eabi-gcc492/gcc-4.9.2/libgfortran/intrinsics/ |
| H A D | rename.c | 49 while (path2_len > 0 && path2[path2_len - 1] == ' ') in rename_i4_sub()
50 path2_len--; in rename_i4_sub()
57 str2 = gfc_alloca (path2_len + 1); in rename_i4_sub()
58 memcpy (str2, path2, path2_len); in rename_i4_sub()
59 str2[path2_len] = '\0'; in rename_i4_sub()
82 while (path2_len > 0 && path2[path2_len - 1] == ' ') in rename_i8_sub()
83 path2_len--; in rename_i8_sub()
91 memcpy (str2, path2, path2_len); in rename_i8_sub()
92 str2[path2_len] = '\0'; in rename_i8_sub()
107 gfc_charlen_type path2_len) in rename_i4() argument
[all …]
|
| H A D | link.c | 54 while (path2_len > 0 && path2[path2_len - 1] == ' ') in link_i4_sub()
55 path2_len--; in link_i4_sub()
62 str2 = gfc_alloca (path2_len + 1); in link_i4_sub()
63 memcpy (str2, path2, path2_len); in link_i4_sub()
64 str2[path2_len] = '\0'; in link_i4_sub()
87 while (path2_len > 0 && path2[path2_len - 1] == ' ') in link_i8_sub()
88 path2_len--; in link_i8_sub()
95 str2 = gfc_alloca (path2_len + 1); in link_i8_sub()
96 memcpy (str2, path2, path2_len); in link_i8_sub()
97 str2[path2_len] = '\0'; in link_i8_sub()
[all …]
|
| H A D | symlnk.c | 54 while (path2_len > 0 && path2[path2_len - 1] == ' ') in symlnk_i4_sub()
55 path2_len--; in symlnk_i4_sub()
62 str2 = gfc_alloca (path2_len + 1); in symlnk_i4_sub()
63 memcpy (str2, path2, path2_len); in symlnk_i4_sub()
64 str2[path2_len] = '\0'; in symlnk_i4_sub()
87 while (path2_len > 0 && path2[path2_len - 1] == ' ') in symlnk_i8_sub()
88 path2_len--; in symlnk_i8_sub()
95 str2 = gfc_alloca (path2_len + 1); in symlnk_i8_sub()
96 memcpy (str2, path2, path2_len); in symlnk_i8_sub()
97 str2[path2_len] = '\0'; in symlnk_i8_sub()
[all …]
|
| /dports/devel/mingw32-gcc/gcc-4.8.1/libgfortran/intrinsics/ |
| H A D | link.c | 54 while (path2_len > 0 && path2[path2_len - 1] == ' ') in link_i4_sub()
55 path2_len--; in link_i4_sub()
62 str2 = gfc_alloca (path2_len + 1); in link_i4_sub()
63 memcpy (str2, path2, path2_len); in link_i4_sub()
64 str2[path2_len] = '\0'; in link_i4_sub()
87 while (path2_len > 0 && path2[path2_len - 1] == ' ') in link_i8_sub()
88 path2_len--; in link_i8_sub()
95 str2 = gfc_alloca (path2_len + 1); in link_i8_sub()
96 memcpy (str2, path2, path2_len); in link_i8_sub()
97 str2[path2_len] = '\0'; in link_i8_sub()
[all …]
|
| H A D | rename.c | 49 while (path2_len > 0 && path2[path2_len - 1] == ' ') in rename_i4_sub()
50 path2_len--; in rename_i4_sub()
57 str2 = gfc_alloca (path2_len + 1); in rename_i4_sub()
58 memcpy (str2, path2, path2_len); in rename_i4_sub()
59 str2[path2_len] = '\0'; in rename_i4_sub()
82 while (path2_len > 0 && path2[path2_len - 1] == ' ') in rename_i8_sub()
83 path2_len--; in rename_i8_sub()
91 memcpy (str2, path2, path2_len); in rename_i8_sub()
92 str2[path2_len] = '\0'; in rename_i8_sub()
107 gfc_charlen_type path2_len) in rename_i4() argument
[all …]
|
| H A D | symlnk.c | 54 while (path2_len > 0 && path2[path2_len - 1] == ' ') in symlnk_i4_sub()
55 path2_len--; in symlnk_i4_sub()
62 str2 = gfc_alloca (path2_len + 1); in symlnk_i4_sub()
63 memcpy (str2, path2, path2_len); in symlnk_i4_sub()
64 str2[path2_len] = '\0'; in symlnk_i4_sub()
87 while (path2_len > 0 && path2[path2_len - 1] == ' ') in symlnk_i8_sub()
88 path2_len--; in symlnk_i8_sub()
95 str2 = gfc_alloca (path2_len + 1); in symlnk_i8_sub()
96 memcpy (str2, path2, path2_len); in symlnk_i8_sub()
97 str2[path2_len] = '\0'; in symlnk_i8_sub()
[all …]
|
| /dports/lang/gcc6-aux/gcc-6-20180516/libgfortran/intrinsics/ |
| H A D | rename.c | 35 gfc_charlen_type path2_len) in rename_internal() argument
38 char *str2 = fc_strdup (path2, path2_len); in rename_internal()
56 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in rename_i4_sub() argument
58 int val = rename_internal (path1, path2, path1_len, path2_len); in rename_i4_sub()
70 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in rename_i8_sub() argument
72 int val = rename_internal (path1, path2, path1_len, path2_len); in rename_i8_sub()
84 gfc_charlen_type path2_len) in rename_i4() argument
86 return rename_internal (path1, path2, path1_len, path2_len); in rename_i4()
95 gfc_charlen_type path2_len) in rename_i8() argument
97 return rename_internal (path1, path2, path1_len, path2_len); in rename_i8()
|
| H A D | symlnk.c | 43 gfc_charlen_type path2_len) in symlnk_internal() argument
46 char *str2 = fc_strdup (path2, path2_len); in symlnk_internal()
59 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in symlnk_i4_sub() argument
61 int val = symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i4_sub()
73 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in symlnk_i8_sub() argument
75 int val = symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i8_sub()
87 gfc_charlen_type path2_len) in symlnk_i4() argument
89 return symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i4()
98 gfc_charlen_type path2_len) in symlnk_i8() argument
100 return symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i8()
|
| /dports/lang/gcc12-devel/gcc-12-20211205/libgfortran/intrinsics/ |
| H A D | symlnk.c | 41 gfc_charlen_type path2_len) in symlnk_internal() argument
44 char *str2 = fc_strdup (path2, path2_len); in symlnk_internal()
57 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in symlnk_i4_sub() argument
59 int val = symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i4_sub()
71 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in symlnk_i8_sub() argument
73 int val = symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i8_sub()
85 gfc_charlen_type path2_len) in symlnk_i4() argument
87 return symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i4()
96 gfc_charlen_type path2_len) in symlnk_i8() argument
98 return symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i8()
|
| H A D | rename.c | 33 gfc_charlen_type path2_len) in rename_internal() argument
36 char *str2 = fc_strdup (path2, path2_len); in rename_internal()
54 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in rename_i4_sub() argument
56 int val = rename_internal (path1, path2, path1_len, path2_len); in rename_i4_sub()
68 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in rename_i8_sub() argument
70 int val = rename_internal (path1, path2, path1_len, path2_len); in rename_i8_sub()
82 gfc_charlen_type path2_len) in rename_i4() argument
84 return rename_internal (path1, path2, path1_len, path2_len); in rename_i4()
93 gfc_charlen_type path2_len) in rename_i8() argument
95 return rename_internal (path1, path2, path1_len, path2_len); in rename_i8()
|
| /dports/lang/gcc8/gcc-8.5.0/libgfortran/intrinsics/ |
| H A D | rename.c | 33 gfc_charlen_type path2_len) in rename_internal() argument
36 char *str2 = fc_strdup (path2, path2_len); in rename_internal()
54 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in rename_i4_sub() argument
56 int val = rename_internal (path1, path2, path1_len, path2_len); in rename_i4_sub()
68 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in rename_i8_sub() argument
70 int val = rename_internal (path1, path2, path1_len, path2_len); in rename_i8_sub()
82 gfc_charlen_type path2_len) in rename_i4() argument
84 return rename_internal (path1, path2, path1_len, path2_len); in rename_i4()
93 gfc_charlen_type path2_len) in rename_i8() argument
95 return rename_internal (path1, path2, path1_len, path2_len); in rename_i8()
|
| H A D | symlnk.c | 41 gfc_charlen_type path2_len) in symlnk_internal() argument
44 char *str2 = fc_strdup (path2, path2_len); in symlnk_internal()
57 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in symlnk_i4_sub() argument
59 int val = symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i4_sub()
71 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in symlnk_i8_sub() argument
73 int val = symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i8_sub()
85 gfc_charlen_type path2_len) in symlnk_i4() argument
87 return symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i4()
96 gfc_charlen_type path2_len) in symlnk_i8() argument
98 return symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i8()
|
| /dports/lang/gcc10/gcc-10.3.0/libgfortran/intrinsics/ |
| H A D | rename.c | 33 gfc_charlen_type path2_len) in rename_internal() argument
36 char *str2 = fc_strdup (path2, path2_len); in rename_internal()
54 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in rename_i4_sub() argument
56 int val = rename_internal (path1, path2, path1_len, path2_len); in rename_i4_sub()
68 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in rename_i8_sub() argument
70 int val = rename_internal (path1, path2, path1_len, path2_len); in rename_i8_sub()
82 gfc_charlen_type path2_len) in rename_i4() argument
84 return rename_internal (path1, path2, path1_len, path2_len); in rename_i4()
93 gfc_charlen_type path2_len) in rename_i8() argument
95 return rename_internal (path1, path2, path1_len, path2_len); in rename_i8()
|
| H A D | symlnk.c | 41 gfc_charlen_type path2_len) in symlnk_internal() argument
44 char *str2 = fc_strdup (path2, path2_len); in symlnk_internal()
57 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in symlnk_i4_sub() argument
59 int val = symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i4_sub()
71 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in symlnk_i8_sub() argument
73 int val = symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i8_sub()
85 gfc_charlen_type path2_len) in symlnk_i4() argument
87 return symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i4()
96 gfc_charlen_type path2_len) in symlnk_i8() argument
98 return symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i8()
|
| /dports/devel/riscv64-none-elf-gcc/gcc-8.4.0/libgfortran/intrinsics/ |
| H A D | symlnk.c | 41 gfc_charlen_type path2_len) in symlnk_internal() argument
44 char *str2 = fc_strdup (path2, path2_len); in symlnk_internal()
57 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in symlnk_i4_sub() argument
59 int val = symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i4_sub()
71 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in symlnk_i8_sub() argument
73 int val = symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i8_sub()
85 gfc_charlen_type path2_len) in symlnk_i4() argument
87 return symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i4()
96 gfc_charlen_type path2_len) in symlnk_i8() argument
98 return symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i8()
|
| H A D | rename.c | 33 gfc_charlen_type path2_len) in rename_internal() argument
36 char *str2 = fc_strdup (path2, path2_len); in rename_internal()
54 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in rename_i4_sub() argument
56 int val = rename_internal (path1, path2, path1_len, path2_len); in rename_i4_sub()
68 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in rename_i8_sub() argument
70 int val = rename_internal (path1, path2, path1_len, path2_len); in rename_i8_sub()
82 gfc_charlen_type path2_len) in rename_i4() argument
84 return rename_internal (path1, path2, path1_len, path2_len); in rename_i4()
93 gfc_charlen_type path2_len) in rename_i8() argument
95 return rename_internal (path1, path2, path1_len, path2_len); in rename_i8()
|
| /dports/lang/gcc11/gcc-11.2.0/libgfortran/intrinsics/ |
| H A D | rename.c | 33 gfc_charlen_type path2_len) in rename_internal() argument
36 char *str2 = fc_strdup (path2, path2_len); in rename_internal()
54 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in rename_i4_sub() argument
56 int val = rename_internal (path1, path2, path1_len, path2_len); in rename_i4_sub()
68 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in rename_i8_sub() argument
70 int val = rename_internal (path1, path2, path1_len, path2_len); in rename_i8_sub()
82 gfc_charlen_type path2_len) in rename_i4() argument
84 return rename_internal (path1, path2, path1_len, path2_len); in rename_i4()
93 gfc_charlen_type path2_len) in rename_i8() argument
95 return rename_internal (path1, path2, path1_len, path2_len); in rename_i8()
|
| /dports/lang/gcc11-devel/gcc-11-20211009/libgfortran/intrinsics/ |
| H A D | rename.c | 33 gfc_charlen_type path2_len) in rename_internal() argument
36 char *str2 = fc_strdup (path2, path2_len); in rename_internal()
54 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in rename_i4_sub() argument
56 int val = rename_internal (path1, path2, path1_len, path2_len); in rename_i4_sub()
68 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in rename_i8_sub() argument
70 int val = rename_internal (path1, path2, path1_len, path2_len); in rename_i8_sub()
82 gfc_charlen_type path2_len) in rename_i4() argument
84 return rename_internal (path1, path2, path1_len, path2_len); in rename_i4()
93 gfc_charlen_type path2_len) in rename_i8() argument
95 return rename_internal (path1, path2, path1_len, path2_len); in rename_i8()
|
| H A D | symlnk.c | 41 gfc_charlen_type path2_len) in symlnk_internal() argument
44 char *str2 = fc_strdup (path2, path2_len); in symlnk_internal()
57 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in symlnk_i4_sub() argument
59 int val = symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i4_sub()
71 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in symlnk_i8_sub() argument
73 int val = symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i8_sub()
85 gfc_charlen_type path2_len) in symlnk_i4() argument
87 return symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i4()
96 gfc_charlen_type path2_len) in symlnk_i8() argument
98 return symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i8()
|
| /dports/devel/arm-none-eabi-gcc/gcc-8.4.0/libgfortran/intrinsics/ |
| H A D | rename.c | 33 gfc_charlen_type path2_len) in rename_internal() argument
36 char *str2 = fc_strdup (path2, path2_len); in rename_internal()
54 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in rename_i4_sub() argument
56 int val = rename_internal (path1, path2, path1_len, path2_len); in rename_i4_sub()
68 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in rename_i8_sub() argument
70 int val = rename_internal (path1, path2, path1_len, path2_len); in rename_i8_sub()
82 gfc_charlen_type path2_len) in rename_i4() argument
84 return rename_internal (path1, path2, path1_len, path2_len); in rename_i4()
93 gfc_charlen_type path2_len) in rename_i8() argument
95 return rename_internal (path1, path2, path1_len, path2_len); in rename_i8()
|
| H A D | symlnk.c | 41 gfc_charlen_type path2_len) in symlnk_internal() argument
44 char *str2 = fc_strdup (path2, path2_len); in symlnk_internal()
57 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in symlnk_i4_sub() argument
59 int val = symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i4_sub()
71 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in symlnk_i8_sub() argument
73 int val = symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i8_sub()
85 gfc_charlen_type path2_len) in symlnk_i4() argument
87 return symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i4()
96 gfc_charlen_type path2_len) in symlnk_i8() argument
98 return symlnk_internal (path1, path2, path1_len, path2_len); in symlnk_i8()
|
| /dports/devel/riscv64-gcc/gcc-8.3.0/libgfortran/intrinsics/ |
| H A D | rename.c | 33 gfc_charlen_type path2_len) in rename_internal() argument
36 char *str2 = fc_strdup (path2, path2_len); in rename_internal()
54 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in rename_i4_sub() argument
56 int val = rename_internal (path1, path2, path1_len, path2_len); in rename_i4_sub()
68 gfc_charlen_type path1_len, gfc_charlen_type path2_len) in rename_i8_sub() argument
70 int val = rename_internal (path1, path2, path1_len, path2_len); in rename_i8_sub()
82 gfc_charlen_type path2_len) in rename_i4() argument
84 return rename_internal (path1, path2, path1_len, path2_len); in rename_i4()
93 gfc_charlen_type path2_len) in rename_i8() argument
95 return rename_internal (path1, path2, path1_len, path2_len); in rename_i8()
|