@@ -21,9 +21,10 @@ Parameter SimpleStringFull As Integer = 5;
21
21
22
22
Parameter SimpleString As Integer = 6 ;
23
23
24
- /// Get path to DLL.
25
- /// DLL assumed to be in bin folder, unless specified otherwise
26
- ClassMethod GetDLL () [ CodeMode = expression ]
24
+ /// Get path to the shared library file.
25
+ /// Library file is assumed to be in a bin folder, unless specified otherwise in ^isc.py.Callout global.
26
+ /// write ##class(isc.py.Callout).GetLib()
27
+ ClassMethod GetLib () [ CodeMode = expression ]
27
28
{
28
29
$g (^isc .py .Callout , $g (^%SYS (" bindir" )) _ " iscpython." _ $select ($$$isWINDOWS:" dll" , 1 :" so" ))
29
30
}
@@ -34,7 +35,7 @@ $g(^isc.py.Callout, $g(^%SYS("bindir")) _ "iscpython." _ $select($$$isWINDOWS:"d
34
35
ClassMethod Setup ()
35
36
{
36
37
set sc = $ZF (-4 ,6 ,..#PyLibId)
37
- set sc = $ZF (-4 ,5 ,..#PyLibId, ..GetDLL ())
38
+ set sc = $ZF (-4 ,5 ,..#PyLibId, ..GetLib ())
38
39
quit sc
39
40
}
40
41
@@ -47,7 +48,7 @@ ClassMethod Initialize(debug As %Boolean = {$$$NO}) As %Integer
47
48
if debug {
48
49
set sc = $ZF (-4 ,4 ,..#PyLibId) // unload current copy of inputlib
49
50
set sc = $ZF (-4 ,8 ) // delete existing process index, if any
50
- set sc = $ZF (-4 ,7 ,..#PyLibId, ..GetDLL ()) // override system index
51
+ set sc = $ZF (-4 ,7 ,..#PyLibId, ..GetLib ()) // override system index
51
52
}
52
53
do $ZF (-6 , ..#PyLibId, ..#Initialize)
53
54
}
0 commit comments