search for: expres

...eject_snprinf_* functions expr: reject: Use nft_rule_expr_set_* in the xml expr: reject: Do not print unset values in xml expr: reject: Convert the type of a variable expr: reject: Do not print unset values in json tests: xmlfile: Remove unset child elements in the log expression src: set: Use nft_rule_expr_set_* in the xml parsing code tests: nft-parsing-test: Display error reason when testing XML src: set: Do not print unset values in xml src: set: Do not print unset values in json set: Free memory in the same function that is reserved...

...TRUE, FALSE or an environment") - exprs <- substitute(exprs) # protect from evaluation - E1 <- if(is.call(exprs)) exprs[[1]] + E1 <- if(!evaluated && is.call(exprs <- substitute(exprs))) exprs[[1]] cl <- if(is.symbol(E1) && - (E1 == quote(`{`) || E1 == quote(expression))) { + E1 == quote(`{`)) { exprs[[1]] <- quote(stopifnot) ## --> stopifnot(*, *, ..., *) : exprs } else as.call(c(quote(stopifnot), - if(is.null(E1) && is.symbol(exprs) && - is.expression(E1 <- eval(exprs))) # the *name* o...

# The result I am after is the result after a substitution in an expression, such as substitute(expression(a+b+c), list(a=1)) expression(1 + b + c) # However, the way I want to do it is for a an expression "stored as a variable" as (expr <- expression(a+b+c)) expression(a + b + c) # a) The following does not work (expr2 <- substitute(expr, list(a=1...

...;- function(..., exprs, local = TRUE) { + n <- ...length() missE <- missing(exprs) - cl <- if(missE) { ## use '...' instead of exprs - match.call(expand.dots=FALSE)$... } else { - if(...length()) + if(n) stop("Must use 'exprs' or unnamed expressions, but not both") envir <- if (isTRUE(local)) parent.frame() else if(isFALSE(local)) .GlobalEnv else if (is.environment(local)) local else stop("'local' must be TRUE, FALSE or an environment") exprs <- substitute(exprs) # protect f...

...ontext, I think it is good. - It is simpler and also works for call that originally comes from stopifnot(exprs=*) . - It allows shortcut ('assert') to have the same call in error message as stopifnot(exprs=*) . Another thing: Is it intended that do.call("stopifnot", list(exprs = expression())) evaluates each element of the expression object? If so, maybe add a case for 'cl', like ??? ? ? else if(is.expression(exprs)) ??? ??? as.call(c(quote(expression), exprs)) -------------------------------------------- On Mon, 4/3/19, Martin Maechler <maechler at stat.math.ethz.ch&...

On Dec 20, 2007, at 3:56 PM, Mike Stump wrote: > They looked real enough to me: Fixed, thanks. -Chris > > > /Volumes/mrs5/net/llvm/llvm/lib/Target/CellSPU/SPUISelDAGToDAG.cpp: In > function ‘bool<unnamed>::isFPS16Immediate(llvm::ConstantFPSDNode*, > short int&)’: > /Volumes/mrs5/net/llvm/llvm/lib/Target/CellSPU/SPUISelDAGToDAG.cpp: > 148: warning:

They looked real enough to me: /Volumes/mrs5/net/llvm/llvm/lib/Target/CellSPU/SPUISelDAGToDAG.cpp: In function ‘bool<unnamed>::isFPS16Immediate(llvm::ConstantFPSDNode*, short int&)’: /Volumes/mrs5/net/llvm/llvm/lib/Target/CellSPU/SPUISelDAGToDAG.cpp: 148: warning: dereferencing type-punned pointer will break strict- aliasing rules

This may have been asked before, but is there an elegant way to check whether an variable/argument passed to a function is a "parse tree" for an (unevaluated) expression or not, *without* evaluating it if not? Currently, I do various rather ad hoc eval()+substitute() tricks for this that most likely only work under certain circumstances. Ideally, I'm looking for a isParseTree() function such that I can call: expr0 <- foo({ x <- 1 }) expr1 <- foo(...

...ll in error message as stopifnot(exprs=*) . That may be another good reason in addition to code simplicity. I will have to see if this extra simplification does not loose more than I'd want. > Another thing: Is it intended that > do.call("stopifnot", list(exprs = expression())) > evaluates each element of the expression object? ?? I really don't know. Even though such a case looks "unusual" (to say the least), in principle I'd like that expressions are evaluated sequentially until the first non-TRUE result. With a concrete example, I d...

...oes not need to know really). > Or did you imply, Henrik, that would you want is not achievable > with these? Martin, thanks for bringing these options up. Just to make sure no one misreads these comments - I'm not operating on as.list(expr) - it was just used to show the content of the expression. In my case, I'm operating / modifying expressions and not functions per se, e.g. expr <- quote(function(x = 1) x) It's not clear to me how I would go about to modify this to be the equivalent of: expr <- quote(function(x = NULL) x) without having to: f <- eval(ex...

...(API) to the in-kernel nf_tables subsystem. The library libnftnl has been previously known as libnftables. This library is currently used by the nft command line tool. This release includes the following list of updates: * New nftnl_rule_cmp() interface to compare rules. * Support for new kernel expressions: - Number Generator (a.k.a. numgen). - Routing (a.k.a. rt). - Range. - Inverted set lookups. - Inverted dynamic set updates (ie. rule mismatch on full sets). - Packet quota. - Hash. - Forward Information Base lookups (a.k.a. fib). - Reference to stateful objects (requires kernel 4.10-...

Hi I'm running the latest R on a presumably up to date Linux server. 'Doing something silly I'm sure, but can't see why my saved PLMset objects come out all wrong. To use an example: Setting up an example PLMset (I have the same problem no matter what example I use) > library(affyPLM) > data(Dilution) # affybatch object > Dilution = updateObject(Dilution)

...put/TestCallUserAnonTypedef.test.tmp | /home/dim/llvm-4.0.0/rc2/Phase3/Release/llvmCore-4.0.0-rc2.obj/./bin/FileCheck /home/dim/llvm-4.0.0/rc2/llvm.src/tools/lldb/lit/Expr/TestCallUserAnonTypedef.test > -- > Exit Code: 1 > > Command Output (stderr): > -- > error: Can't run the expression locally: Interpreter doesn't handle one of the expression's opcodes > /home/dim/llvm-4.0.0/rc2/llvm.src/tools/lldb/lit/Expr/TestCallUserAnonTypedef.test:11:10: error: expected string not found in input > # CHECK: $0 = 1 > ^ > <stdin>:1:1: note: scanning from h...

I often want to temporarily modify the options() options, e.g. a <- seq(10000001, 10000001 + 10) # some wide object with.options <- function(..., expr) { options0 <- options(...) tryCatch(expr, finally=options(options0)) } Then I can use: with.options(width=160, expr = print(a)) But I'd like to avoid explicitly naming the expr argument, as in: with.options(width=160,

Here is a complete 104-line native code compiler for a tiny subset of OCaml that is expressive enough to compile an external Fibonacci program: type expr = | Int of int | Var of string | BinOp of [ `Add | `Sub | `Leq ] * expr * expr | If of expr * expr * expr | Apply of expr * expr type defn = | LetRec of string * string * expr open Camlp4.PreCast;; let expr = Gram.Entry....

Full_Name: Georgi Boshnakov Version: 2.10.1pat OS: Windows XP Submission from: (NULL) (130.88.123.205) When calling programmatically function curve() from package:graphics I experienced some trouble since it reports stop("'expr' must be a function or an expression containing 'x'") even if expr is "expression". Naturally, the user message uses "expression" in its usual generic meaning but it is somewhat confusing that an object of type "expression" is rejected. The message is produced in the following piece in...

Hello. I have run the command imp<-mice(mydata, im=c("","pmm","logreg","logreg"),m=5)  for a variable with no missing data, a numeric one and two variables with binary data. I got the following message: There were 37 warnings (use warnings() to see them) > warnings() Warning messages: 1: In any(predictorMatrix[j, ]) ... : coercing argument of

Hi John, Here is my code practicing. Please give me some advises. Thank you. Wu Gong # Extract the function string f.str <- sub("y~","",exprtext) # Get arglist from the text sp1 <- paste("\\",c(getGroupMembers(Arith),"(",")"),sep="") sp2 <- getGroupMembers(Math) sps <-

...ve of allowing for function arguments to be stored in lists. That's a much deeper change though. On Wed, Oct 12, 2016 at 12:31 PM, Henrik Bengtsson <henrik.bengtsson at gmail.com> wrote: > Michael, thanks for this info. > > I've stumbled upon this in a case where I walk an R expression (the > AST) and (optionally) modifies it (part of the globals package). In R > expressions, a function definition uses a pairlist to represent the > arguments. For example, > >> expr <- quote(function(x = 1) x) >> str(as.list(expr)) > List of 4 > $ : symbol f...

Hi, I am facing a very weird problem with parallel::mclapply. I have a script which does some data wrangling on an input dataset in parallel and then writes the results to disk. I have been using this script daily for more than one year always on an EC2 instance launched from the same AMI (no updates installed after launch) and processed thousands of different input data sets successfully. I now