diff options
Diffstat (limited to 'src/Test/Builtins.hs')
| -rw-r--r-- | src/Test/Builtins.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Test/Builtins.hs b/src/Test/Builtins.hs index a36505a..a676a35 100644 --- a/src/Test/Builtins.hs +++ b/src/Test/Builtins.hs @@ -22,7 +22,7 @@ getArg args = fromMaybe (error "parameter mismatch") . getArgMb args getArgMb :: ExprType a => FunctionArguments SomeVarValue -> Maybe ArgumentKeyword -> Maybe a getArgMb (FunctionArguments args) kw = do - fromSomeVarValue (SourceLine "") (VarName "") =<< M.lookup kw args + fromSomeVarValue SourceLineBuiltin (VarName "") =<< M.lookup kw args getArgVars :: FunctionArguments SomeVarValue -> Maybe ArgumentKeyword -> [ (( VarName, [ Text ] ), SomeVarValue ) ] getArgVars (FunctionArguments args) kw = do |