RosettaCodeData/Task/Inverted-syntax/R/inverted-syntax-1.r

2 lines
44 B
R

do.if <- function(expr, cond) if(cond) expr