Skip to content
Snippets Groups Projects
Select Git revision
  • 9fcc73f41f55b25e13d0b3a58a57834ffe61e25a
  • master default
  • 4.6
  • dynare_minreal
  • dragonfly
  • various_fixes
  • 4.5
  • clang+openmp
  • dynamic-striated
  • occbin
  • exo_steady_state
  • filter_initial_state
  • declare_vars_in_model_block
  • exceptions
  • rmExtraExo
  • julia
  • error_msg_undeclared_model_vars
  • static_aux_vars
  • slice
  • aux_func
  • penalty
  • 4.6.4
  • 4.6.3
  • 4.6.2
  • 4.6.1
  • 4.6.0
  • 4.6.0-rc2
  • 4.6.0-rc1
  • 4.6-beta1
  • 4.5.7
  • 4.5.6
  • 4.5.5
  • 4.5.4
  • 4.5.3
  • 4.5.2
  • 4.5.1
  • 4.5.0
  • 4.4.3
  • 4.4.2
  • 4.4.1
  • 4.4.0
41 results

CheckPath.m

Blame
  • Forked from Dynare / dynare
    Source project has a limited visibility.
    add_path_to_mex_files.m 3.13 KiB
    function mexpath = add_path_to_mex_files(dynareroot, modifypath)
    
    % Copyright (C) 2015-2020 Dynare Team
    %
    % This file is part of Dynare.
    %
    % Dynare is free software: you can redistribute it and/or modify
    % it under the terms of the GNU General Public License as published by
    % the Free Software Foundation, either version 3 of the License, or
    % (at your option) any later version.
    %
    % Dynare is distributed in the hope that it will be useful,
    % but WITHOUT ANY WARRANTY; without even the implied warranty of
    % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    % GNU General Public License for more details.
    %
    % You should have received a copy of the GNU General Public License
    % along with Dynare.  If not, see <http://www.gnu.org/licenses/>.
    
    if nargin<2
        modifypath = true;
    end
    
    if isoctave
        % Add specific paths for Dynare Windows package
        if ispc
            if strcmpi(computer(), 'i686-w64-mingw32')
                warning('MEX files not available for 32-bit Octave')
            else
                tmp = [dynareroot '../mex/octave/win64/'];
                if exist(tmp, 'dir')
                    mexpath = tmp;
                    if modifypath
                        addpath(mexpath);
                    end
                end
            end
        end
        % Add generic MATLAB path (with higher priority than the previous ones)
        if exist('mexpath')
            mexpath = { mexpath; [dynareroot '../mex/octave/'] };
        else
            mexpath = { [dynareroot '../mex/octave/'] };
        end
        if modifypath
            addpath([dynareroot '../mex/octave/']);
        end
    else
        if strcmp(computer, 'PCWIN')
            warning('MEX files not available for 32-bit MATLAB')
        end
        % Add win64 specific paths for Dynare Windows package
        if strcmp(computer, 'PCWIN64')
            if matlab_ver_less_than('9.4')
                tmp = [dynareroot '../mex/matlab/win64-8.3-9.3/'];
                if exist(tmp, 'dir')
                    mexpath = tmp;
                    if modifypath
                        addpath(mexpath);
                    end
                end
            else
                tmp = [dynareroot '../mex/matlab/win64-9.4-9.9/'];
                if exist(tmp, 'dir')
                    mexpath = tmp;
                    if modifypath
                        addpath(mexpath);
                    end
                end
            end
        end
        % Add macOS paths for Dynare Mac package
        if strcmp(computer, 'MACI64')
            if matlab_ver_less_than('9.4')
                tmp = [dynareroot '../mex/matlab/maci64-8.3-9.3/'];
                if exist(tmp, 'dir')
                    mexpath = tmp;
                    if modifypath
                        addpath(mexpath);
                    end
                end
            else
                tmp = [dynareroot '../mex/matlab/maci64-9.4-9.9'];
                if exist(tmp, 'dir')
                    mexpath = tmp;
                    if modifypath
                        addpath(mexpath);
                    end
                end
            end
        end
        % Add generic MATLAB path (with higher priority than the previous ones)
        if exist('mexpath')
            mexpath = { mexpath; [dynareroot '../mex/matlab/'] };
        else
            mexpath = { [dynareroot '../mex/matlab/'] };
        end
        if modifypath
            addpath([dynareroot '../mex/matlab/']);
        end
    end