- if (OPB->_int < prog->progs->entityfields && !prog->allowworldwrites)
- VM_Warning("assignment to world.%s (field %i) in %s\n", PRVM_GetString(PRVM_ED_FieldAtOfs(OPB->_int)->s_name), OPB->_int, PRVM_NAME);
+ if (OPB->_int < prog->entityfields && !prog->allowworldwrites)
+ {
+ prog->xstatement = st - prog->statements;
+ VM_Warning(prog, "assignment to world.%s (field %i) in %s\n", PRVM_GetString(prog, PRVM_ED_FieldAtOfs(prog, OPB->_int)->s_name), (int)OPB->_int, prog->name);
+ }