[OpenBIOS] [PATCH v3 4/5] Pretty-print /memory available property
Andreas Färber
andreas.faerber at web.de
Sat Nov 6 01:05:15 CET 2010
v3:
* Simplify condition.
Signed-off-by: Andreas Färber <andreas.faerber at web.de>
---
forth/admin/devices.fs | 4 ++++
1 files changed, 4 insertions(+), 0 deletions(-)
diff --git a/forth/admin/devices.fs b/forth/admin/devices.fs
index 93f306c..db7b48c 100644
--- a/forth/admin/devices.fs
+++ b/forth/admin/devices.fs
@@ -330,6 +330,10 @@
: (.property-by-name) ( name-str name-len data len -- )
2over " reg" strcmp 0= if .p-reg 2drop exit then
+ active-package get-nodename " memory" strcmp 0= if
+ 2over " available" strcmp 0= if .p-reg 2drop exit then
+ then
+
2swap 2drop ( data len )
(.property)
;
--
1.7.3
More information about the OpenBIOS
mailing list