aboutsummaryrefslogtreecommitdiff
path: root/app/main.f90
diff options
context:
space:
mode:
authorSebastian Ehlert <28669218+awvwgk@users.noreply.github.com>2021-03-31 16:13:58 +0200
committerGitHub <noreply@github.com>2021-03-31 16:13:58 +0200
commitd9dc9f2ae5f196c15a7d35cddabc805c40ff86ce (patch)
tree6f61952c630b023edec391daae2747063703d489 /app/main.f90
parent5422ec57f4081bf2225f5dde5cc07999bf8010f9 (diff)
downloadfpm-d9dc9f2ae5f196c15a7d35cddabc805c40ff86ce.tar.gz
fpm-d9dc9f2ae5f196c15a7d35cddabc805c40ff86ce.zip
Phase out Haskell fpm (#420)
- remove bootstrap directory from repository - remove stack-build from CI workflow - move Fortran fpm to project root - adjust install script and bootstrap instructions
Diffstat (limited to 'app/main.f90')
-rw-r--r--app/main.f9037
1 files changed, 37 insertions, 0 deletions
diff --git a/app/main.f90 b/app/main.f90
new file mode 100644
index 0000000..7476df6
--- /dev/null
+++ b/app/main.f90
@@ -0,0 +1,37 @@
+program main
+use fpm_command_line, only: &
+ fpm_cmd_settings, &
+ fpm_new_settings, &
+ fpm_build_settings, &
+ fpm_run_settings, &
+ fpm_test_settings, &
+ fpm_install_settings, &
+ fpm_update_settings, &
+ get_command_line_settings
+use fpm, only: cmd_build, cmd_run
+use fpm_cmd_install, only: cmd_install
+use fpm_cmd_new, only: cmd_new
+use fpm_cmd_update, only : cmd_update
+
+implicit none
+
+class(fpm_cmd_settings), allocatable :: cmd_settings
+
+call get_command_line_settings(cmd_settings)
+
+select type(settings=>cmd_settings)
+type is (fpm_new_settings)
+ call cmd_new(settings)
+type is (fpm_build_settings)
+ call cmd_build(settings)
+type is (fpm_run_settings)
+ call cmd_run(settings,test=.false.)
+type is (fpm_test_settings)
+ call cmd_run(settings,test=.true.)
+type is (fpm_install_settings)
+ call cmd_install(settings)
+type is (fpm_update_settings)
+ call cmd_update(settings)
+end select
+
+end program main