Executing problem

I have this code to generate a cut opperation:
...
TopoDS_Solid S1 = BRepPrimAPI_MakeSphere(R);
TopoDS_Solid F2 = BRepPrimAPI_MakeCylinder(R,R);
BRepAlgoAPI_Cut cutting(S1,F2);
if(!cutting.IsDone())
{
TopoDS_Shape Result = cutting.Shape();
return Result;
}
...

But when I execute the program, a segmentation fault appears, what am I doing wrong?

Thanks in advantage for your help.