From: David Wasley <dlw@ucbvax.Berkeley.EDU>
Date: Sat, 22 Jan 1983 03:12:40 +0000 (-0800)
Subject: date and time created 83/01/21 11:12:40 by dlw
X-Git-Tag: BSD-4_1c_2-Snapshot-Development~916
X-Git-Url: https://git.subgeniuskitty.com/unix-history/.git/commitdiff_plain/2feb60ed1dd1faba2c18d23616e69aec841be12d

date and time created 83/01/21 11:12:40 by dlw

SCCS-vsn: usr.bin/f77/libF77/exit_.c 1.1
---

diff --git a/usr/src/usr.bin/f77/libF77/exit_.c b/usr/src/usr.bin/f77/libF77/exit_.c
new file mode 100644
index 0000000000..0452e58061
--- /dev/null
+++ b/usr/src/usr.bin/f77/libF77/exit_.c
@@ -0,0 +1,12 @@
+/*
+ *	"@(#)exit_.c	1.1"
+ */
+
+
+exit_(n)
+long *n;
+{
+	f_exit();
+	_cleanup();
+	exit((int)*n);
+}