X-Git-Url: https://gerrit.simantics.org/r/gitweb?a=blobdiff_plain;ds=sidebyside;f=org.simantics.plant3d%2Fscl%2FPlant3d%2FScenegraph%2FPipelineComponent.scl;h=f56444e21172bf0c2378cfb74bd21b5542e669e2;hb=452ed80b1d0bacd7632d482cef42367a491d4486;hp=820e787aeebc8674a241b48f09ee564c9cac5886;hpb=c07ac416dfbe99201084e71c53dc95c9c41d906c;p=simantics%2F3d.git diff --git a/org.simantics.plant3d/scl/Plant3d/Scenegraph/PipelineComponent.scl b/org.simantics.plant3d/scl/Plant3d/Scenegraph/PipelineComponent.scl index 820e787a..f56444e2 100644 --- a/org.simantics.plant3d/scl/Plant3d/Scenegraph/PipelineComponent.scl +++ b/org.simantics.plant3d/scl/Plant3d/Scenegraph/PipelineComponent.scl @@ -99,7 +99,7 @@ class PipelineComponentClass a where getType c = getType' (asPipelineComponent c) getControlPoint :: a -> PipeControlPoint - getControlPoint c = getControlPoint (asPipelineComponent c) + getControlPoint c = getControlPoint' (asPipelineComponent c) remove :: a -> () remove c = remove' (asPipelineComponent c) @@ -164,11 +164,14 @@ importJava "org.simantics.plant3d.scenegraph.controlpoint.PipeControlPoint" wher getPipelineComponent :: PipeControlPoint -> PipelineComponent + getTurnAngle :: PipeControlPoint -> Maybe Double + //@JavaName getType //getPointType :: PipeControlPoint -> PointType isFixed :: PipeControlPoint -> Boolean + @JavaName getChildPoints getSubPoint :: PipeControlPoint -> [PipeControlPoint] getParentPoint :: PipeControlPoint -> Maybe PipeControlPoint