Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
Menu
Open sidebar
Institute of Technical Acoustics (ITA)
toolbox
Commits
f4091558
Commit
f4091558
authored
Jan 17, 2017
by
Markus Mueller-Trapet
Browse files
bugfix if instrument control toolbox is not available
parent
848c7178
Changes
1
Hide whitespace changes
Inline
Side-by-side
kernel/StandardRoutines/ccx.m
View file @
f4091558
...
...
@@ -3,8 +3,8 @@
% standard working directory setting used in open/write file GUIs.
% <ITA-Toolbox>
% This file is part of the ITA-Toolbox. Some rights reserved.
% You can find the license for this m-file in the license.txt file in the ITA-Toolbox folder.
% This file is part of the ITA-Toolbox. Some rights reserved.
% You can find the license for this m-file in the license.txt file in the ITA-Toolbox folder.
% </ITA-Toolbox>
% Author: Pascal Dietrich - pdi@akustik.rwth-aachen.de - 2007
...
...
@@ -12,30 +12,32 @@
try
%#ok<TRYNC>
dbquit
all
end
warning
off
%#ok<WNOFF>
warning
off
clear
classes
%RSC - needed to clean class references in case of changes
clear
global
%RSC - needed to clean up global variables from preferences or mpb_filter and free memory
clear
java
%RSC - reduces trouble with figures
clear
java
%RSC - reduces trouble with figures
if
usejava
(
'jvm'
)
%Only if jvm available (non_cluster)
s_obj
=
instrfind
();
if
~
isempty
(
s_obj
)
for
idx
=
1
:
length
(
s_obj
)
if
strcmpi
(
s_obj
(
idx
),
'closed'
)
elseif
strcmpi
(
s_obj
(
idx
),
'open'
)
fclose
(
s_obj
(
idx
));
if
exist
(
'instrfind'
,
'file'
)
s_obj
=
instrfind
();
if
~
isempty
(
s_obj
)
for
idx
=
1
:
length
(
s_obj
)
if
strcmpi
(
s_obj
(
idx
),
'closed'
)
elseif
strcmpi
(
s_obj
(
idx
),
'open'
)
fclose
(
s_obj
(
idx
));
end
disp
([
' deleting: '
s_obj
(
idx
)
.
Name
'...'
]);
delete
(
s_obj
(
idx
));
end
end
disp
([
' deleting: '
s_obj
(
idx
)
.
Name
'...'
]);
delete
(
s_obj
(
idx
));
end
end
end
end
if
exist
(
'playrec'
,
'file'
)
if
playrec
(
'isInitialised'
)
playrec
(
'reset'
);
end
if
playrec
(
'isInitialised'
)
playrec
(
'reset'
);
end
end
fclose
all
;
...
...
@@ -52,6 +54,6 @@ if usejava('jvm') % bugfix mpo
end
clc
warning
on
%#ok<WNON>
warning
off
MATLAB
:
log
:
logOfZero
warning
on
warning
off
MATLAB
:
log
:
logOfZero
warning
off
MATLAB
:
pfileOlderThanMfile
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment