summaryrefslogtreecommitdiff
path: root/macros/ToolInitialization/ManageNextConversion.sci
diff options
context:
space:
mode:
authorSunil Shetye2019-05-16 12:18:48 +0530
committerSunil Shetye2019-05-29 11:08:01 +0530
commit26b77d7593b5ee0792b6b556f5569ea4227c2b02 (patch)
tree8f92052234b01bf39b9c3a6e3cb12b3962d96b1b /macros/ToolInitialization/ManageNextConversion.sci
parent5a73e6bec4a12db7afae9de300e39256f754d8d3 (diff)
downloadscilab2c-26b77d7593b5ee0792b6b556f5569ea4227c2b02.tar.gz
scilab2c-26b77d7593b5ee0792b6b556f5569ea4227c2b02.tar.bz2
scilab2c-26b77d7593b5ee0792b6b556f5569ea4227c2b02.zip
convert to unix format
Diffstat (limited to 'macros/ToolInitialization/ManageNextConversion.sci')
-rw-r--r--macros/ToolInitialization/ManageNextConversion.sci178
1 files changed, 89 insertions, 89 deletions
diff --git a/macros/ToolInitialization/ManageNextConversion.sci b/macros/ToolInitialization/ManageNextConversion.sci
index b0d4337b..f4bdc71d 100644
--- a/macros/ToolInitialization/ManageNextConversion.sci
+++ b/macros/ToolInitialization/ManageNextConversion.sci
@@ -1,89 +1,89 @@
-function FlagContinueTranslation = ManageNextConversion(FileInfoDatFile)
-// function FlagContinueTranslation = ManageNextConversion(FileInfoDatFile)
-// -----------------------------------------------------------------
-// //NUT: add description here
-//
-// Input data:
-// //NUT: add description here
-//
-// Output data:
-// //NUT: add description here
-//
-// Status:
-// 27-Oct-2007 -- Raffaele Nutricato: Author.
-//
-// Copyright 2007 Raffaele Nutricato.
-// Contact: raffaele.nutricato@tiscali.it
-// -----------------------------------------------------------------
-
-//NUT: verifica se update e managenexconversion possono essere integrate in un'unica funzione.
-
-// ------------------------------
-// --- Check input arguments. ---
-// ------------------------------
-SCI2CNInArgCheck(argn(2),1,1);
-
-// ---------------------
-// --- Load section. ---
-// ---------------------
-// --- Load File Info Structure. ---
-load(FileInfoDatFile,'FileInfo');
-
-// --- Load Shared Info Structure. ---
-load(FileInfo.SharedInfoDatFile,'SharedInfo');
-
-// --- Load ToBeConverted .dat file. ---
-load(FileInfo.FunctionList.ToBeConvertedDat,'ToBeConverted');
-// -------------------------
-// --- End load section. ---
-// -------------------------
-
-FlagContinueTranslation = 0;
-
-// ------------------------------------
-// --- Finalize the current C code. ---
-// ------------------------------------
-C_FinalizeCode(FileInfo,SharedInfo);
-//PrintStringInfo(' hello',ReportFileName,'file','y');
-
-
-// ------------------------------------------------
-// --- Identify the next function to translate. ---
-// ------------------------------------------------
-SharedInfo.NFilesToTranslate = SharedInfo.NFilesToTranslate - 1;
-
-if (SharedInfo.NFilesToTranslate >= 1)
- // Remove the translated C function from the ToBeConverted list
- ToBeConverted(1) = [];
- FlagContinueTranslation = 1;
- SharedInfo.NextSCIFunName = ToBeConverted(1).SCIFunctionName;
- SharedInfo.NextCFunName = ToBeConverted(1).CFunctionName;
- SharedInfo.NextSCIFunNumber = SharedInfo.NextSCIFunNumber + 1;
- [FlagFound,SharedInfo.NextSCIFileName] = ...
- SCI2CFindFile(FileInfo.UserSciFilesPaths,SharedInfo.NextSCIFunName+'.sci');
- if (FlagFound == 0)
- error(9999, 'Cannot find a scilab file to generate ""'+SharedInfo.NextCFunName+'"".');
- end
-end
-// ----------------------------------------------------
-// --- End Identify the next function to translate. ---
-// ----------------------------------------------------
-
-
-// ---------------------
-// --- Save section. ---
-// ---------------------
-// --- Save Shared Info Structure. ---
-save(FileInfo.SharedInfoDatFile, "SharedInfo");
-clear SharedInfo
-
-// --- Save ToBeConverted .dat file. ---
-save(FileInfo.FunctionList.ToBeConvertedDat, "ToBeConverted");
-clear ToBeConverted
-
-clear FileInfo
-// -------------------------
-// --- End Save section. ---
-// -------------------------
-
-endfunction
+function FlagContinueTranslation = ManageNextConversion(FileInfoDatFile)
+// function FlagContinueTranslation = ManageNextConversion(FileInfoDatFile)
+// -----------------------------------------------------------------
+// //NUT: add description here
+//
+// Input data:
+// //NUT: add description here
+//
+// Output data:
+// //NUT: add description here
+//
+// Status:
+// 27-Oct-2007 -- Raffaele Nutricato: Author.
+//
+// Copyright 2007 Raffaele Nutricato.
+// Contact: raffaele.nutricato@tiscali.it
+// -----------------------------------------------------------------
+
+//NUT: verifica se update e managenexconversion possono essere integrate in un'unica funzione.
+
+// ------------------------------
+// --- Check input arguments. ---
+// ------------------------------
+SCI2CNInArgCheck(argn(2),1,1);
+
+// ---------------------
+// --- Load section. ---
+// ---------------------
+// --- Load File Info Structure. ---
+load(FileInfoDatFile,'FileInfo');
+
+// --- Load Shared Info Structure. ---
+load(FileInfo.SharedInfoDatFile,'SharedInfo');
+
+// --- Load ToBeConverted .dat file. ---
+load(FileInfo.FunctionList.ToBeConvertedDat,'ToBeConverted');
+// -------------------------
+// --- End load section. ---
+// -------------------------
+
+FlagContinueTranslation = 0;
+
+// ------------------------------------
+// --- Finalize the current C code. ---
+// ------------------------------------
+C_FinalizeCode(FileInfo,SharedInfo);
+//PrintStringInfo(' hello',ReportFileName,'file','y');
+
+
+// ------------------------------------------------
+// --- Identify the next function to translate. ---
+// ------------------------------------------------
+SharedInfo.NFilesToTranslate = SharedInfo.NFilesToTranslate - 1;
+
+if (SharedInfo.NFilesToTranslate >= 1)
+ // Remove the translated C function from the ToBeConverted list
+ ToBeConverted(1) = [];
+ FlagContinueTranslation = 1;
+ SharedInfo.NextSCIFunName = ToBeConverted(1).SCIFunctionName;
+ SharedInfo.NextCFunName = ToBeConverted(1).CFunctionName;
+ SharedInfo.NextSCIFunNumber = SharedInfo.NextSCIFunNumber + 1;
+ [FlagFound,SharedInfo.NextSCIFileName] = ...
+ SCI2CFindFile(FileInfo.UserSciFilesPaths,SharedInfo.NextSCIFunName+'.sci');
+ if (FlagFound == 0)
+ error(9999, 'Cannot find a scilab file to generate ""'+SharedInfo.NextCFunName+'"".');
+ end
+end
+// ----------------------------------------------------
+// --- End Identify the next function to translate. ---
+// ----------------------------------------------------
+
+
+// ---------------------
+// --- Save section. ---
+// ---------------------
+// --- Save Shared Info Structure. ---
+save(FileInfo.SharedInfoDatFile, "SharedInfo");
+clear SharedInfo
+
+// --- Save ToBeConverted .dat file. ---
+save(FileInfo.FunctionList.ToBeConvertedDat, "ToBeConverted");
+clear ToBeConverted
+
+clear FileInfo
+// -------------------------
+// --- End Save section. ---
+// -------------------------
+
+endfunction