openbios/fcode-utils/testsuite/TokMisc/AbrtQuot.fth

Branch - branch -master- tag -v1.0.3v1.0.2v1.0.1v1.0.0

• 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/TokMisc/AbrtQuot.fth

• \  Test of Abort" with various switches, JTMS.
  \  Throw in a few other misc goodies while we're at it...
  
  
  fcode-version2
  
  headers
  
  h# defeca8e  constant poopoo
  h# beeffece  constant moopoo
  alias couterde moopoo
  
  : gotta_try_it
      gumfritsch  \  Let's see how an unknown word is treated, before.
      {   \  What does this do?
       }   \  Or let's see what this does...
      couterde poopoo = abort" Should be different. "
      ." poopoo is "  f['] poopoo .h cr
      ." couterde is "  f['] couterde .h cr
      ." And its XT is: "  ['] couterde
      strumburkle  \  Let's see how an unknown word is treated after.
  ;
  
  fcode-end
  

Download