implement process_release/1, process_wait/2, process_wait/3, and process_kill/1
This commit is contained in:
@@ -4795,6 +4795,22 @@ impl Machine {
|
||||
try_or_throw!(self.machine_st, self.process_create());
|
||||
step_or_fail!(self, self.machine_st.p = self.machine_st.cp);
|
||||
}
|
||||
&Instruction::CallProcessWait => {
|
||||
try_or_throw!(self.machine_st, self.process_wait());
|
||||
step_or_fail!(self, self.machine_st.p += 1);
|
||||
}
|
||||
&Instruction::ExecuteProcessWait => {
|
||||
try_or_throw!(self.machine_st, self.process_wait());
|
||||
step_or_fail!(self, self.machine_st.p = self.machine_st.cp);
|
||||
}
|
||||
&Instruction::CallProcessKill => {
|
||||
try_or_throw!(self.machine_st, self.process_kill());
|
||||
step_or_fail!(self, self.machine_st.p += 1);
|
||||
}
|
||||
&Instruction::ExecuteProcessKill => {
|
||||
try_or_throw!(self.machine_st, self.process_kill());
|
||||
step_or_fail!(self, self.machine_st.p = self.machine_st.cp);
|
||||
}
|
||||
&Instruction::CallPid => {
|
||||
self.pid();
|
||||
step_or_fail!(self, self.machine_st.p += 1);
|
||||
|
||||
Reference in New Issue
Block a user