audio.engine.test: cleanup using

[factor.git] / vm / strings.cpp

diff --git a/vm/strings.cpp b/vm/strings.cpp
index cd4d3d487710914ed7087bfd0909d80b756dc03b..bcde346294c19ddeacda45650a5e3136bd1fb832 100644 (file)
--- a/vm/strings.cpp
+++ b/vm/strings.cpp
@@ -100,7 +100,7 @@ string* factor_vm::reallot_string(string* str_, cell capacity) {
 // Allocates memory
 void factor_vm::primitive_resize_string() {
   data_root<string> str(ctx->pop(), this);
-  str.untag_check(this);
+  check_tagged(str);
   cell capacity = unbox_array_size();
   ctx->push(tag<string>(reallot_string(str.untagged(), capacity)));
 }