summaryrefslogtreecommitdiff
path: root/Biz/Bild
diff options
context:
space:
mode:
authorBen Sima <ben@bsima.me>2023-08-14 20:48:10 -0400
committerBen Sima <ben@bsima.me>2023-08-16 14:29:43 -0400
commit2d8b280ed2c73d65fb905a580e9499bb7f69ff01 (patch)
treef9511f59603cd5128eaa3e47f6e90dd382afc9e8 /Biz/Bild
parent1fd4c0be9efe017ed9f6f1dd9b5d9ab70b1bcee2 (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.c8
-rw-r--r--Biz/Bild/Deps.hs24
-rw-r--r--Biz/Bild/Example.c4
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");
}