feat: implement 3d euler beam fortran kernel

2026-06-11 14:29:20 +09:00
parent a3b5d7d383
commit 1fc3128ed5
14 changed files with 614 additions and 26 deletions
@@ -65,9 +65,15 @@ class FortranToolchainTests(unittest.TestCase):
            env_script=Path(r"C:\Program Files (x86)\Intel\oneAPI\setvars.bat"),
        )

-        command = fortran_toolchain.wrap_command(toolchain, ["ifx", "/nologo", "test.f90"])
+        with patch.dict(
+            os.environ,
+            {"ComSpec": r"C:\Windows\System32\cmd.exe", "SystemRoot": r"C:\Windows"},
+            clear=True,
+        ):
+            command = fortran_toolchain.wrap_command(toolchain, ["ifx", "/nologo", "test.f90"])

-        self.assertIn("cmd /d /s /c", command)
+        self.assertIn(r"C:\Windows\System32\cmd.exe /d /s /c", command)
+        self.assertIn('set "PATH=C:\\Windows\\System32;C:\\Windows"', command)
        self.assertIn('call "C:\\Program Files (x86)\\Intel\\oneAPI\\setvars.bat" intel64', command)
        self.assertIn("ifx /nologo test.f90", command)