openbios/fcode-utils/testlogs/testlogs-ppc-aix/TokeErrs/LocOvrRun_03.fth

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

• 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-aix/TokeErrs/LocOvrRun_03.fth

• \  Third Local-overrun test.  Unterminated locals decl'n w/ no separator
  
  : coconuts ( m1 m2 -- m3 m4 m5 )
      { 
           q 
  	    _gummo
  	        _karl
  
      2dup < if swap then
      2dup / -> _gummo
      2dup - -> _karl
      * -> q
      _karl _gummo q
  ;
  

Download