From 3348ab9e95e872abb38d3dbe5f28ee2ef8d9cc22 Mon Sep 17 00:00:00 2001 From: asfernandes Date: Mon, 8 Dec 2008 23:43:46 +0000 Subject: [PATCH] Misc --- lang_helpers/gds_codes.ftn | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lang_helpers/gds_codes.ftn b/lang_helpers/gds_codes.ftn index 066df8ca4f..bab9dda7cf 100644 --- a/lang_helpers/gds_codes.ftn +++ b/lang_helpers/gds_codes.ftn @@ -50,7 +50,7 @@ C -- + GDS_ARG_VMS = 6, { VAX/VMS status code (long) } + GDS_ARG_UNIX = 7, { UNIX error code } + GDS_ARG_DOMAIN = 8, { Apollo/Domain error code } - + GDS_ARG_DOS = 9) { Apollo/Domain error code } + + GDS_ARG_DOS = 9) { Apollo/Domain error code } INTEGER*4 GDS__arith_except PARAMETER (GDS__arith_except = 335544321)