Merge pull request #972 from pmoura/add_pid_predicate
Add pid/1 predicate to the os library
This commit is contained in:
@@ -301,6 +301,7 @@ pub(crate) enum SystemClauseType {
|
||||
GetEnv,
|
||||
SetEnv,
|
||||
UnsetEnv,
|
||||
PID,
|
||||
CharsBase64,
|
||||
DevourWhitespace,
|
||||
IsSTOEnabled,
|
||||
@@ -590,6 +591,7 @@ impl SystemClauseType {
|
||||
&SystemClauseType::GetEnv => clause_name!("$getenv"),
|
||||
&SystemClauseType::SetEnv => clause_name!("$setenv"),
|
||||
&SystemClauseType::UnsetEnv => clause_name!("$unsetenv"),
|
||||
&SystemClauseType::PID => clause_name!("$pid"),
|
||||
&SystemClauseType::CharsBase64 => clause_name!("$chars_base64"),
|
||||
&SystemClauseType::LoadLibraryAsStream => clause_name!("$load_library_as_stream"),
|
||||
&SystemClauseType::DevourWhitespace => clause_name!("$devour_whitespace"),
|
||||
@@ -809,6 +811,7 @@ impl SystemClauseType {
|
||||
("$getenv", 2) => Some(SystemClauseType::GetEnv),
|
||||
("$setenv", 2) => Some(SystemClauseType::SetEnv),
|
||||
("$unsetenv", 1) => Some(SystemClauseType::UnsetEnv),
|
||||
("$pid", 1) => Some(SystemClauseType::PID),
|
||||
("$chars_base64", 4) => Some(SystemClauseType::CharsBase64),
|
||||
("$load_library_as_stream", 3) => Some(SystemClauseType::LoadLibraryAsStream),
|
||||
("$push_load_context", 2) => Some(SystemClauseType::REPL(REPLCodePtr::PushLoadContext)),
|
||||
|
||||
Reference in New Issue
Block a user