coop/rose-ash
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

plans: tick quicksort.hs, progress log 2026-04-25
Some checks failed
Test, Build, and Deploy / test-build-deploy (push) Has been cancelled
Details

Browse Source
This commit is contained in:
giles
2026-04-25 18:06:58 +00:00
parent a12dcef327
commit 9facbb4836
1 changed files with 6 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
plans/haskell-on-sx.md
View File

@@ -84,7 +84,7 @@ Key mappings:
- [ ] Classic programs in `lib/haskell/tests/programs/`: - [ ] Classic programs in `lib/haskell/tests/programs/`:
- [x] `fib.hs` — infinite Fibonacci stream - [x] `fib.hs` — infinite Fibonacci stream
- [x] `sieve.hs` — lazy sieve of Eratosthenes - [x] `sieve.hs` — lazy sieve of Eratosthenes
- [ ] `quicksort.hs` — naive QS - [x] `quicksort.hs` — naive QS
- [ ] `nqueens.hs` - [ ] `nqueens.hs`
- [ ] `calculator.hs` — parser combinator style expression evaluator - [ ] `calculator.hs` — parser combinator style expression evaluator
- [ ] `lib/haskell/conformance.sh` + runner; `scoreboard.json` + `scoreboard.md` - [ ] `lib/haskell/conformance.sh` + runner; `scoreboard.json` + `scoreboard.md`
@@ -114,6 +114,11 @@ Key mappings:
_Newest first._ _Newest first._
- **2026-04-25** — Classic program `quicksort.hs`: naive functional quicksort.
`qsort (x:xs) = qsort smaller ++ [x] ++ qsort larger where smaller = filter (< x) xs; larger = filter (>= x) xs`.
No new runtime additions needed — right sections, `filter`, `++` all worked out of the box.
5 tests (general sort, empty, singleton, already-sorted, reverse-sorted). 395/395 green.
- **2026-04-25** — Classic program `sieve.hs`: lazy sieve of Eratosthenes. - **2026-04-25** — Classic program `sieve.hs`: lazy sieve of Eratosthenes.
Added `mod`, `div`, `rem`, `quot` to `hk-binop` (and as first-class Added `mod`, `div`, `rem`, `quot` to `hk-binop` (and as first-class
values in `hk-init-env`), enabling backtick operator use. The filter-based values in `hk-init-env`), enabling backtick operator use. The filter-based