я научился складывать из слова жопа слово счастье :)

[zmij_r]

собрал perl XS библиотеку, обращающуюся к TAO ORB :)
без шаманства не обошлось, пришлось почитать результаты препроцессинга, но в итоге не так все и страшно получилось.


#ifdef __cplusplus
extern "C" {
#endif

#define HAS_UNION_SEMUN
#include

#include "EXTERN.h"
#include "perl.h"
#include "XSUB.h"

#include "ppport.h"

#ifdef __cplusplus
}
#endif

// undefайним то, что надефайнили сишники
#undef getpwent
#undef getpwnam
#undef getpwuid
#undef do_open
#undef do_close

#include
#include

// Заголовок CORBA-сервиса
#include "../../src/EventLoggingService/GFLoggingServiceC.h"

дальше идет стандартное XS-ное шаманство.