Commit 710632a1 authored by Thomas Jahns's avatar Thomas Jahns 🤸
Browse files

Add already exposed function to public C API.

parent 876d233c
......@@ -111,6 +111,7 @@ libscalesppm_la_SOURCES=ppm/scales_ppm.f90 \
core/ppm_rectilinear_c.c \
core/ppm_rectilinear.h \
core/ppm_strided_extents.f90 \
core/ppm_strided_extents.h \
core/ppm_strided_extents_c.c \
core/ppm_sparse_mask_index.f90 \
core/ppm_compact_mask_index.f90 \
......@@ -205,6 +206,8 @@ libscalesppmcore_la_SOURCES = \
core/ppm_fpu_underflow.h \
core/ppm_rectilinear_c.c \
core/ppm_rectilinear.h \
core/ppm_strided_extents.h \
core/ppm_strided_extents_c.c \
core/ppm_xfuncs.h \
core/xmalloc.c \
core/xstdio.c \
......
/**
* @file ppm_strided_extents.h
* @brief declarations for helper functions to handle strided extents
*
* @copyright Copyright (C) 2021 Thomas Jahns <jahns@dkrz.de>
*
* @version 1.0
* @author Thomas Jahns <jahns@dkrz.de>
*/
/*
* Keywords:
* Maintainer: Thomas Jahns <jahns@dkrz.de>
* URL: https://www.dkrz.de/redmine/projects/scales-ppm
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions are
* met:
*
* Redistributions of source code must retain the above copyright notice,
* this list of conditions and the following disclaimer.
*
* Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* Neither the name of the DKRZ GmbH nor the names of its contributors
* may be used to endorse or promote products derived from this software
* without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
* IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
* TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
* PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER
* OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
* EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
* PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
* PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
* LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
* NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*/
struct strided_extent
{
int first, size, stride;
};
void
PPM_sprint_strided_extent(char *buf, struct strided_extent *sext);
/*
* Local Variables:
* license-project-url: "https://www.dkrz.de/redmine/projects/scales-ppm"
* license-markup: "doxygen"
* license-default: "bsd"
* End:
*/
/*
* strided_extents.c --- short description
/**
* @file ppm_strided_extents_c.c
* @brief helper functions to handle strided extents
*
* Copyright (C) 2010 Thomas Jahns <jahns@dkrz.de>
* @copyright Copyright (C) 2021 Thomas Jahns <jahns@dkrz.de>
*
* Version: 1.0
* @version 1.0
* @author Thomas Jahns <jahns@dkrz.de>
*/
/*
* Keywords:
* Author: Thomas Jahns <jahns@dkrz.de>
* Maintainer: Thomas Jahns <jahns@dkrz.de>
* URL: https://www.dkrz.de/redmine/projects/scales-ppm
*
......@@ -35,21 +38,12 @@
* LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
* NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*
* Commentary:
*
*
*
* Code:
*/
#include <stdio.h>
#include "cfortran.h"
struct strided_extent
{
int first, size, stride;
};
#include "core/ppm_strided_extents.h"
void
PPM_sprint_strided_extent(char *buf, struct strided_extent *sext)
......@@ -69,6 +63,7 @@ PPM_sprint_strided_extent(char *buf, struct strided_extent *sext)
/*
* Local Variables:
* license-project-url: "https://www.dkrz.de/redmine/projects/scales-ppm"
* license-markup: "doxygen"
* license-default: "bsd"
* End:
*/
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment