Diff of /ltfatstart.m [6cd45d] .. [41302f]  Maximize  Restore

Switch to unified view

a/ltfatstart.m b/ltfatstart.m
...
...
43
    error(MSG);
43
    error(MSG);
44
else
44
else
45
    ltfat_version = fgetl (FID);
45
    ltfat_version = fgetl (FID);
46
    fclose(FID);
46
    fclose(FID);
47
end
47
end
48
49
%% --- Check for old versions of Octave and Matlab
50
if isoctave
51
   major_rq=3;
52
   minor_rq=6;
53
   intp='Octave';
54
   req_versionname='3.6.0';
55
else
56
   major_rq=7;
57
   minor_rq=9;
58
   intp='Matlab';
59
   req_versionname='2009b';
60
end;
61
62
% Split into major and minor version
63
s=version;
64
stops=find(s=='.');
65
major_no  = str2num(s(1:stops(1)));
66
if numel(stops)==1
67
  minor_no  = str2num(s(stops(1)+1:end));
68
  bugfix_no = 0;
69
else
70
  minor_no  = str2num(s(stops(1)+1:stops(2)));
71
  bugfix_no = str2num(s(stops(2)+1:end));
72
end;
73
74
% Do the check, multiply by some big number to make the check easy
75
if major_rq*1000+minor_rq>major_no*1000+minor_no
76
  warning(['Your version of %s is too old for this version of LTFAT ' ...
77
         'to function proberly. Your need at least version %s of %s.'],...
78
    intp,req_versionname,intp);
79
end;
48
80
49
81
50
%% -----------  install the modules -----------------
82
%% -----------  install the modules -----------------
51
83
52
modules={};
84
modules={};
...
...
110
%    end;
142
%    end;
111
%  end;
143
%  end;
112
%end;
144
%end;
113
145
114
if ltfatstartprint
146
if ltfatstartprint
147
  try
115
  s=which('comp_pgauss');
148
    s=which('comp_pgauss');
116
  if isempty(s)
149
    if isempty(s)
117
    error('comp_pgauss not found, something is wrong.')
150
      error('comp_pgauss not found, something is wrong.')
118
  end;
151
    end;
119
  
152
  
120
  if strcmp(s(end-1:end),'.m')
153
    if strcmp(s(end-1:end),'.m')
121
    backend = 'LTFAT is using the script language backend.';
154
      backend = 'LTFAT is using the script language backend.';
122
  else
123
    if isoctave
124
      backend = 'LTFAT is using the C++ Octave backend.';
125
    else
155
    else
156
      if isoctave
157
        backend = 'LTFAT is using the C++ Octave backend.';
158
      else
126
      backend = 'LTFAT is using the MEX backend.';
159
        backend = 'LTFAT is using the MEX backend.';
160
      end;
127
    end;
161
    end;
162
  catch
163
    backend = 'Error with backend, consider running "ltfatmex clean" immidiatly.';
128
  end;
164
  end; 
129
  
165
  
130
  banner = sprintf(['LTFAT version %s. Copyright 2005-2013 Peter L. Søndergaard. ' ...
166
  banner = sprintf(['LTFAT version %s. Copyright 2005-2013 Peter L. Søndergaard. ' ...
131
                    'For help, please type "ltfathelp". %s'], ...
167
                    'For help, please type "ltfathelp". %s'], ...
132
                   ltfat_version,backend);
168
                   ltfat_version,backend);
133
  
169
  
...
...
148
%% ---------- other initializations ---------------------
184
%% ---------- other initializations ---------------------
149
185
150
% Force the loading of FFTW, necessary for Matlab 64 bit on Linux. Thanks
186
% Force the loading of FFTW, necessary for Matlab 64 bit on Linux. Thanks
151
% to NFFT for this trick.
187
% to NFFT for this trick.
152
fft([1,2,3,4]);
188
fft([1,2,3,4]);
189

Get latest updates about Open Source Projects, Conferences and News.

Sign up for the SourceForge newsletter:

JavaScript is required for this form.





No, thanks