openbios/fcode-utils/testlogs/testlogs-ppc-linux/TokoLoco/testNest.fth

• Show log

  Commit

• Hash : ed679850
  Author :
  Date : 2006-10-30T17:01:46
  

  commit testlogs git-svn-id: svn://coreboot.org/openbios/fcode-utils@110 f158a5a8-5612-0410-a976-696ce0be7e32

Download

• testlogs/testlogs-ppc-linux/TokoLoco/testNest.fth

• \  It seems that  fload  nesting diddent werk rite.
  \  Let's see just how bad it was...
  
  \  I fixed assigning FCode numbers, but not nesting
  \  Seemed it diddent nest more than one deep...
  
  \  Did I fix it?
  \  Yeah.  It was an artifact of an error in the test sequence...
  
  fcode-version2
  
  headers
  instance variable happy
  instance variable grumpy
  instance variable sleepy
  
  fload testNest1.fth
  
  : whatsit0ya ( -- )
     whatsit1ya
      ."  Happy is " happy @ .
      ."  Grumpy is " grumpy @ .
      ."  Sleepy is " sleepy @ .
     ['] downdate catch
  ;
  
  fcode-end
  

Download