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

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


        }

        case 1: {
          // Cal.Core.Prelude.Cons
          // Decompose data type to access members.
          RTValue n = $case1.get_head();
          RTValue ns = $case1.get_tail();
          RTValue letVar_pattern_newVisited_newAccum =
            Fold_D_F_S_Internal__dfs_All__9.$pattern_newVisited_newAccum$18$def_Lazy(
              dfsHelper,
              n,
              visited.getValue(),
              accum.getValue(),
              $ec);
          RTValue letVar_newVisited =
            Fold_D_F_S_Internal__dfs_All__9.newVisited$16$def_Lazy(
              letVar_pattern_newVisited_newAccum,
              $ec);

          RTValue visited$ = letVar_newVisited.evaluate($ec);
          visited = visited$;
            accum =
            Fold_D_F_S_Internal__dfs_All__9.newAccum$17$def_Strict(
              letVar_pattern_newVisited_newAccum,
              $ec);
View Full Code Here


   * f
   * This method implements the function logic of the CAL function Cal.Samples.DirectedGraphLibrary.makePair
   */
  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(
        $x0$L.evaluate($ec).getOpaqueValue(),
        $x1$L.evaluate($ec).getOpaqueValue(),
        $ec);
  }
View Full Code Here

   * f
   * This method implements the function logic of the CAL function Cal.Core.Prelude.notEqualsInt
   */
  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(
        $x0$L.evaluate($ec).getOrdinalValue(),
        $x1$L.evaluate($ec).getOrdinalValue(),
        $ec);
  }
View Full Code Here

   * f
   * This method implements the function logic of the CAL function Cal.Utilities.DirectedGraph.mergeVertices
   */
  public final RTValue f(final RTResultFunction $rootNode, final RTExecutionContext $ec) throws CALExecutorException {
    // Arguments
    RTValue mergedVertex = $rootNode.getArgValue();
    RTValue $currentRootNode;
    RTValue vertex2 =
      ($currentRootNode = $rootNode.prevArg()).getArgValue();
    RTValue vertex1 =
      ($currentRootNode = $currentRootNode.prevArg()).getArgValue();
    RTValue retainLoops =
      ($currentRootNode = $currentRootNode.prevArg()).getArgValue();
    RTValue graph =
      ($currentRootNode = $currentRootNode.prevArg()).getArgValue();
    RTValue $dictvarCal_Core_Prelude_Eq_48 =
      $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.Samples.DirectedGraphLibrary.filter
   */
  public final RTValue f(final RTResultFunction $rootNode, final RTExecutionContext $ec) throws CALExecutorException {
    // Arguments
    RTValue graph = $rootNode.getArgValue();
    RTValue filterFn = $rootNode.prevArg().getArgValue();

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

  /**
   * f6S
   * This method implements the function logic of the CAL function Cal.Utilities.DirectedGraph.mergeVertices
   */
  public final RTValue f6S(RTValue $dictvarCal_Core_Prelude_Eq_48, RTValue graph, RTValue retainLoops, RTValue vertex1, RTValue vertex2, RTValue mergedVertex, RTExecutionContext $ec) throws CALExecutorException {
    RTValue letVar_vertex1Num =
      Merge_Vertices.vertex1Num$6$def_Lazy(
        $dictvarCal_Core_Prelude_Eq_48,
        graph,
        vertex1,
        $ec);

    // Top level supercombinator logic
    TYPE_Maybe $case1;

    switch (($case1 = (((TYPE_Maybe)(java.lang.Object)Get_Maybe_Vertex_Number.$instance.f3S($dictvarCal_Core_Prelude_Eq_48, graph, mergedVertex, $ec).evaluate($ec)))).getOrdinalValue()) {

      case 0: {
        // Cal.Core.Prelude.Nothing
        return
          Merge_Vertices.mergedWithEachother$8$def_Lazy(
            $dictvarCal_Core_Prelude_Eq_48,
            graph,
            vertex2,
            retainLoops,
            letVar_vertex1Num,
            mergedVertex,
            $ec);
      }

      case 1: {
        // Cal.Core.Prelude.Just
        // Decompose data type to access members.
        RTValue mergedVertexNum = $case1.get_value();

        return
          Merge_Vertices_Internal.$instance.f6S(
            $dictvarCal_Core_Prelude_Eq_48,
            Merge_Vertices.mergedWithEachother$8$def_Lazy(
View Full Code Here

   * f
   * This method implements the function logic of the CAL function Cal.Core.Prelude.induceEqualityFunction
   */
  public final RTValue f(final RTResultFunction $rootNode, final RTExecutionContext $ec) throws CALExecutorException {
    // Arguments
    RTValue y = $rootNode.getArgValue();
    RTValue $currentRootNode;
    RTValue x = ($currentRootNode = $rootNode.prevArg()).getArgValue();
    RTValue projectionFunction =
      ($currentRootNode = $currentRootNode.prevArg()).getArgValue();
    RTValue $dictvarCal_Core_Prelude_Eq_41 =
      $currentRootNode.prevArg().getArgValue();

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

   * fUnboxed4S
   * This method implements the logic of the CAL function Cal.Core.Prelude.induceEqualityFunction
   * This version of the logic returns an unboxed value.
   */
  public final boolean fUnboxed4S(RTValue $dictvarCal_Core_Prelude_Eq_41, RTValue projectionFunction, RTValue x, RTValue y, RTExecutionContext $ec) throws CALExecutorException {
    RTValue $result =
      f4S($dictvarCal_Core_Prelude_Eq_41, projectionFunction, x, y, $ec);

    $dictvarCal_Core_Prelude_Eq_41 = null;
    projectionFunction = null;
    x = null;
    y = null;
    return $result.evaluate($ec).getBooleanValue();
  }
View Full Code Here

   * f
   * This method implements the function logic of the CAL function Cal.Utilities.DirectedGraph.removeVertex
   */
  public final RTValue f(final RTResultFunction $rootNode, final RTExecutionContext $ec) throws CALExecutorException {
    // Arguments
    RTValue vertex = $rootNode.getArgValue();
    RTValue $currentRootNode;
    RTValue oldGraph =
      ($currentRootNode = $rootNode.prevArg()).getArgValue();
    RTValue $dictvarCal_Core_Prelude_Eq_21 =
      $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.Samples.DirectedGraphLibrary.applyVertexPredicate
   */
  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(
        ((Predicate)(java.lang.Object)
          $x0$L.evaluate($ec).getOpaqueValue()),
        $x1$L.evaluate($ec).getOpaqueValue(),
        $ec);
  }
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.