diff options
| author | rth <rth@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-12-07 00:01:01 +0000 |
|---|---|---|
| committer | rth <rth@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-12-07 00:01:01 +0000 |
| commit | 7145fd060789b5e05d3cb8e13984d4bf25377b92 (patch) | |
| tree | 379c730c455320b1f8101e6a2c9d24435a6e33b3 /libgfortran/io/lock.c | |
| parent | d60883fa5a86d1d6d5cbd2b81f656913002b053d (diff) | |
| download | gcc-7145fd060789b5e05d3cb8e13984d4bf25377b92.tar.gz | |
* intrinsics/c99_functions.c, intrinsics/eoshift0.c,
intrinsics/eoshift2.c, intrinsics/exit.c, intrinsics/flush.c,
intrinsics/ishftc.c, intrinsics/mvbits.c, intrinsics/pack_generic.c,
intrinsics/random.c, intrinsics/reshape_generic.c, intrinsics/size.c,
intrinsics/spread_generic.c, intrinsics/stat.c,
intrinsics/string_intrinsics.c, intrinsics/system_clock.c,
intrinsics/transpose_generic.c, intrinsics/unlink.c,
intrinsics/unpack_generic.c, io/backspace.c, io/format.c,
io/list_read.c, io/lock.c, io/open.c, io/transfer.c, io/unix.c,
io/write.c, runtime/environ.c, runtime/error.c,
runtime/in_pack_generic.c, runtime/in_unpack_generic.c, runtime/main.c,
runtime/memory.c, runtime/pause.c, runtime/stop.c,
runtime/string.c: Whitespace fixes.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@91794 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran/io/lock.c')
| -rw-r--r-- | libgfortran/io/lock.c | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/libgfortran/io/lock.c b/libgfortran/io/lock.c index 1d3f06912e0..8daf1aa57c3 100644 --- a/libgfortran/io/lock.c +++ b/libgfortran/io/lock.c @@ -34,7 +34,6 @@ global_t g; void library_start (void) { - if (g.in_library) internal_error ("Recursive library calls not allowed"); @@ -81,4 +80,3 @@ library_end (void) memset (&ioparm, '\0', sizeof (ioparm)); ioparm.library_return = t; } - |