2003-12-26 Guilhem Lavaux <guilhem@kaffe.org>

[official-gcc.git] / gcc / testsuite / g77.f-torture / compile / 20010321-1.f

# 1 "20010321-1.f"
      SUBROUTINE TWOEXP
# 1 "include/implicit.h" 1 3
      IMPLICIT DOUBLE PRECISION (A-H)
# 3 "20010321-1.f" 2 3
      LOGICAL ANTI
      ANTI = .FALSE.
      END