From 82941c076d5f8d026544158cae438dc2764cb2de Mon Sep 17 00:00:00 2001 From: Igor Pashev Date: Sun, 13 Nov 2022 10:16:51 +0200 Subject: Update Fortran --- gcd.f90 | 1 + 1 file changed, 1 insertion(+) diff --git a/gcd.f90 b/gcd.f90 index c17c61c..d95d3d3 100644 --- a/gcd.f90 +++ b/gcd.f90 @@ -12,6 +12,7 @@ program GCD character(len=20) :: tmpstr n = command_argument_count() + if (n == 0) stop allocate (ns(n)) -- cgit v1.2.3