gcc/testsuite/algol68/execute/cond-clause-8.a68

# { dg-options "-fstropping=upper" }  #
# ELIF  #
BEGIN
   INT i = 12;
   IF i > 20 THEN
      1
   ELIF i > 5 THEN
      BEGIN
         IF FALSE THEN
            ASSERT (FALSE);
            1
         ELSE
            0
         FI
      END
   ELIF i < 10 THEN
      ASSERT (FALSE);
      1
   FI
END