diff options
author | Ben Sima <ben@bsima.me> | 2023-08-14 20:48:10 -0400 |
---|---|---|
committer | Ben Sima <ben@bsima.me> | 2023-08-16 14:29:43 -0400 |
commit | 2d8b280ed2c73d65fb905a580e9499bb7f69ff01 (patch) | |
tree | f9511f59603cd5128eaa3e47f6e90dd382afc9e8 /Biz/Bild | |
parent | 1fd4c0be9efe017ed9f6f1dd9b5d9ab70b1bcee2 (diff) |
Run lint
Idk why these missed the linter. Probably packages updated in the
nixpkgs version bump.
Diffstat (limited to 'Biz/Bild')
-rw-r--r-- | Biz/Bild/Bessel.c | 8 | ||||
-rw-r--r-- | Biz/Bild/Deps.hs | 24 | ||||
-rw-r--r-- | Biz/Bild/Example.c | 4 |
3 files changed, 18 insertions, 18 deletions
diff --git a/Biz/Bild/Bessel.c b/Biz/Bild/Bessel.c index 524956c..52b4dee 100644 --- a/Biz/Bild/Bessel.c +++ b/Biz/Bild/Bessel.c @@ -7,13 +7,13 @@ #include <libguile.h> SCM -j0_wrapper(SCM x) +j0_wrapper (SCM x) { - return scm_from_double(j0(scm_to_double(x))); + return scm_from_double (j0 (scm_to_double (x))); } void -init_bessel() +init_bessel () { - scm_c_define_gsubr("j0", 1, 0, 0, j0_wrapper); + scm_c_define_gsubr ("j0", 1, 0, 0, j0_wrapper); } diff --git a/Biz/Bild/Deps.hs b/Biz/Bild/Deps.hs index 515d04c..17aae0d 100644 --- a/Biz/Bild/Deps.hs +++ b/Biz/Bild/Deps.hs @@ -45,7 +45,7 @@ instance MonadUnliftIO NIO where withRunInIO = wrappedWithRunInIO NIO runNIO getFindSourcesJson :: NIO FindSourcesJson ---getFindSourcesJson = ask +-- getFindSourcesJson = ask getFindSourcesJson = do root <- li <| getEnv "BIZ_ROOT" pure <| AtPath <| root </> "Biz/Bild/Sources.json" @@ -161,12 +161,12 @@ parseNixpkgs = parseNixpkgsFast <|> parseNixpkgsLatest <|> parseNixpkgsCustom <| <> Opts.help "Use a custom nixpkgs repository from GitHub." <> Opts.metavar "OWNER/REPO" ) - <*> Opts.strOption - ( Opts.long "nixpkgs-branch" - <> Opts.short 'b' - <> Opts.help "The nixpkgs branch when using --nixpkgs ...." - <> Opts.showDefault - ) + <*> Opts.strOption + ( Opts.long "nixpkgs-branch" + <> Opts.short 'b' + <> Opts.help "The nixpkgs branch when using --nixpkgs ...." + <> Opts.showDefault + ) parseNoNixpkgs = Opts.flag' NoNixpkgs @@ -684,8 +684,8 @@ abortUpdateFailed errs = abort <| T.unlines <| ["One or more packages failed to update:"] - <> map - ( \(PackageName pname, e) -> - pname <> ": " <> tshow e - ) - errs + <> map + ( \(PackageName pname, e) -> + pname <> ": " <> tshow e + ) + errs diff --git a/Biz/Bild/Example.c b/Biz/Bild/Example.c index 06e6ed8..9966dba 100644 --- a/Biz/Bild/Example.c +++ b/Biz/Bild/Example.c @@ -1,6 +1,6 @@ // : out helloworld.exe void -main() +main () { - printf("Biz/Bild/Example.c: Hello world!\n"); + printf ("Biz/Bild/Example.c: Hello world!\n"); } |