X-Git-Url: https://gerrit.simantics.org/r/gitweb?p=simantics%2Fplatform.git;a=blobdiff_plain;f=bundles%2Forg.simantics.modeling.ontology%2Fgraph%2FModeling.pgraph;h=52a37f738ca76566ede5fe44d1589a174c042536;hp=e566026b12fa14bd8e4082e0d10c70d2dd4b8755;hb=4bc25acb8086df68836950af08faeacd382e5427;hpb=e3446802a81064942a7cbfea0c577e21ae5ae658

diff --git a/bundles/org.simantics.modeling.ontology/graph/Modeling.pgraph b/bundles/org.simantics.modeling.ontology/graph/Modeling.pgraph
index e566026b1..52a37f738 100644
--- a/bundles/org.simantics.modeling.ontology/graph/Modeling.pgraph
+++ b/bundles/org.simantics.modeling.ontology/graph/Modeling.pgraph
@@ -325,6 +325,12 @@ MOD.scl : L0.Template
               L0.SCLValue.expression %expression
               L0.HasValueType %valueType
 
+MOD.sclValue : L0.Template
+    @template %subject %expression %valueType
+        %subject  : MOD.SCLValue
+            L0.SCLValue.expression %expression
+            L0.HasValueType %valueType
+
 MOD.sclAssertion : L0.Template
     @template %type %property %expression %valueType
         %type
@@ -530,4 +536,28 @@ MOD.IssueDecorationStyle : DIA.Style
 
 MOD.PreferredDiagramEditorID <R L0.HasProperty : L0.FunctionalRelation
     L0.HasDomain STR.Composite
-    L0.HasRange  L0.String
\ No newline at end of file
+    L0.HasRange  L0.String
+    
+MOD.contentDumpFunction ==> "Resource -> <ReadGraph> Vector Byte" <R L0.HasProperty : L0.FunctionalRelation
+
+// We need to define the function inside this ontology to give it the right evaluation context
+L0.SCLModule
+  MOD.contentDumpFunction
+    MOD.SCLModuleContentDumpFunction
+      @L0.sclValue "sclModuleContentDump" "Resource -> <ReadGraph> Vector Byte"
+
+L0.PGraph
+  MOD.contentDumpFunction
+    MOD.PGraphContentDumpFunction
+      @L0.sclValue "pgraphContentDump" "Resource -> <ReadGraph> Vector Byte"
+
+STR.Component
+  MOD.contentDumpFunction
+    MOD.StructuralComponentContentDumpFunction
+      @L0.sclValue "structuralComponentContentDump" "Resource -> <ReadGraph> Vector Byte"
+      
+SEL.GenericParameterType
+  MOD.contentDumpFunction
+    MOD.GenericParameterTypeContentDumpFunction
+      @L0.sclValue "genericParameterTypeContentDump" "Resource -> <ReadGraph> Vector Byte"
+    
\ No newline at end of file