Pagwin/psb
1
0
Fork 0
Code Issues 4 Pull requests Projects Releases Packages Wiki Activity

minor LLM fuckup fixes

Browse source
This commit is contained in:
Pagwin 2025-11-01 15:41:40 -04:00
parent 6212c3fd05
commit 4893b40cc9
No known key found for this signature in database
GPG key ID: 81137023740CA260
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
app/IR.hs
View file

@ -9,7 +9,6 @@ data Element
| Code Code | Code Code
| BlockQuote BlockQuote | BlockQuote BlockQuote
| List List | List List
| Table Table
| HTML HTML | HTML HTML
| Paragraph Paragraph | Paragraph Paragraph
| HorizontalRule | HorizontalRule
@ -33,6 +32,8 @@ data ListItem = LI
children :: [List] children :: [List]
} }
data ListType = Ordered | Unordered
data List = L data List = L
{ list_type :: ListType, { list_type :: ListType,
items :: [ListItem] items :: [ListItem]