diff --git a/.github/workflows/main.yml b/.github/workflows/main.yml index 50f2056..1b4b349 100644 --- a/.github/workflows/main.yml +++ b/.github/workflows/main.yml @@ -4,15 +4,17 @@ on: branches: - master pull_request: - + jobs: build: runs-on: ubuntu-latest steps: - - uses: actions/checkout@v3.5.3 - - uses: cachix/install-nix-action@v22 + - uses: actions/checkout@v5 + - uses: cachix/install-nix-action@v31 with: nix_path: nixpkgs=channel:nixos-unstable + - name: nixpkgs update + run: nix-channel --update - name: run oracle run: nix-shell -p docker-compose --run "docker-compose up -d" - name: build diff --git a/src/Database/Oracle/Simple/Query.hs b/src/Database/Oracle/Simple/Query.hs index 177aa86..dfab2ce 100644 --- a/src/Database/Oracle/Simple/Query.hs +++ b/src/Database/Oracle/Simple/Query.hs @@ -30,7 +30,7 @@ query conn sql param = do found <- fetch stmt loop stmt found where - loop _ n | n < 1 = do + loop stmt n | n < 1 = do closeStatement stmt pure [] loop stmt _ = do @@ -46,7 +46,7 @@ query_ conn sql = do found <- fetch stmt loop stmt found where - loop _ n | n < 1 = do + loop stmt n | n < 1 = do closeStatement stmt pure [] loop stmt _ = do @@ -62,11 +62,11 @@ forEach_ conn sql cont = do found <- fetch stmt loop stmt found where - loop _ n | n < 1 = do + loop stmt n | n < 1 = do closeStatement stmt pure () loop stmt _ = do tsVal <- getRow stmt cont tsVal found <- fetch stmt - loop stmt found + loop stmt found \ No newline at end of file