lesstif 0.91.4-1: uil compiler error

[Claude Bouvier]

Hello from France
I am using the environment lesstif 0.91.4-1 and when I try to compile
the file ihm_lord.uil with the following command:
uil -o ihm_lord.uid  ihm_lord.uil
I get a Segmentation fault (see file error_uil for the exact error
message from the compiler)
Please find joined the files that produce the error.
Thanks for your help
Sincerely yours

PS: these files don't produce any error on HP_UX 10.20 & SUN Solaris 1
platforms

uil -o ihm_lord.uid  ihm_lord.uil
yacc.y:246:NO OP
yacc.y:233:NO OP
yacc.y:431:NO OP
yacc.y:425:NO OP
yacc.y:405:NO OP
yacc.y:431:NO OP
yacc.y:425:NO OP
yacc.y:391:NO OP
yacc.y:209:NO OP
yacc.y:204:NO OP
yacc.y:431:NO OP
yacc.y:425:NO OP
yacc.y:405:NO OP
yacc.y:209:NO OP
yacc.y:204:NO OP
yacc.y:204:NO OP
yacc.y:431:NO OP
yacc.y:425:NO OP
yacc.y:405:NO OP
yacc.y:209:NO OP
yacc.y:204:NO OP
yacc.y:204:NO OP
yacc.y:204:NO OP
yacc.y:431:NO OP
yacc.y:425:NO OP
yacc.y:405:NO OP
yacc.y:209:NO OP
yacc.y:204:NO OP
yacc.y:204:NO OP
yacc.y:431:NO OP
yacc.y:425:NO OP
yacc.y:405:NO OP
yacc.y:209:NO OP
yacc.y:204:NO OP
yacc.y:431:NO OP
yacc.y:425:NO OP
yacc.y:405:NO OP
yacc.y:209:NO OP
yacc.y:443:NO OP
yacc.y:425:NO OP
yacc.y:405:NO OP
yacc.y:209:NO OP
yacc.y:414:NO OP
yacc.y:209:NO OP
yacc.y:204:NO OP
yacc.y:204:NO OP
yacc.y:496:NO OP
make: *** [ihm_lord.uid] Segmentation fault


module lord

names = case_sensitive

include file 'procedures.uih';

value
  noir : color('black');

object menuBar : imported XmMenuBar;
 
object lordMainWindow : XmMainWindow {
  controls {
    XmMenuBar menuBar;
    XmForm form;
  };
};

list attachments : arguments {
  XmNtopAttachment = XmATTACH_FORM;
  XmNleftAttachment = XmATTACH_FORM;
  XmNrightAttachment = XmATTACH_FORM;
  XmNbottomAttachment = XmATTACH_FORM;
};

object form : XmForm {
  arguments {
    XmNmarginWidth = 40;
    XmNmarginHeight = 40;
    XmNbackground = color('#3e643e');
  };
  controls {
    XmForm {
      arguments {
        arguments attachments;
        XmNmarginWidth = 20;
        XmNmarginHeight = 20;
        XmNbackground = color('#3e643e');
        XmNshadowThickness = 20;
      };
      controls {
        XmDrawingArea lordDrawingArea;
      };
    };
  };
};

object lordDrawingArea : XmDrawingArea {
  arguments {
    XmNwidth = 600;
    XmNheight = 300;
    arguments attachments;
    XmNborderWidth = 2;
    XmNborderColor = noir;
  };
  controls {
    unmanaged XmPopupMenu popupMenu;
  };
  callbacks {
    MrmNcreateCallback = procedure lord_createCB(LORD_DRAWING_AREA);
    XmNexposeCallback = procedure lord_exposeCB(LORD_DRAWING_AREA);
    XmNresizeCallback = procedure lord_exposeCB(LORD_DRAWING_AREA);
  };
};

object popupMenu : XmPopupMenu {
  arguments {
    XmNtearOffModel = XmTEAR_OFF_ENABLED;
  };
  controls {
    XmToggleButton radio1;
    XmToggleButton radio2;
    XmToggleButton radio3;
  };
  callbacks {
    MrmNcreateCallback = procedure initPopupCB("*lordDrawingArea");
    XmNpopdownCallback = procedure popdownCB();
  };
};

object radio1 : XmToggleButton {
  arguments {
    XmNlabelString = radio1Text;
    XmNindicatorType = XmONE_OF_MANY;
    XmNset = false;
  };
  callbacks {
    XmNvalueChangedCallback = procedure popupMenuCB(RADIO_1_VALUE);
  };
};

object radio2 : XmToggleButton {
  arguments {
    XmNlabelString = radio2Text;
    XmNindicatorType = XmONE_OF_MANY;
    XmNset = true;
  };
  callbacks {
    XmNvalueChangedCallback = procedure popupMenuCB(RADIO_2_VALUE);
  };
};

object radio3 : XmToggleButton {
  arguments {
    XmNlabelString = radio3Text;
    XmNindicatorType = XmONE_OF_MANY;
    XmNset = false;
  };
  callbacks {
    XmNvalueChangedCallback = procedure popupMenuCB(RADIO_3_VALUE);
  };
};

end module;

! procedures.uih - declarations des callbacks lord et de leurs arguments

procedure
  lord_exposeCB (integer);
  lord_createCB (integer);
value
  LORD_DRAWING_AREA : 0;

procedure
  fileCB (integer);
value
  FILE_EXIT : 0;

value
  scanningCascadeText : "Scanning Pattern";
  scanningCascadeMnem : 'S';
procedure
  scanningCB(integer);
value
  SINUSOIDAL_VALUE : 0;
  sinusoidalButtonText : "Sinusoidal";
  LISSAJOU_VALUE : 1;
  lissajouButtonText : "Lissajou";
  ELLIPSOIDAL_VALUE : 2;
  ellipsoidalButtonText : "Ellipsoidal";

value
  displayCascadeText : "Display";
  displayCascadeMnem : 'D';

value
  lordDataCascadeText : "Lord Data";
  lordDataCascadeMnem : 'L';
procedure
  displayLordCB(integer);
value
  LORDRAWCABLE_VALUE : 0;
  lordRawCableButtonText : "Lord Raw Cable";

value
  simuDataCascadeText : "Simu Data";
  simuDataCascadeMnem : 'S';
procedure
  displaySimuCB(integer);
value
  SIMUGROUND_VALUE : 0;
  simuGroundButtonText : "Simu Ground";
  SIMUTREE_VALUE : 1;
  simuTreeButtonText : "Simu Tree";
  SIMUWALL_VALUE : 2;
  simuWallButtonText : "Simu Wall";
  SIMUCABLE_VALUE : 3;
  simuCableButtonText : "Simu Cable";

procedure
  popupMenuCB (integer);
procedure
  initPopupCB(string);
procedure
  popdownCB();
value
  RADIO_1_VALUE : 0;
  radio1Text :  "Start";
  RADIO_2_VALUE : 1;
  radio2Text :  "Stop";
  RADIO_3_VALUE : 2;
  radio3Text :  "Restart";