diff options
author | CJ van den Berg <cj@vdobnline.com> | 2011-04-20 22:25:22 +0100 |
---|---|---|
committer | Ian Lynagh <igloo@earth.li> | 2011-04-20 22:25:22 +0100 |
commit | 44315e136cf9bc994185e689babec649c127e045 (patch) | |
tree | 32b6e036867cb4b7fc7a44870f6b696321641b52 /rts | |
parent | a8c51c335cfa5201acf80a8d57d0d19b2779d5bc (diff) | |
download | haskell-44315e136cf9bc994185e689babec649c127e045.tar.gz |
For very short linker scripts dlopen may return 'file too short' instead
of 'invalid ELF header'.
Diffstat (limited to 'rts')
-rw-r--r-- | rts/Linker.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/Linker.c b/rts/Linker.c index f39112f4f1..c1310b03b0 100644 --- a/rts/Linker.c +++ b/rts/Linker.c @@ -1186,7 +1186,7 @@ initLinker( void ) # endif /* RTLD_DEFAULT */ compileResult = regcomp(&re_invalid, - "(([^ \t()])+\\.so([^ \t:()])*):([ \t])*invalid ELF header", + "(([^ \t()])+\\.so([^ \t:()])*):([ \t])*(invalid ELF header|file too short)", REG_EXTENDED); ASSERT( compileResult == 0 ); compileResult = regcomp(&re_realso, |