Subversion Repositories NedoOS

Rev

Rev 539 | Blame | Compare with Previous | Last modification | View Log | Download

  1.     DEVICE none
  2.  
  3.     lua
  4.         -- v1.20.0 added visible warning message
  5.         assert(not sj.set_page(1))
  6.     endlua
  7.  
  8.     DEVICE zxspectrum128
  9.  
  10.     lua
  11.         assert(not sj.set_page(233))
  12.         assert(not sj.set_page(-1))
  13.         assert(sj.set_page(6))
  14.     endlua
  15.  
  16.     ASSERT(7 == $$)     ; slot 0 should be still default page 7
  17.     ORG 0xC000
  18.     ASSERT(6 == $$)     ; default slot 3 should be page 6 set by lua
  19.  
  20.     lua pass3 ; wrong arguments
  21.         sj.set_page(233, 2) -- not reported since Lua5.4 and LuaBridge 2.6 integration :(
  22.         sj.set_page()
  23.     endlua
  24.