diff options
| author | obrien <obrien@FreeBSD.org> | 2002-05-09 20:02:13 +0000 |
|---|---|---|
| committer | obrien <obrien@FreeBSD.org> | 2002-05-09 20:02:13 +0000 |
| commit | c8f5fc7032940ad6633f932ac40cade82ec4d0cc (patch) | |
| tree | 29a0f0a6c79a69ecc64f612947a0fe5904311713 /contrib/gcc/f/intdoc.c | |
| parent | c9ab9ae440a8066b2c2b85b157b1fdadcf09916a (diff) | |
| download | FreeBSD-src-c8f5fc7032940ad6633f932ac40cade82ec4d0cc.zip FreeBSD-src-c8f5fc7032940ad6633f932ac40cade82ec4d0cc.tar.gz | |
Gcc 3.1.0 pre-release from the FSF anoncvs repo on 9-May-2002 15:57:15 EDT.
Diffstat (limited to 'contrib/gcc/f/intdoc.c')
| -rw-r--r-- | contrib/gcc/f/intdoc.c | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/contrib/gcc/f/intdoc.c b/contrib/gcc/f/intdoc.c index 84720a3..fb88e88 100644 --- a/contrib/gcc/f/intdoc.c +++ b/contrib/gcc/f/intdoc.c @@ -709,6 +709,10 @@ types of all the arguments.\n\n"); argument_name_string (imp, 0)); break; + case 'N': + printf ("@code{INTEGER} not wider than the default kind"); + break; + default: assert ("Ia" == NULL); break; @@ -732,6 +736,10 @@ types of all the arguments.\n\n"); argument_name_string (imp, 0)); break; + case 'N': + printf ("@code{LOGICAL} not wider than the default kind"); + break; + default: assert ("La" == NULL); break; @@ -779,6 +787,10 @@ types of all the arguments.\n\n"); argument_name_string (imp, 0)); break; + case 'N': + printf ("@code{INTEGER} or @code{LOGICAL} not wider than the default kind"); + break; + default: assert ("Ba" == NULL); break; |
