1 [IFDEF] CONFIG_DRIVER_PCI
3 : pci-addr-encode ( addr.lo addr.mi addr.hi )
10 : pci-len-encode ( len.lo len.hi )
12 rot encode-int encode+
15 \ Get PCI physical address and size for configured BAR reg
16 : pci-bar>pci-addr ( bar-reg -- addr.lo addr.mid addr.hi size -1 | 0 )
17 " assigned-addresses" active-package get-package-property 0= if
19 decode-phys \ ( reg prop prop-len phys.lo phys.mid phys.hi )
20 dup ff and 6 pick = if
22 decode-int drop decode-int
29 \ Drop the size as we don't need it
30 decode-int drop decode-int drop