Yehowshua/RiscV-Formal
Archived
2
0
Fork 0
Code Issues 8 Pull requests Projects Releases Packages Wiki Activity Actions

prep for notable re-org

Browse source
This commit is contained in:
Yehowshua Immanuel 2025-02-26 02:24:23 -05:00
parent 024115e389
commit c8b192cade
4 changed files with 31 additions and 18 deletions
Download patch file Download diff file Expand all files Collapse all files

6
hs/Peripherals/Uart.hs
View file

@ -68,9 +68,9 @@ read size addr
| otherwise = return $ busValFromByte size 0x00
extractLowestByte :: BusVal -> Byte
extractLowestByte (BusByte b) = b
extractLowestByte (BusHalfWord hw) = resize hw
extractLowestByte (BusFullWord fw) = resize fw
extractLowestByte (BusByte b) = b
extractLowestByte (BusHalfWord hw) = resize hw
extractLowestByte (BusFullWord fw) = resize fw
extractLowestByte (BusDoubleWord dw) = resize dw
extractLowestByte (BusQuadWord qw) = resize qw