1 files changed, 1 insertions, 0 deletions

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))