📂 FileMgr
📍
/
opt
/
cloudlinux
/
venv
/
lib
/
python3.11
/
site-packages
/
numpy
/
f2py
/
tests
/
src
/
callback
✏️ src/callback/gh18335.f90
⬅ Kembali
! When gh18335_workaround is defined as an extension, ! the issue cannot be reproduced. !subroutine gh18335_workaround(f, y) ! implicit none ! external f ! integer(kind=1) :: y(1) ! call f(y) !end subroutine gh18335_workaround function gh18335(f) result (r) implicit none external f integer(kind=1) :: y(1), r y(1) = 123 call f(y) r = y(1) end function gh18335
💾 Simpan
Batal
⬅ src
3 item
Nama
Tipe
Ukuran
Diubah
Aksi
📄
foo.f
f
1.2 KB
2026-01-20 12:58
✏️
👁️
🔤
🗑
📄
gh17797.f90
f90
148 B
2026-01-20 12:58
✏️
👁️
🔤
🗑
📄
gh18335.f90
f90
506 B
2026-01-20 12:58
✏️
👁️
🔤
🗑
✏️ Rename
Nama Baru
Simpan
Batal