M/VisualSapfor
1
1
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

no message

Browse Source
This commit is contained in:
02090095
2025-10-30 15:45:29 +03:00
parent 9cadbef661
commit f4c54acb3e
7 changed files with 29 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
src/_VisualDVM/Passes/All/Precompilation.java
View File

@@ -121,7 +121,7 @@ public class Precompilation extends Pass<db_project_info> {
return "";
}
protected String getFortranFlags() {
return "";
return Global.normalProperties.PrecompilationFlags;
}
protected void prepareForParse() throws Exception {
target.CleanAnalyses();
@@ -212,7 +212,11 @@ public class Precompilation extends Pass<db_project_info> {
}
@Override
protected boolean validate() {
return outputLines.stream().noneMatch(line -> line.toLowerCase().startsWith("error"));
return outputLines.stream().noneMatch(
line -> (line.toLowerCase().startsWith("error")
|| line.toLowerCase().startsWith("gfortran.exe: error:")
|| line.toLowerCase().startsWith("gfortran: error:")
));
}
@Override
protected void performDone() throws Exception {

9
src/_VisualDVM/Passes/All/UpdateProperty.java
View File

@@ -3,6 +3,7 @@ import Common.MainModule_;
import Common.Passes.Pass;
import Common.Visual.Windows.Dialog.SliderNumberForm;
import Common.Visual.Windows.Dialog.SpinnerNumberForm;
import Common.Visual.Windows.Dialog.Text.TextFieldDialog;
import Common.Visual.Windows.Dialog.VDirectoryChooser;
import Common.Visual.Windows.Dialog.VFileChooser;
import _VisualDVM.Global;
@@ -44,6 +45,14 @@ public class UpdateProperty extends Pass<Object> {
if (file != null)
newValue = file.getAbsolutePath();
break;
case "PrecompilationFlags":
TextFieldDialog textFieldDialog = new TextFieldDialog();
if (textFieldDialog.ShowDialog(description, oldValue)) {
newValue = textFieldDialog.Result;
if (newValue.toString().isEmpty())
newValue = " ";
}
break;
case "BugReportsAgeLimit":
if (sliderNumberForm.ShowDialog(description, oldValue, 1, 12))
newValue = sliderNumberForm.Result;