{ %FAIL } { Old file: tbf0323.pp } { } {$ifdef fpc}{$mode delphi}{$endif} type TA = (aOne := 1, aTwo, aThree, aFour, aSix); begin end.