search for: nfor

...->nbinary.ch2, flags); status = exitstatus; - if (evalskip) - goto skipping; - } + skip = skiploop(); + } while (!(skip & ~SKIPCONT)); loopnest--; exitstatus = status; } @@ -392,9 +409,6 @@ evalfor(union node *n, int flags) arglist.lastp = &arglist.list; for (argp = n->nfor.args ; argp ; argp = argp->narg.next) { expandarg(argp, &arglist, EXP_FULL | EXP_TILDE); - /* XXX */ - if (evalskip) - goto out; } *arglist.lastp = NULL; @@ -404,18 +418,10 @@ evalfor(union node *n, int flags) for (sp = arglist.list ; sp ; sp = sp->next) { setvar(n->n...

...->nbinary.ch2, flags); status = exitstatus; - if (evalskip) - goto skipping; - } + skip = skiploop(); + } while (!(skip & ~SKIPCONT)); loopnest--; exitstatus = status; } @@ -392,9 +409,6 @@ evalfor(union node *n, int flags) arglist.lastp = &arglist.list; for (argp = n->nfor.args ; argp ; argp = argp->narg.next) { expandarg(argp, &arglist, EXP_FULL | EXP_TILDE); - /* XXX */ - if (evalskip) - goto out; } *arglist.lastp = NULL; @@ -404,18 +418,10 @@ evalfor(union node *n, int flags) for (sp = arglist.list ; sp ; sp = sp->next) { setvar(n->n...

...como % | n25% | 150% | 275% | 3100% | 4 y x4 tiene una cierta cantidad de valores en 0 (poco menos de la mitad pero varian aleatoriamente) y los demas un valor aleatorio entre 0 y 1Tomando en cuenta que si el valor que busco de x4 es menor que Nsin$% entonces ponga el valor de Nsin%nfor (i in 1:nrow(x4)) {x4[i,5] <- ifelse(x4[i,5]==0,0, for (j in 1:nrow(Nsin)) { ifelse(x4[i,5]<Nsin[j,1], Nsin[j,2],x4[i,5])})} pero no se por que el segundo For me devuelve un valor nuloNota: lo estoy haciendo con x4[i,5] pa...

...rror_unknown_package_manager flag = > + error (f_"'%s' failed because inspection could not determine the package manager for this guest OS.\n\nIf this guest OS is a common one with ordinary package management then this may have been caused by a failure of libguestfs inspection.\n\nFor OSes such as Windows that lack package management, this is not possible. Try using one of the '--firstboot*' flags instead (described in the manual).") flag what about "cannot run '%s' because no package management has been detected for this guest OS.\n etc" >...

In cases where parsing the release file failed and so we have an obviously incorrect major version number, don't try to infer the package manager from the major version number. In the bug report, parsing the /etc/redhat-release file of a CentOS 7.1 guest failed, so major version was set to 0, and the package manager was inferred as "up2date". virt-customize then failed with a

...PCONT)); - if (skip != SKIPFUNC) - exitstatus = status; loopnest--; + + return status; } -STATIC void +STATIC int evalfor(union node *n, int flags) { struct arglist arglist; union node *argp; struct strlist *sp; struct stackmark smark; + int status; errlinno = lineno = n->nfor.linno; if (funcline) @@ -414,28 +409,31 @@ evalfor(union node *n, int flags) } *arglist.lastp = NULL; - exitstatus = 0; + status = 0; loopnest++; flags &= EV_TESTED; for (sp = arglist.list ; sp ; sp = sp->next) { setvar(n->nfor.var, sp->text, 0); - evaltree(n->nfor...

...PCONT)); - if (skip != SKIPFUNC) - exitstatus = status; loopnest--; + + return status; } -STATIC void +STATIC int evalfor(union node *n, int flags) { struct arglist arglist; union node *argp; struct strlist *sp; struct stackmark smark; + int status; errlinno = lineno = n->nfor.linno; if (funcline) @@ -414,28 +409,31 @@ evalfor(union node *n, int flags) } *arglist.lastp = NULL; - exitstatus = 0; + status = 0; loopnest++; flags &= EV_TESTED; for (sp = arglist.list ; sp ; sp = sp->next) { setvar(n->nfor.var, sp->text, 0); - evaltree(n->nfor...

...and error_unknown_package_manager flag = + error (f_"'%s' failed because inspection could not determine the package manager for this guest OS.\n\nIf this guest OS is a common one with ordinary package management then this may have been caused by a failure of libguestfs inspection.\n\nFor OSes such as Windows that lack package management, this is not possible. Try using one of the '--firstboot*' flags instead (described in the manual).") flag + + and error_unimplemented_package_manager flag pm = + error (f_"sorry, '%s' with the '%s' package m...

...317,6 +321,8 @@ exexit: exraise(EXEXIT); } + popstackmark(&smark); + return exitstatus; } @@ -396,14 +402,12 @@ evalfor(union node *n, int flags) struct arglist arglist; union node *argp; struct strlist *sp; - struct stackmark smark; int status; errlinno = lineno = n->nfor.linno; if (funcline) lineno -= funcline - 1; - setstackmark(&smark); arglist.lastp = &arglist.list; for (argp = n->nfor.args ; argp ; argp = argp->narg.next) { expandarg(argp, &arglist, EXP_FULL | EXP_TILDE); @@ -420,7 +424,6 @@ evalfor(union node *n, int flags)...

...".C" ) fun( 1:3, 3, 4:6, 3, double(5) ) $a [1] 1 2 3 $na [1] 3 $b [1] 4 5 6 $nb [1] 3 $ab [1] 4 13 28 27 18 The only thing I can think of is that you may have a newline issue going on. Here's the dump of the code object: dput(code) " \nint i, j, nab = *na + *nb - 1; \nfor(i = 0; i < nab; i++) \n ab[i] = 0.0; \nfor(i = 0; i < *na; i++) { \n for(j = 0; j < *nb; j++) \n ab[i + j] += a[i] * b[j]; \n}" Do you have newlines, \n, that are in different places? An easy way to check may be to copy the results of running dput() on your code object into one file...

...(i = 0; i < sz; i++) { long offset = i * sz; long* out = c + offset; out[i] = 0; } } ---------------------------------------------------------- The assembly is shown like this: ---------------------------------------------------------- Enter f_loop; c,sz reg i reg temp1:1 nfor l0;sz;i reg out, offset reg temp0 multiply i,sz;offset add offset<<2,c;out add i<<2,out;temp0 write temp0;0;4;; end l0 exit f_loop ---------------------------------------------------------- Even if the case that there are more loops, this...

...t;. *) and error_unknown_package_manager flag = error (f_"cannot use '%s' because no package manager has been detected for this guest OS.\n\nIf this guest OS is a common one with ordinary package management then this may have been caused by a failure of libguestfs inspection.\n\nFor OSes such as Windows that lack package management, this is not possible. Try using one of the '--firstboot*' flags instead (described in the manual).") flag @@ -330,6 +355,11 @@ exec >>%s 2>&1 message (f_"Running touch: %s") path; g#touch path +...

..."public certificate" key="${directory}/${name}.pem" check_exists "${key}" "private key" #.............................................................................# ${echo} "\nCreating new X509 certificate\n\ with configuration ${configuration}\nfor ${name} ...\n" ${OPENSSL} req -new -x509 -nodes -config "${configuration}" \ -days 365 -out "${certificate}" -keyout "${key}" status=${?} if [ ${status} -ne 0 ] then ${echo} "${error} ${OPENSSL} failed with exit status ${status}!...

I want to run some R script using the inline package (which allows to create and run inline C++ code in my humble understanding). So, after loading the required packages and copy and paste the example that runs C code (in the Reference Manual as a PDF), I have a compilation error. Any body has ever tried this inline package? -- View this message in context:

Thanks to Brian Ripley I have been using R utilities for some time for converting S-Plus UNIX nroff help files to .Rd to .html files. .Rd files seem to be the most natural format for help files and this format is probably easier to maintain than nroff, so I would like to start using .Rd files as my master documentation format if anyone has a utility for going from .Rd to nroff. I guess I could

I got a little way into this. The two attached patches are preliminary work. My proposed split is: libguestfs.git common -> git submodule libguestfs-common.git generator/ lib/ all language bindings C based tools (eg. virt-df, virt-edit, guestfish) guestfs-tools.git common -> git submodule libguestfs-common.git

...@@ main (int argc, char *argv[]) /* Many flags only apply to -lR mode. */ if (mode != MODE_LS_LR && (csv || human || enable_uids || enable_times || enable_extra_stats || - checksum)) { - fprintf (stderr, _("%s: used a flag which can only be combined with -lR mode\nFor more information, read the virt-ls(1) man page.\n"), - guestfs_int_program_name); - exit (EXIT_FAILURE); - } + checksum)) + error (EXIT_FAILURE, 0, + _("used a flag which can only be combined with -lR mode\nFor more information, read the virt-ls(1) man p...

Wherever we had code which did: if (something_bad) { perror (...); exit (EXIT_FAILURE); } replace this with use of the error(3) function: if (something_bad) error (EXIT_FAILURE, errno, ...); The error(3) function is supplied by glibc, or by gnulib on platforms which don't have it, and is much more flexible than perror(3). Since we already use error(3), there seems to be

...you don't specify this option, +Write the output to F<filename>. If you don’t specify this option, then the output filename is generated by taking the C<os-version> string and adding C<.img> (for raw format) or C<.qcow2> (for qcow2 format). @@ -471,7 +471,7 @@ Print information about the template cache. See L</CACHING>. =item B<--quiet> -Don't print ordinary progress messages. +Don’t print ordinary progress messages. =item B<--size> SIZE @@ -501,7 +501,7 @@ You can give this option multiple times to specify multiple sources. See a...

libguestfs has used double and triple underscores in identifiers. These aren't valid for global names in C++. (http://stackoverflow.com/a/228797) These large but completely mechanical patches change the illegal identifiers to legal ones. Rich.