2016-03-13 01:37:49 -05:00
|
|
|
USING: accessors alien.strings alien.syntax
|
|
|
|
|
compiler.codegen.relocation namespaces sequences tools.test ;
|
2016-03-09 02:53:16 -05:00
|
|
|
IN: compiler.codegen.relocation.tests
|
|
|
|
|
|
|
|
|
|
{
|
|
|
|
|
B{ 114 101 97 100 108 105 110 101 0 }
|
2016-03-13 01:37:49 -05:00
|
|
|
"libreadline.so"
|
2016-03-09 02:53:16 -05:00
|
|
|
} [
|
|
|
|
|
init-relocation
|
|
|
|
|
"readline" DLL" libreadline.so" add-dlsym-parameters
|
2016-03-13 01:37:49 -05:00
|
|
|
parameter-table get first2 path>> alien>native-string
|
2016-03-09 02:53:16 -05:00
|
|
|
] unit-test
|
