#include <perms.h>

                                                                //      1  %begin
#line 1 "regression-bugs-tmp/shorts.imp"
int main(int argc, char **argv) {
  _imp_initialise(argc, argv);
                                                                //      2    %shortinteger fred
#line 2 "regression-bugs-tmp/shorts.imp"
short FRED;
                                                                //      3    fred = 16_3DEF
#line 3 "regression-bugs-tmp/shorts.imp"
FRED = 15855;
                                                                //      4  
                                                                //      5    fred = -fred
#line 5 "regression-bugs-tmp/shorts.imp"
FRED = (-(FRED));
                                                                //      6  
                                                                //      7    %if fred < 0 %start
#line 7 "regression-bugs-tmp/shorts.imp"
if (((FRED) >= (0))) goto L_0002;
                                                                //      8      print string("OK!"); newline
#line 8 "regression-bugs-tmp/shorts.imp"
_imp_PRINTSTRING(_imp_str_literal("OK!"));
#line 8 "regression-bugs-tmp/shorts.imp"
_imp_NEWLINE();
                                                                //      9    %else
#line 9 "regression-bugs-tmp/shorts.imp"
goto L_0003;
#line 9 "regression-bugs-tmp/shorts.imp"
L_0002:;
                                                                //     10      print string("Compiler bug?"); newline
#line 10 "regression-bugs-tmp/shorts.imp"
_imp_PRINTSTRING(_imp_str_literal("Compiler bug?"));
#line 10 "regression-bugs-tmp/shorts.imp"
_imp_NEWLINE();
                                                                //     11    %finish
#line 11 "regression-bugs-tmp/shorts.imp"
L_0003:;
                                                                //     12  
                                                                //     13  %endofprogram
#line 13 "regression-bugs-tmp/shorts.imp"
/* Remove %on %event handler here if present for this block */
return 0;
} // End of block _imp_main at level 1
#line 13 "regression-bugs-tmp/shorts.imp"
// End of file