Files
blis/frame/base/bli_apool.h
Field G. Van Zee 29b0e1ef4e Code review + tweaks to AMD's AOCL 2.0 PR (#349).
Details:
- NOTE: This is a merge commit of 'master' of git://github.com/amd/blis
  into 'amd-master' of flame/blis.
- Fixed a bug in the downstream value of BLIS_NUM_ARCHS, which was
  inadvertantly not incremented when the Zen2 subconfiguration was
  added.
- In bli_gemm_front(), added a missing conditional constraint around the
  call to bli_gemm_small() that ensures that the computation precision
  of C matches the storage precision of C.
- In bli_syrk_front(), reorganized and relocated the notrans/trans logic
  that existed around the call to bli_syrk_small() into bli_syrk_small()
  to minimize the calling code footprint and also to bring that code
  into stylistic harmony with similar code in bli_gemm_front() and
  bli_trsm_front(). Also, replaced direct accessing of obj_t fields with
  proper accessor static functions (e.g. 'a->dim[0]' becomes
  'bli_obj_length( a )').
- Added #ifdef BLIS_ENABLE_SMALL_MATRIX guard around prototypes for
  bli_gemm_small(), bli_syrk_small(), and bli_trsm_small(). This is
  strictly speaking unnecessary, but it serves as a useful visual cue to
  those who may be reading the files.
- Removed cpp macro-protected small matrix debugging code from
  bli_trsm_front.c.
- Added a GCC_OT_9_1_0 variable to build/config.mk.in to facilitate gcc
  version check for availability of -march=znver2, and added appropriate
  support to configure script.
- Cleanups to compiler flags common to recent AMD microarchitectures in
  config/zen/amd_config.mk, including: removal of -march=znver1 et al.
  from CKVECFLAGS (since the -march flag is added within make_defs.mk);
  setting CRVECFLAGS similarly to CKVECFLAGS.
- Cleanups to config/zen/bli_cntx_init_zen.c.
- Cleanups, added comments to config/zen/make_defs.mk.
- Cleanups to config/zen2/make_defs.mk, including making use of newly-
  added GCC_OT_9_1_0 and existing GCC_OT_6_1_0 to choose the correct
  set of compiler flags based on the version of gcc being used.
- Reverted downstream changes to test/test_gemm.c.
- Various whitespace/comment changes.
2019-10-11 10:24:24 -05:00

142 lines
3.5 KiB
C

/*
BLIS
An object-based framework for developing high-performance BLAS-like
libraries.
Copyright (C) 2018 - 2019, Advanced Micro Devices, Inc.
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(s) of the copyright holder(s) 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
HOLDER 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.
*/
#ifndef BLIS_APOOL_H
#define BLIS_APOOL_H
// -- Locked pool-of-arrays type --
/*
typedef struct
{
bli_pthread_mutex_t mutex;
pool_t pool;
siz_t def_array_len;
} apool_t;
*/
// apool entry query
static pool_t* bli_apool_pool( apool_t* apool )
{
return &(apool->pool);
}
static bli_pthread_mutex_t* bli_apool_mutex( apool_t* apool )
{
return &(apool->mutex);
}
static siz_t bli_apool_def_array_len( apool_t* pool )
{
return pool->def_array_len;
}
static bool_t bli_apool_is_exhausted( apool_t* apool )
{
pool_t* restrict pool = bli_apool_pool( apool );
return bli_pool_is_exhausted( pool );
}
// apool action
static void bli_apool_lock( apool_t* apool )
{
bli_pthread_mutex_lock( bli_apool_mutex( apool ) );
}
static void bli_apool_unlock( apool_t* apool )
{
bli_pthread_mutex_unlock( bli_apool_mutex( apool ) );
}
// apool entry modification
static void bli_apool_set_def_array_len( siz_t def_array_len, apool_t* pool ) \
{
pool->def_array_len = def_array_len;
}
// -----------------------------------------------------------------------------
void bli_apool_init
(
apool_t* restrict apool
);
void bli_apool_finalize
(
apool_t* restrict apool
);
array_t* bli_apool_checkout_array
(
siz_t n_threads,
apool_t* restrict apool
);
void bli_apool_checkin_array
(
array_t* restrict array,
apool_t* restrict apool
);
pool_t* bli_apool_array_elem
(
siz_t index,
array_t* restrict array
);
void bli_apool_grow
(
siz_t num_blocks_add,
apool_t* restrict apool
);
void bli_apool_alloc_block
(
siz_t num_elem,
array_t** restrict array_p
);
void bli_apool_free_block
(
array_t* restrict array
);
#endif