diff options
Diffstat (limited to 'languages/pascal/compiler/fpcoptions/optiontabs.cpp')
-rw-r--r-- | languages/pascal/compiler/fpcoptions/optiontabs.cpp | 132 |
1 files changed, 66 insertions, 66 deletions
diff --git a/languages/pascal/compiler/fpcoptions/optiontabs.cpp b/languages/pascal/compiler/fpcoptions/optiontabs.cpp index 5dd69349..445ab826 100644 --- a/languages/pascal/compiler/fpcoptions/optiontabs.cpp +++ b/languages/pascal/compiler/fpcoptions/optiontabs.cpp @@ -26,14 +26,14 @@ FeedbackTab::FeedbackTab(TQWidget *parent, const char *name) : TQWidget(parent, name), controller(new FlagCheckBoxController(TQStringList::split(",","-v"))) { - TQBoxLayout *tqlayout = new TQVBoxLayout(this, KDialog::marginHint(), KDialog::spacingHint()); - tqlayout->setAutoAdd(true); + TQBoxLayout *layout = new TQVBoxLayout(this, KDialog::marginHint(), KDialog::spacingHint()); + layout->setAutoAdd(true); TQVButtonGroup *output_group = new TQVButtonGroup(i18n("Output"), this); new FlagCheckBox(output_group, controller, "-vr", i18n("Format errors like GCC does")); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - tqlayout->addSpacing(10); + layout->addSpacing(10); TQVButtonGroup *verbose_group = new TQVButtonGroup(i18n("Verbose"), this); new FlagCheckBox(verbose_group, controller, @@ -54,7 +54,7 @@ FeedbackTab::FeedbackTab(TQWidget *parent, const char *name) "-vd", i18n("Write other debugging info")); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - tqlayout->addSpacing(10); + layout->addSpacing(10); TQVButtonGroup *other_group = new TQVButtonGroup(i18n("Other Information"), this); new FlagCheckBox(other_group, controller, @@ -74,7 +74,7 @@ FeedbackTab::FeedbackTab(TQWidget *parent, const char *name) TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - tqlayout->addStretch(); + layout->addStretch(); } FeedbackTab::~FeedbackTab() @@ -98,8 +98,8 @@ FilesAndDirectoriesTab::FilesAndDirectoriesTab( TQWidget * parent, const char * :TQWidget(parent, name), controller(new FlagCheckBoxController()), pathController(new FlagPathEditController()) { - TQBoxLayout *tqlayout = new TQVBoxLayout(this, KDialog::marginHint(), KDialog::spacingHint()); - tqlayout->setAutoAdd(true); + TQBoxLayout *layout = new TQVBoxLayout(this, KDialog::marginHint(), KDialog::spacingHint()); + layout->setAutoAdd(true); new FlagPathEdit(this, ":", pathController, "-Fu", i18n("Unit search path (delimited by \":\"):")); @@ -110,7 +110,7 @@ FilesAndDirectoriesTab::FilesAndDirectoriesTab( TQWidget * parent, const char * new FlagPathEdit(this, ":", pathController, "-Fl", i18n("Library search path (delimited by \":\"):")); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - tqlayout->addStretch(); + layout->addStretch(); } FilesAndDirectoriesTab::~FilesAndDirectoriesTab( ) @@ -135,8 +135,8 @@ FilesAndDirectoriesTab2::FilesAndDirectoriesTab2( TQWidget * parent, const char :TQWidget(parent, name), controller(new FlagCheckBoxController()), pathController(new FlagPathEditController()) { - TQBoxLayout *tqlayout = new TQVBoxLayout(this, KDialog::marginHint(), KDialog::spacingHint()); - tqlayout->setAutoAdd(true); + TQBoxLayout *layout = new TQVBoxLayout(this, KDialog::marginHint(), KDialog::spacingHint()); + layout->setAutoAdd(true); new FlagPathEdit(this, "", pathController, "-FE", i18n("Write executables and units in:")); @@ -145,14 +145,14 @@ FilesAndDirectoriesTab2::FilesAndDirectoriesTab2( TQWidget * parent, const char new FlagPathEdit(this, "", pathController, "-o", i18n("Executable name:"), KFile::File); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - tqlayout->addSpacing(20); + layout->addSpacing(20); new FlagPathEdit(this, "", pathController, "-e", i18n("Location of as and ld programs:")); new FlagPathEdit(this, "", pathController, "-FL", i18n("Dynamic linker executable:"), KFile::File); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - tqlayout->addSpacing(20); + layout->addSpacing(20); new FlagPathEdit(this, "", pathController, "-Fr", i18n("Compiler messages file:"), KFile::File); @@ -160,7 +160,7 @@ FilesAndDirectoriesTab2::FilesAndDirectoriesTab2( TQWidget * parent, const char "-Fe", i18n("Write compiler messages to file:"), KFile::File); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - tqlayout->addStretch(); + layout->addStretch(); } FilesAndDirectoriesTab2::~FilesAndDirectoriesTab2( ) @@ -185,8 +185,8 @@ void FilesAndDirectoriesTab2::writeFlags( TQStringList * str ) LanguageTab::LanguageTab( TQWidget * parent, const char * name ) : TQWidget(parent, name), controller(new FlagCheckBoxController(TQStringList::split(",","-v"))) { - TQBoxLayout *tqlayout = new TQVBoxLayout(this, KDialog::marginHint(), KDialog::spacingHint()); - tqlayout->setAutoAdd(true); + TQBoxLayout *layout = new TQVBoxLayout(this, KDialog::marginHint(), KDialog::spacingHint()); + layout->setAutoAdd(true); TQVButtonGroup *compat_group = new TQVButtonGroup(i18n("Pascal Compatibility"), this); new FlagCheckBox(compat_group, controller, @@ -198,7 +198,7 @@ LanguageTab::LanguageTab( TQWidget * parent, const char * name ) new FlagCheckBox(compat_group, controller, "-Sp", i18n("GNU Pascal compatibility mode")); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - tqlayout->addSpacing(10); + layout->addSpacing(10); TQVButtonGroup *ccompat_group = new TQVButtonGroup(i18n("C/C++ Compatibility"), this); new FlagCheckBox(ccompat_group, controller, @@ -208,7 +208,7 @@ LanguageTab::LanguageTab( TQWidget * parent, const char * name ) new FlagCheckBox(ccompat_group, controller, "-Sm", i18n("Support C style macros")); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - tqlayout->addSpacing(10); + layout->addSpacing(10); TQVButtonGroup *lang_group = new TQVButtonGroup(i18n("Language"), this); new FlagCheckBox(lang_group, controller, @@ -221,7 +221,7 @@ LanguageTab::LanguageTab( TQWidget * parent, const char * name ) "-St", i18n("Allow the static keyword in objects")); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - tqlayout->addStretch(); + layout->addStretch(); } LanguageTab::~ LanguageTab( ) @@ -243,10 +243,10 @@ AssemblerTab::AssemblerTab( TQWidget * parent, const char * name ) : TQWidget(parent, name), controller(new FlagCheckBoxController()), asmController(new FlagRadioButtonController) { - TQBoxLayout *tqlayout = new TQVBoxLayout(this, KDialog::marginHint(), KDialog::spacingHint()); -// tqlayout->setAutoAdd(true); + TQBoxLayout *layout = new TQVBoxLayout(this, KDialog::marginHint(), KDialog::spacingHint()); +// layout->setAutoAdd(true); - TQBoxLayout *tqlayout2 = new TQHBoxLayout(tqlayout, KDialog::spacingHint()); + TQBoxLayout *layout2 = new TQHBoxLayout(layout, KDialog::spacingHint()); TQVButtonGroup *info_group = new TQVButtonGroup(i18n("Assembler Info"), this); new FlagCheckBox(info_group, controller, @@ -257,9 +257,9 @@ AssemblerTab::AssemblerTab( TQWidget * parent, const char * name ) "-ar", i18n("List register allocation and release info")); new FlagCheckBox(info_group, controller, "-at", i18n("List temporary allocations and deallocations")); - tqlayout2->addWidget(info_group); + layout2->addWidget(info_group); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - //tqlayout->addSpacing(10); + //layout->addSpacing(10); TQVButtonGroup *asmkind_group = new TQVButtonGroup(i18n("Assembler Reader"), this); TQRadioButton *m_defaultkind = new TQRadioButton(i18n("Use default reader"), asmkind_group); @@ -270,9 +270,9 @@ AssemblerTab::AssemblerTab( TQWidget * parent, const char * name ) "-Rintel", i18n("Intel style assembler")); new FlagRadioButton(asmkind_group, asmController, "-Rdirect", i18n("Direct assembler")); - tqlayout2->addWidget(asmkind_group); + layout2->addWidget(asmkind_group); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - tqlayout->addSpacing(10); + layout->addSpacing(10); TQVButtonGroup *asm_group = new TQVButtonGroup(i18n("Assembler Output"), this); @@ -298,10 +298,10 @@ AssemblerTab::AssemblerTab( TQWidget * parent, const char * name ) "-Acoff", i18n("Use coff")); new FlagRadioButton(asm_group, asmController, "-Apecoff", i18n("Use pecoff")); - tqlayout->addWidget(asm_group); + layout->addWidget(asm_group); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - tqlayout->addStretch(); + layout->addStretch(); } AssemblerTab::~ AssemblerTab( ) @@ -328,12 +328,12 @@ DebugOptimTab::DebugOptimTab( TQWidget * parent, const char * name ) : TQWidget(parent, name), controller(new FlagCheckBoxController()), optimController(new FlagRadioButtonController) { - TQBoxLayout *tqlayout = new TQVBoxLayout(this, KDialog::marginHint(), KDialog::spacingHint()); -// tqlayout->setAutoAdd(true); + TQBoxLayout *layout = new TQVBoxLayout(this, KDialog::marginHint(), KDialog::spacingHint()); +// layout->setAutoAdd(true); - TQBoxLayout *tqlayout2 = new TQHBoxLayout(tqlayout, KDialog::spacingHint()); + TQBoxLayout *layout2 = new TQHBoxLayout(layout, KDialog::spacingHint()); - TQBoxLayout *tqlayout3 = new TQVBoxLayout(tqlayout2, KDialog::spacingHint()); + TQBoxLayout *layout3 = new TQVBoxLayout(layout2, KDialog::spacingHint()); TQVButtonGroup *debug_group = new TQVButtonGroup(i18n("Debugging"), this); new FlagCheckBox(debug_group, controller, @@ -346,18 +346,18 @@ DebugOptimTab::DebugOptimTab( TQWidget * parent, const char * name ) "-gh", i18n("Use heaptrc unit"), "-!gh"); new FlagCheckBox(debug_group, controller, "-gc", i18n("Generate checks for pointers"), "-!gc"); - tqlayout3->addWidget(debug_group); + layout3->addWidget(debug_group); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - tqlayout3->addSpacing(10); + layout3->addSpacing(10); TQVButtonGroup *profile_group = new TQVButtonGroup(i18n("Profiling"), this); new FlagCheckBox(profile_group, controller, "-pg", i18n("Generate profiler code for gprof"), "-!pg"); - tqlayout3->addWidget(profile_group); + layout3->addWidget(profile_group); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - tqlayout3->addSpacing(10); + layout3->addSpacing(10); - TQBoxLayout *tqlayout4 = new TQVBoxLayout(tqlayout2, KDialog::spacingHint()); + TQBoxLayout *layout4 = new TQVBoxLayout(layout2, KDialog::spacingHint()); TQVButtonGroup *optim_group1 = new TQVButtonGroup(i18n("General Optimization"), this); m_default = new TQRadioButton(i18n("Default"), optim_group1); @@ -366,9 +366,9 @@ DebugOptimTab::DebugOptimTab( TQWidget * parent, const char * name ) "-Og", i18n("Generate smaller code")); optim1 = new FlagRadioButton(optim_group1, optimController, "-OG", i18n("Generate faster code")); - tqlayout4->addWidget(optim_group1); + layout4->addWidget(optim_group1); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - tqlayout4->addSpacing(10); + layout4->addSpacing(10); TQVButtonGroup *optim_group2 = new TQVButtonGroup(i18n("Optimization Levels"), this); m_default2 = new TQRadioButton(i18n("Default"), optim_group2); @@ -379,11 +379,11 @@ DebugOptimTab::DebugOptimTab( TQWidget * parent, const char * name ) "-O2", i18n("Level 2")); optim2 = new FlagRadioButton(optim_group2, optimController, "-O3", i18n("Level 3")); - tqlayout4->addWidget(optim_group2); + layout4->addWidget(optim_group2); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - tqlayout4->addSpacing(10); + layout4->addSpacing(10); - TQHBoxLayout *tqlayout5 = new TQHBoxLayout(tqlayout, KDialog::spacingHint()); + TQHBoxLayout *layout5 = new TQHBoxLayout(layout, KDialog::spacingHint()); TQVButtonGroup *optim_group3 = new TQVButtonGroup(i18n("Architecture"), this); m_default3 = new TQRadioButton(i18n("Default"), optim_group3); @@ -394,7 +394,7 @@ DebugOptimTab::DebugOptimTab( TQWidget * parent, const char * name ) "-Op2", i18n("Pentium/PentiumMMX")); new FlagRadioButton(optim_group3, optimController, "-Op2", i18n("PentiumPro/PII/Cyrix 6x86/K6")); - tqlayout5->addWidget(optim_group3); + layout5->addWidget(optim_group3); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); TQVButtonGroup *optim_group4 = new TQVButtonGroup(i18n("Another Optimization"), this); @@ -402,18 +402,18 @@ DebugOptimTab::DebugOptimTab( TQWidget * parent, const char * name ) "-Or", i18n("Use register variables"), "-!Or"); new FlagCheckBox(optim_group4, controller, "-Ou", i18n("Uncertain optimizations"), "-!Ou"); - tqlayout5->addWidget(optim_group4); + layout5->addWidget(optim_group4); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - TQHBoxLayout *tqlayout6 = new TQHBoxLayout(tqlayout, KDialog::spacingHint()); + TQHBoxLayout *layout6 = new TQHBoxLayout(layout, KDialog::spacingHint()); TQPushButton *release = new TQPushButton(i18n("Release"), this); TQPushButton *debug = new TQPushButton(i18n("Debug"), this); - tqlayout6->addWidget(release); - tqlayout6->addWidget(debug); + layout6->addWidget(release); + layout6->addWidget(debug); connect(release, TQT_SIGNAL(clicked()), this, TQT_SLOT(setReleaseOptions())); connect(debug, TQT_SIGNAL(clicked()), this, TQT_SLOT(setDebugOptions())); - tqlayout->addStretch(); + layout->addStretch(); } DebugOptimTab::~ DebugOptimTab( ) @@ -458,8 +458,8 @@ CodegenTab::CodegenTab( TQWidget * parent, const char * name ) : TQWidget(parent, name), controller(new FlagCheckBoxController()), listController(new FlagEditController()) { - TQBoxLayout *tqlayout = new TQVBoxLayout(this, KDialog::marginHint(), KDialog::spacingHint()); - tqlayout->setAutoAdd(true); + TQBoxLayout *layout = new TQVBoxLayout(this, KDialog::marginHint(), KDialog::spacingHint()); + layout->setAutoAdd(true); TQVButtonGroup *compile_group = new TQVButtonGroup(i18n("Compile Time Checks"), this); new FlagCheckBox(compile_group, controller, @@ -467,7 +467,7 @@ CodegenTab::CodegenTab( TQWidget * parent, const char * name ) new FlagCheckBox(compile_group, controller, "-Un", i18n("Do not check the unit name for being the same as the file name")); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - tqlayout->addSpacing(10); + layout->addSpacing(10); TQVButtonGroup *run_group = new TQVButtonGroup(i18n("Run Time Checks"), this); new FlagCheckBox(run_group, controller, @@ -479,14 +479,14 @@ CodegenTab::CodegenTab( TQWidget * parent, const char * name ) new FlagCheckBox(run_group, controller, "-Co", i18n("Integer overflow checking")); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - tqlayout->addSpacing(10); + layout->addSpacing(10); new FlagListEdit(this, ":", listController, "-d", i18n("Conditional defines (delimited by \":\"):")); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); new FlagListEdit(this, ":", listController, "-u", i18n("Undefine conditional defines (delimited by \":\"):")); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - tqlayout->addSpacing(10); + layout->addSpacing(10); new FlagSpinEdit(this, 1024, 67107840, 1, 131072, listController, "-Cs", i18n("Stack size:")); @@ -494,7 +494,7 @@ CodegenTab::CodegenTab( TQWidget * parent, const char * name ) "-Ch", i18n("Heap size:")); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - tqlayout->addStretch(); + layout->addStretch(); } CodegenTab::~ CodegenTab( ) @@ -519,9 +519,9 @@ LinkerTab::LinkerTab( TQWidget * parent, const char * name ) : TQWidget(parent, name), controller(new FlagCheckBoxController()), listController(new FlagEditController()) { - TQBoxLayout *tqlayout = new TQVBoxLayout(this, KDialog::marginHint(), KDialog::spacingHint()); + TQBoxLayout *layout = new TQVBoxLayout(this, KDialog::marginHint(), KDialog::spacingHint()); - TQBoxLayout *tqlayout2 = new TQHBoxLayout(tqlayout, KDialog::spacingHint()); + TQBoxLayout *layout2 = new TQHBoxLayout(layout, KDialog::spacingHint()); TQVButtonGroup *link_group = new TQVButtonGroup(i18n("Linking Stage"), this); new FlagCheckBox(link_group, controller, @@ -534,7 +534,7 @@ LinkerTab::LinkerTab( TQWidget * parent, const char * name ) "-Cn", i18n("Omit the linking stage")); new FlagCheckBox(link_group, controller, "-s", i18n("Create assembling and linking script")); - tqlayout2->addWidget(link_group); + layout2->addWidget(link_group); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); TQVButtonGroup *exec_group = new TQVButtonGroup(i18n("Executable Generation"), this); @@ -548,15 +548,15 @@ LinkerTab::LinkerTab( TQWidget * parent, const char * name ) "-XD", i18n("Link with dynamic libraries")); new FlagCheckBox(exec_group, controller, "-Xc", i18n("Link with the C library")); - tqlayout2->addWidget(exec_group); + layout2->addWidget(exec_group); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - tqlayout->addSpacing(10); + layout->addSpacing(10); FlagListEdit *led = new FlagListEdit(this, ":", listController, "-k", i18n("Options passed to the linker (delimited by \":\"):")); - tqlayout->addWidget(led); + layout->addWidget(led); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - tqlayout->addStretch(); + layout->addStretch(); } LinkerTab::~LinkerTab( ) @@ -583,8 +583,8 @@ MiscTab::MiscTab( TQWidget * parent, const char * name ) pathController(new FlagPathEditController()), editController(new FlagEditController()) { - TQBoxLayout *tqlayout = new TQVBoxLayout(this, KDialog::marginHint(), KDialog::spacingHint()); - tqlayout->setAutoAdd(true); + TQBoxLayout *layout = new TQVBoxLayout(this, KDialog::marginHint(), KDialog::spacingHint()); + layout->setAutoAdd(true); new FlagCheckBox(this, controller, "-B", i18n("Recompile all used units")); @@ -595,7 +595,7 @@ MiscTab::MiscTab( TQWidget * parent, const char * name ) new FlagSpinEdit(this, 1, 1000, 1, 50, editController, "-Se", i18n("Stop after the error:")); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - tqlayout->addSpacing(10); + layout->addSpacing(10); TQVButtonGroup *browser_group = new TQVButtonGroup(i18n("Browser Info"), this); TQRadioButton *m_defaultBrowser = new TQRadioButton(i18n("No browser info"), browser_group); @@ -605,7 +605,7 @@ MiscTab::MiscTab( TQWidget * parent, const char * name ) new FlagRadioButton(browser_group, radioController, "-bl", i18n("Global and local browser info")); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - tqlayout->addSpacing(10); + layout->addSpacing(10); TQVButtonGroup *target_group = new TQVButtonGroup(i18n("Target OS"), this); TQRadioButton *m_defaultTarget = new TQRadioButton(i18n("Default"), target_group); @@ -625,9 +625,9 @@ MiscTab::MiscTab( TQWidget * parent, const char * name ) new FlagRadioButton(target_group, radioController, "-TBEOS", i18n("BeOS")); TQApplication::sendPostedEvents(this, TQEvent::ChildInserted); - tqlayout->addSpacing(10); + layout->addSpacing(10); - tqlayout->addStretch(); + layout->addStretch(); } MiscTab::~ MiscTab( ) |