diff --git a/src/dtest.m b/src/dtest.m
index 2d1a76fb14e08a2d336a0d107cd0fbac5a9056e6..8a76f7406343763a13355113f6536232555a16bb 100644
--- a/src/dtest.m
+++ b/src/dtest.m
@@ -40,7 +40,7 @@ if nargin>1 || isempty(tpath)
 end
 
 % Relative path
-[fpath, fname, ext] = fileparts(fun);
+[fpath, fname] = fileparts(fun);
 
 % Absolute path
 fpath = [original_directory filesep fpath];
@@ -73,4 +73,4 @@ end
 
 if nargin>1 || isempty(tpath)
     cd(original_directory);
-end
\ No newline at end of file
+end
diff --git a/src/get_directory_description.m b/src/get_directory_description.m
index 4039fddf993a40aaa609123d9029938c65061830..87181020eecad34f18aee88171fed58375b30dc8 100644
--- a/src/get_directory_description.m
+++ b/src/get_directory_description.m
@@ -41,7 +41,7 @@ for f=1:length(dd)
             flist = { flist{:} r{:} };
         else
             % Filter out files without m extension.
-            [make, my, ext] = fileparts(dd(f).name);
+            [~, ~, ext] = fileparts(dd(f).name);
             if isequal(ext, '.m')
                 flist{length(flist)+1} = [basedir filesep dd(f).name];
             end
diff --git a/src/mtest.m b/src/mtest.m
index 223de435d251a3da6ceba492f30610fc0859e8b9..b165a0f4223d123a5c172723d4c679daa566d7d1 100644
--- a/src/mtest.m
+++ b/src/mtest.m
@@ -48,7 +48,7 @@ check = 1;
 if nargin<2 || isempty(fpath)
     fname = append_extension_if_needed(fname);
     fid = fopen(fname,'r');
-    [~, FNAME, vessel] = fileparts(fname);
+    [~, FNAME] = fileparts(fname);
 else
     fname = append_extension_if_needed(fname);
     fid = fopen([fpath filesep fname],'r');