uptake / updraft

R package for building flexible workflows
Other
13 stars 12 forks source link

Duplicate module timing information printed #36

Open mjermann opened 5 years ago

mjermann commented 5 years ago

To repro:

myFunc <- function(a, b, c) {
    return(a + 2*(floor(b/c)))
}

myModule <- CustomFunctionModule$new(name = "myFunc"
                                     , fun = myFunc)

myModule$startExecution(list(a = 1, b = 2, c=0.3))
myModule$getOutput()

Output:

[1] "*UpDraft* myFunc took 7.70092e-05 seconds to complete"
[1] "*UpDraft* myFunc took 7.70092e-05 seconds to complete"
[1] 13
aswathyajith commented 5 years ago

Is this issue fixed?

mjermann commented 5 years ago

nope - this is still an active bug (should be a quick fix though).

aswathyajith commented 5 years ago

I built and installed the package from the source code but not able to reproduce the issue.

image