Mercurial > mxe-octave
view src/of-queueing-1-octave7.patch @ 6340:720a837ff693 release
add libmodbus
* src/libmodbus.mk: new file
* dist-files.mk, index.html: add ref to new file
(grafted from 502fc27d1aacc71dfa403399d08da556d1f9be93)
author | John Donoghue <john.donoghue@ieee.org> |
---|---|
date | Thu, 30 Jun 2022 15:15:27 -0400 |
parents | 8fcac4d6d983 |
children |
line wrap: on
line source
Description: Fix FTBFS against Octave 7 print_usage() was called within a logical expression. Since it does not return a value, this fails with Octave 7 since the latter does stricter checks on number of output arguments. This patch uses an if/endif conditional rather than a logical short-circuit expression. Author: Sébastien Villemot <sebastien@debian.org> Bug: https://savannah.gnu.org/bugs/?62314 Bug-Debian: https://bugs.debian.org/1009135 Last-Update: 2022-04-14 --- This patch header follows DEP-3: http://dep.debian.net/deps/dep3/ --- a/inst/qnmknode.m +++ b/inst/qnmknode.m @@ -126,22 +126,25 @@ function Q = qnmknode( node, S, varargin endif elseif ( strcmp(node, "-/g/1-lcfs-pr") ) ## -/G/1-LCFS-PR node - ( 2 == nargin || 3 == nargin ) || ... - print_usage(); + if ~( 2 == nargin || 3 == nargin ) + print_usage(); + endif if ( 3 == nargin ) s2 = varargin{1}; endif elseif ( strcmp(node, "-/g/1-ps") ) ## -/G/1-PS (processor sharing) node - ( 2 == nargin || 3 == nargin ) || ... - print_usage(); + if ~( 2 == nargin || 3 == nargin ) + print_usage(); + endif if ( 3 == nargin ) s2 = varargin{1}; endif elseif ( strcmp(node, "-/g/inf") ) ## -/G/inf (Infinite Server) node - ( 2 == nargin || 3 == nargin ) || ... - print_usage(); + if ~( 2 == nargin || 3 == nargin ) + print_usage(); + endif if ( 3 == nargin ) s2 = varargin{1}; endif