Здравствуйте, Marc.
Вы писали 12 ноября 2008 г., 21:20:23:
MS> Am Mittwoch, den 12.11.2008, 20:00 +0100 schrieb Marc Santhoff:
>> Am Mittwoch, den 12.11.2008, 20:02 +0200 schrieb KES:
>> > I have tryed in C:
>> >
>> > extern int fntest();
>> >
>> > int fntest()
>> > {
>> > return 8;
>> > }
>> >
>> > this work, but fpc does not (((
>>
>> Maybe looking at the .o with nm helps to show you how the function name
>> is mangled.
>>
>> Or use "fpc -s ..." and "gcc -S -fverbose-asm ..." on both source files
>> for comparing the labels in the generated assembler code.
MS> Oops, I meant "fpc -a ...".
MS> Marc
C file:
testudf.so: ELF 32-bit LSB shared object, Intel 80386, version 1 (FreeBSD), dyna
00001630 A _DYNAMIC
00001704 A _GLOBAL_OFFSET_TABLE_
w _Jv_RegisterClasses
000016f4 d __CTOR_END__
000016f0 d __CTOR_LIST__
000016fc d __DTOR_END__
000016f8 d __DTOR_LIST__
0000162c r __FRAME_END__
00001700 d __JCR_END__
00001700 d __JCR_LIST__
0000171c A __bss_start
w __cxa_finalize@@FBSD_1.0
00000550 t __do_global_ctors_aux
000004a0 t __do_global_dtors_aux
00001624 d __dso_handle
00000537 t __i686.get_pc_thunk.bx
0000171c A _edata
00001720 A _end
00000584 T _fini
0000046c T _init
0000171c b completed.4685
00000540 T fntest
00000500 t frame_dummy
00001628 d p.4683
libtkes2.so: ELF 32-bit LSB shared object, Intel 80386, version 1 (FreeBSD),
dynamically linked, not stripped
U FINALIZE$_OBJPAS
U FPC_INITIALIZEUNITS
0000158c D FPC_RESOURCESTRINGTABLES
0000157c D FPC_THREADVARTABLES
U INIT$_OBJPAS
U INIT$_SYSTEM
00001564 D INITFINAL
00000530 T P$TKES2_SOMEFN$$LONGINT
00000544 T P$TKES2_main
00000544 T PASCALMAIN
U THREADVARLIST_OBJPAS
00001560 D THREADVARLIST_P$TKES2
U THREADVARLIST_SYSTEM
000015cc A _DYNAMIC
00001654 A _GLOBAL_OFFSET_TABLE_
00001660 A __bss_start
00001598 D __fpc_valgrind
00001594 D __heapsize
00001590 D __stklen
00001660 A _edata
00001660 A _end
00000550 T _somefn
00000530 T somefn
--
С уважением,
KES mailto:[EMAIL PROTECTED]
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
