[OpenBIOS] Sparc32 "see" crashes on "" literals

[Mark Cave-Ayland]

Stefan Reinauer wrote:

> See patch.. There seems to be another oddity in " which caused me to use
> s" instead of " in nvram.fs... Who finds the remaining problem? ;-)
> 
> Stefan

Hi Stefan,

Thanks for the patch! With the patch applied, then "see" no longer 
crashes on those particular routines. Interestingly enough, digging 
further into the BIOS I still see some discrepancies between the source 
code and the detokenized version:


0 > see find-device
: find-device
     2dup " .." strcmp 0= if
     2drop active-package dup if
       >dn.parent @ dup 0= if
         (lit) throw active-package! exit 0 -rot path-resolution 0= if
           false exit active-package swap true path-res-cleanup 
active-package!


In this case, (lit) should be "..". And also:


0 > see (find-dev)
: (find-dev)
             active-package -rot (lit) catch if
             3drop false exit active-package swap active-package! true
   ;
  ok


And here (lit) should be "[']". Am I right in thinking that it should be 
possible to reconstruct any source exactly (minus formatting) from a 
tokenized input?


Many thanks,

Mark.

-- 
Mark Cave-Ayland
Sirius Corporation - The Open Source Experts
http://www.siriusit.co.uk
T: +44 870 608 0063