diff --git a/blk/243 b/blk/243
index 9306a8d..9ecf09a 100644
--- a/blk/243
+++ b/blk/243
@@ -5,7 +5,8 @@
 
 VARIABLE lblchkPS
 : chkPS, lblchkPS @ CALLnn, ; ( chkPS, B305 )
-: JPNEXT, 26 BJP, ; ( 26 == next )
+CREATE lblnext 0x1a , ( stable ABI until set in B300 )
+: JPNEXT, lblnext @ JPnn, ;
 : CODE ( same as CREATE, but with native word )
     (entry) 0 C, ( 0 == native ) ;
 : ;CODE JPNEXT, ;
diff --git a/blk/300 b/blk/300
index b3715cc..5db8fc2 100644
--- a/blk/300
+++ b/blk/300
@@ -1,4 +1,4 @@
-PC ORG @ 0x1b + ! ( next )
+lblnext BSET PC ORG @ 0x1b + ! ( next )
 ( This routine is jumped to at the end of every word. In it,
   we jump to current IP, but we also take care of increasing
   it by 2 before jumping. )
diff --git a/emul/forth.bin b/emul/forth.bin
index 4f59a8a..6bc28a4 100644
Binary files a/emul/forth.bin and b/emul/forth.bin differ