diff options
| author | Jeff Law <law@gcc.gnu.org> | 1998-02-22 12:36:33 -0700 |
|---|---|---|
| committer | Jeff Law <law@gcc.gnu.org> | 1998-02-22 12:36:33 -0700 |
| commit | 56a0044b23379c1b4129f7d97d4abb444f3df175 (patch) | |
| tree | 896df8a7767510a09f2791565643d25b1dc6ef2f /gcc/f/sta.c | |
| parent | 86fc7a6c5d2fc7f9a5daa5e48f94cbfb87ca6db1 (diff) | |
| download | gcc-56a0044b23379c1b4129f7d97d4abb444f3df175.zip gcc-56a0044b23379c1b4129f7d97d4abb444f3df175.tar.gz gcc-56a0044b23379c1b4129f7d97d4abb444f3df175.tar.bz2 | |
Another bunch of patches from Craig. See ChangeLogs for details.
From-SVN: r18188
Diffstat (limited to 'gcc/f/sta.c')
| -rw-r--r-- | gcc/f/sta.c | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/gcc/f/sta.c b/gcc/f/sta.c index 328bfd0..281ca93 100644 --- a/gcc/f/sta.c +++ b/gcc/f/sta.c @@ -1792,9 +1792,11 @@ ffesta_ffebad_2t (ffebad errnum, ffelexToken t1, ffelexToken t2) } } -/* ffesta_set_outpooldisp -- Set disposition of statement output pool - - ffesta_set_outpooldisp(FFESTA_pooldispPRESERVE); */ +ffestaPooldisp +ffesta_outpooldisp () +{ + return ffesta_outpooldisp_; +} void ffesta_set_outpooldisp (ffestaPooldisp d) |