@@ -210,7 +210,7 @@ function ODEFunctionExpr{iip}(sys::AbstractODESystem, dvs = states(sys),
210
210
ps = parameters (sys), u0 = nothing ;
211
211
version = nothing , tgrad= false ,
212
212
jac = false , Wfact = false ,
213
- sparse = false ,
213
+ sparse = false ,linenumbers = false ,
214
214
kwargs... ) where {iip}
215
215
216
216
idx = iip ? 2 : 1
@@ -239,7 +239,7 @@ function ODEFunctionExpr{iip}(sys::AbstractODESystem, dvs = states(sys),
239
239
240
240
_M = (u0 === nothing || M == I) ? M : ArrayInterface. restructure (u0 .* u0' ,M)
241
241
242
- quote
242
+ ex = quote
243
243
f = $ f
244
244
tgrad = $ _tgrad
245
245
jac = $ _jac
@@ -255,6 +255,7 @@ function ODEFunctionExpr{iip}(sys::AbstractODESystem, dvs = states(sys),
255
255
mass_matrix = M,
256
256
syms = $ (Symbol .(states (sys))))
257
257
end
258
+ ! linenumbers ? striplines (ex) : ex
258
259
end
259
260
260
261
@@ -320,7 +321,7 @@ function ODEProblemExpr{iip}(sys::AbstractODESystem,u0map,tspan,
320
321
version = nothing , tgrad= false ,
321
322
jac = false , Wfact = false ,
322
323
checkbounds = false , sparse = false ,
323
- linenumbers = true , parallel= SerialForm (),
324
+ linenumbers = false , parallel= SerialForm (),
324
325
kwargs... ) where iip
325
326
dvs = states (sys)
326
327
ps = parameters (sys)
@@ -329,13 +330,14 @@ function ODEProblemExpr{iip}(sys::AbstractODESystem,u0map,tspan,
329
330
f = ODEFunctionExpr {iip} (sys,dvs,ps,u0;tgrad= tgrad,jac= jac,Wfact= Wfact,checkbounds= checkbounds,
330
331
linenumbers= linenumbers,parallel= parallel,
331
332
sparse= sparse)
332
- quote
333
+ ex = quote
333
334
f = $ f
334
335
u0 = $ u0
335
336
tspan = $ tspan
336
337
p = $ p
337
338
ODEProblem {iip} (f,u0,tspan,p;$ (kwargs... ))
338
339
end
340
+ ! linenumbers ? striplines (ex) : ex
339
341
end
340
342
341
343
function ODEProblemExpr (sys:: AbstractODESystem , args... ; kwargs... )
0 commit comments