From 991588d8eb9497eb9a9e53c2b93d76a539fc84a6 Mon Sep 17 00:00:00 2001
From: blueswirl <blueswirl@f158a5a8-5612-0410-a976-696ce0be7e32>
Date: Fri, 22 May 2009 17:09:05 +0000
Subject: [PATCH] Read the diagnostic mode setting from NVRAM (Mark
 Cave-Ayland)

git-svn-id: svn://openbios.org/openbios/trunk/openbios-devel@491 f158a5a8-5612-0410-a976-696ce0be7e32
---
 forth/admin/nvram.fs  | 1 +
 forth/device/other.fs | 6 ++++++
 2 files changed, 7 insertions(+)

diff --git a/forth/admin/nvram.fs b/forth/admin/nvram.fs
index 3ffe076..8efab55 100644
--- a/forth/admin/nvram.fs
+++ b/forth/admin/nvram.fs
@@ -364,3 +364,4 @@ no-conf-def " security-mode"        secmode-config
 
 \ defers
 ['] fcode-debug? to _fcode-debug?
+['] diag-switch? to _diag-switch?
diff --git a/forth/device/other.fs b/forth/device/other.fs
index 0d88d21..16f2983 100644
--- a/forth/device/other.fs
+++ b/forth/device/other.fs
@@ -8,6 +8,10 @@
 \ the copyright and warranty status of this work.
 \ 
 
+\ The current diagnostic setting
+defer _diag-switch?
+
+
 \ 
 \ 5.3.7 Other FCode functions
 \ 
@@ -89,6 +93,8 @@ hex
   ;
   
 : diagnostic-mode?     ( -- diag? )
+  \ Return the NVRAM diag-switch? setting
+  _diag-switch?
   ;
   
 \ 5.3.7.6 Start and end.
-- 
2.11.4.GIT