13 lines
361 B
Factor
13 lines
361 B
Factor
USING: accessors alien.strings alien.syntax
|
|
compiler.codegen.relocation namespaces sequences tools.test ;
|
|
IN: compiler.codegen.relocation.tests
|
|
|
|
{
|
|
B{ 114 101 97 100 108 105 110 101 0 }
|
|
"libreadline.so"
|
|
} [
|
|
init-relocation
|
|
"readline" DLL" libreadline.so" add-dlsym-parameters
|
|
parameter-table get first2 path>> alien>native-string
|
|
] unit-test
|