first commit

1 files changed, 37 insertions, 0 deletions

diff --git a/etc/scilab_toolbox.quit b/etc/scilab_toolbox.quit
new file mode 100644
index 0000000..f3ee38e
--- /dev/null
+++ b/etc/scilab_toolbox.quit
@@ -0,0 +1,37 @@
+// This file is released under the 3-clause BSD license. See COPYING-BSD.
+
+// Some specific hooks can be specify here when the module is unloaded.
+
+function quitModule()
+
+    etc_tlbx  = get_absolute_file_path("scilab_toolbox.quit");
+    etc_tlbx  = getshortpathname(etc_tlbx);
+    root_tlbx = strncpy( etc_tlbx, length(etc_tlbx)-length("\etc\") );
+
+    //unlink libraries
+    [bOK, ilib] = c_link('skeleton_cpp');
+    if bOK then
+        ulink(ilib);
+    end
+
+    [bOK, ilib] = c_link('skeleton_c');
+    if bOK then
+        ulink(ilib);
+    end
+
+    [bOK, ilib] = c_link('skeleton_fortran');
+    if bOK then
+        ulink(ilib);
+    end
+
+    // Remove Preferences GUI
+    // =============================================================================
+    if getscilabmode() == "STD" then
+    removeModulePreferences(root_tlbx);
+    end
+
+endfunction
+
+
+quitModule();
+clear quitModule;