diff --git a/ueforth/common/forth_namespace_tests.fs b/ueforth/common/forth_namespace_tests.fs
index a826a90..e84b43a 100644
--- a/ueforth/common/forth_namespace_tests.fs
+++ b/ueforth/common/forth_namespace_tests.fs
@@ -52,8 +52,6 @@ e: check-boot
   out: z" 
   out: ." 
   out: s" 
-  out: zplace 
-  out: $place 
   out: n. 
   out: ? 
   out: . 
@@ -140,9 +138,7 @@ e: check-boot
   out: state 
   out: >in 
   out: #tib 
-  out: 'tib 
   out: current 
-  out: sys: 
   out: variable 
   out: constant 
   out: c, 
diff --git a/ueforth/common/testing.fs b/ueforth/common/testing.fs
index 1db5912..d15abfd 100644
--- a/ueforth/common/testing.fs
+++ b/ueforth/common/testing.fs
@@ -12,7 +12,7 @@
 \ See the License for the specific language governing permissions and
 \ limitations under the License.
 
-also ansi
+also ansi also internals
 
 DEFINED? windows [IF]
   also windows
diff --git a/ueforth/common/vocabulary.fs b/ueforth/common/vocabulary.fs
index d12c731..8fa56cd 100644
--- a/ueforth/common/vocabulary.fs
+++ b/ueforth/common/vocabulary.fs
@@ -54,12 +54,13 @@ transfer{
   evaluate1 evaluate-buffer
   'sys 'heap aliteral 'heap-start 'heap-size
   'stack-cells 'boot 'boot-size 'latestxt
-  'argc 'argv 'runner
+  'argc 'argv 'runner 'tib
   leaving( )leaving leaving leaving,
   (do) (?do) (+loop)
   parse-quote digit $@ raw.s
   tib-setup input-limit
   [SKIP] [SKIP]' raw-ok
+  $place zplace sys:
 }transfer
 forth definitions