Package org.openquark.cal.internal.runtime.lecc

Examples of org.openquark.cal.internal.runtime.lecc.RTValue


   * f
   * This method implements the function logic of the CAL function Cal.Utilities.DirectedGraph.partition
   */
  public final RTValue f(final RTResultFunction $rootNode, final RTExecutionContext $ec) throws CALExecutorException {
    // Arguments
    RTValue graph = $rootNode.getArgValue();
    RTValue $currentRootNode;
    RTValue partitionFn =
      ($currentRootNode = $rootNode.prevArg()).getArgValue();
    RTValue $dictvarCal_Core_Prelude_Eq_14 =
      $currentRootNode.prevArg().getArgValue();

    // Release the fields in the root node to open them to garbage collection
    $rootNode.clearMembers();
    return
View Full Code Here


  /**
   * f3S
   * This method implements the function logic of the CAL function Cal.Utilities.DirectedGraph.partition
   */
  public final RTValue f3S(RTValue $dictvarCal_Core_Prelude_Eq_14, RTValue partitionFn, RTValue graph, RTExecutionContext $ec) throws CALExecutorException {
    RTValue letVar_pattern_list1_list2 =
      Partition.$pattern_list1_list2$6$def_Lazy(graph, partitionFn, $ec);
    RTValue letVar_list1 =
      Partition.list1$4$def_Lazy(letVar_pattern_list1_list2, $ec);
    RTValue letVar_list2 =
      Partition.list2$5$def_Lazy(letVar_pattern_list1_list2, $ec);

    // Top level supercombinator logic

    RTCons $case1 = ((RTCons)(java.lang.Object)graph.evaluate($ec));

    // Cal.Utilities.DirectedGraph.DirectedGraph
    // Decompose data type to access members.
    TYPE_Directed_Graph.CAL_Directed_Graph $dcCaseVar1 =
      ((TYPE_Directed_Graph.CAL_Directed_Graph)(java.lang.Object)$case1);

    int nextVertexNum$U = $dcCaseVar1.get_nextVertexNum_As_Int();
    RTValue $_ = $dcCaseVar1.get_vertexMap();
    RTValue edges = $dcCaseVar1.get_edges();
    RTValue letVar_vertexNums1 =
      Partition.vertexNums1$7$def_Lazy(letVar_list1, $ec);
    RTValue letVar_vertexNums2 =
      Partition.vertexNums2$8$def_Lazy(letVar_list2, $ec);

    return
      RTRecordValue.makeTupleRecord(
        new RTValue[] {Partition.graph1$18$def_Lazy(edges, letVar_vertexNums2, letVar_vertexNums1, letVar_list1, nextVertexNum$U, $ec), Partition.graph2$19$def_Lazy(letVar_list2, edges, letVar_vertexNums1, letVar_vertexNums2, nextVertexNum$U, $ec)});
View Full Code Here

   * f
   * This method implements the function logic of the CAL function Cal.Core.Prelude.jStringBuilder_append2
   */
  public final RTValue f(final RTResultFunction $rootNode, final RTExecutionContext $ec) throws CALExecutorException {
    // Arguments
    RTValue $x1$L = $rootNode.getArgValue();
    RTValue $x0$L = $rootNode.prevArg().getArgValue();

    // Release the fields in the root node to open them to garbage collection
    $rootNode.clearMembers();
    return
      f2S(
        ((java.lang.StringBuilder)(java.lang.Object)
          $x0$L.evaluate($ec).getOpaqueValue()),
        $x1$L.evaluate($ec).getStringValue(),
        $ec);
  }
View Full Code Here

   * f
   * This method implements the function logic of the CAL function Cal.Utilities.DirectedGraph.getMaybeVertexNumber$findVertexNum$3
   */
  public final RTValue f(final RTResultFunction $rootNode, final RTExecutionContext $ec) throws CALExecutorException {
    // Arguments
    RTValue pair = $rootNode.getArgValue();
    RTValue $currentRootNode;
    RTValue result =
      ($currentRootNode = $rootNode.prevArg()).getArgValue();
    RTValue vertex =
      ($currentRootNode = $currentRootNode.prevArg()).getArgValue();
    RTValue $dictvarCal_Core_Prelude_Eq_0 =
      $currentRootNode.prevArg().getArgValue();

    // Release the fields in the root node to open them to garbage collection
    $rootNode.clearMembers();
    return
View Full Code Here

      return result.getValue();
    } else {

      RTRecordValue $recordCase2 =
        ((RTRecordValue)(java.lang.Object)pair.getValue());
      RTValue key = $recordCase2.getOrdinalFieldValue(1);
      RTValue val = $recordCase2.getOrdinalFieldValue(2);

      if ((new RTOApp3(
        $dictvarCal_Core_Prelude_Eq_0,
        Get_Maybe_Vertex_Number__find_Vertex_Num__3.$L1_Int_0,
        val,
View Full Code Here

   * f
   * This method implements the function logic of the CAL function Cal.Utilities.DirectedGraph.makePredicateGraph
   */
  public final RTValue f(final RTResultFunction $rootNode, final RTExecutionContext $ec) throws CALExecutorException {
    // Arguments
    RTValue existsEdgeFn = $rootNode.getArgValue();
    RTValue $currentRootNode;
    RTValue vertices =
      ($currentRootNode = $rootNode.prevArg()).getArgValue();
    RTValue $dictvarCal_Core_Prelude_Eq_30 =
      $currentRootNode.prevArg().getArgValue();

    // Release the fields in the root node to open them to garbage collection
    $rootNode.clearMembers();
    return
View Full Code Here

   * f
   * This method implements the function logic of the CAL function Cal.Core.Prelude.snd
   */
  public final RTValue f(final RTResultFunction $rootNode, final RTExecutionContext $ec) throws CALExecutorException {
    // Arguments
    RTValue pair = $rootNode.getArgValue();

    // Release the fields in the root node to open them to garbage collection
    $rootNode.clearMembers();
    return f1S(RTValue.lastRef(pair.evaluate($ec), pair = null), $ec);
  }
View Full Code Here

   * f
   * This method implements the function logic of the CAL function Cal.Collections.List.outputList
   */
  public final RTValue f(final RTResultFunction $rootNode, final RTExecutionContext $ec) throws CALExecutorException {
    // Arguments
    RTValue $dictvarCal_Core_Prelude_Outputable_14 =
      $rootNode.getArgValue();

    // Release the fields in the root node to open them to garbage collection
    $rootNode.clearMembers();
    return
View Full Code Here

   * f
   * This method implements the function logic of the CAL function Cal.Collections.Set.difference
   */
  public final RTValue f(final RTResultFunction $rootNode, final RTExecutionContext $ec) throws CALExecutorException {
    // Arguments
    RTValue t2 = $rootNode.getArgValue();
    RTValue $currentRootNode;
    RTValue t1 = ($currentRootNode = $rootNode.prevArg()).getArgValue();
    RTValue $dictvarCal_Core_Prelude_Ord_19 =
      $currentRootNode.prevArg().getArgValue();

    // Release the fields in the root node to open them to garbage collection
    $rootNode.clearMembers();
    return
View Full Code Here

   * f
   * This method implements the function logic of the CAL function Cal.Utilities.DirectedGraph.foldDFSInternal$dfsAll$9
   */
  public final RTValue f(final RTResultFunction $rootNode, final RTExecutionContext $ec) throws CALExecutorException {
    // Arguments
    RTValue vertexNums = $rootNode.getArgValue();
    RTValue $currentRootNode;
    RTValue accum = ($currentRootNode = $rootNode.prevArg()).getArgValue();
    RTValue visited =
      ($currentRootNode = $currentRootNode.prevArg()).getArgValue();
    RTValue dfsHelper = $currentRootNode.prevArg().getArgValue();

    // Release the fields in the root node to open them to garbage collection
    $rootNode.clearMembers();
    return
      f4S(
View Full Code Here

TOP

Related Classes of org.openquark.cal.internal.runtime.lecc.RTValue

Copyright © 2018 www.massapicom. All rights reserved.
All source code are property of their respective owners. Java is a trademark of Sun Microsystems, Inc and owned by ORACLE Inc. Contact coftware#gmail.com.