blob: 55ca92707a98f12631e0cb20f29cf5d1ba44dcba (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
|
implementation module ipc;
//1.3
from StdString import String;
//3.1
open_pipes :: !String !String -> Int;
open_pipes a0 a1 = code {
ccall open_pipes "SS:I"
}
// int open_pipes (CleanString commands_name,CleanString results_name);
get_command_length :: Int;
get_command_length = code {
ccall get_command_length ":I"
}
// int get_command_length ();
get_command :: !String -> Int;
get_command a0 = code {
ccall get_command "S:I"
}
// int get_command (CleanString cleanString);
send_result :: !Int -> Int;
send_result a0 = code {
ccall send_result "I:I"
}
// int send_result (int result);
|