openbios/fcode-utils/testsuite/TokCondl/TokConstCondTst01.fth

• Show log

  Commit

• Hash : acf5213f
  Author :
  Date : 2006-10-14T20:31:53
  

  testsuite 1.0.0 git-svn-id: svn://coreboot.org/openbios/fcode-utils@91 f158a5a8-5612-0410-a976-696ce0be7e32

Download

• testsuite/TokCondl/TokConstCondTst01.fth

• \  Common code (insert obligatory sneeze here)
  \      for Nested "Constant" Conditionals test
  
  \  Updated Sun, 09 Apr 2006 at 00:22 PDT by David L. Paktor
  
  \  File that FLOADs this has already put TRUE or FALSE on the stack.
  
  f[  constant  boobalah? f]
  
  fcode-version2
  
  : whatziz
      ." This is the "
      f[ boobalah? [if]  f] ." True "  f[  [else]  f] ." False"
      f[  [then]  f]  ."  side of the test." cr
  ;
  headers
  
  fload BooBalah.fth
  
  : whoozis  whatziz  ;
  
  fcode-end
  

Download