Show faulty string in fromStringNoContext error

This commit is contained in:
Guillaume Maudoux 2020-05-10 01:49:05 +02:00
parent d32a6fbaf3
commit 19790fd1fc
1 changed files with 1 additions and 1 deletions

View File

@ -478,7 +478,7 @@ execBinaryOpForced scope span op lval rval = case op of
fromStringNoContext :: Framed e m => NixString -> m Text
fromStringNoContext ns = case principledGetStringNoContext ns of
Just str -> pure str
Nothing -> throwError $ ErrorCall "expected string with no context"
Nothing -> throwError $ ErrorCall $ "expected string with no context, but got " ++ show ns
addTracing
:: (MonadNix e t f m, Has e Options, MonadReader Int n, Alternative n)