1[+ AutoGen5 template c +] 2/* 3** Copyright (C) 1999-2017 Erik de Castro Lopo <erikd@mega-nerd.com> 4** 5** This program is free software; you can redistribute it and/or modify 6** it under the terms of the GNU General Public License as published by 7** the Free Software Foundation; either version 2 of the License, or 8** (at your option) any later version. 9** 10** This program is distributed in the hope that it will be useful, 11** but WITHOUT ANY WARRANTY; without even the implied warranty of 12** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 13** GNU General Public License for more details. 14** 15** You should have received a copy of the GNU General Public License 16** along with this program; if not, write to the Free Software 17** Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. 18*/ 19 20#include "sfconfig.h" 21 22#include <stdio.h> 23#include <stdlib.h> 24#include <string.h> 25#include <math.h> 26#include <inttypes.h> 27 28#if HAVE_UNISTD_H 29#include <unistd.h> 30#else 31#include "sf_unistd.h" 32#endif 33 34#include <sndfile.h> 35 36#include "dft_cmp.h" 37#include "utils.h" 38 39#define SAMPLE_RATE 16000 40 41static void float_scaled_test (const char *filename, int allow_exit, int replace_float, int filetype, double target_snr) ; 42static void double_scaled_test (const char *filename, int allow_exit, int replace_float, int filetype, double target_snr) ; 43 44[+ FOR float_type +][+ FOR int_type +][+ FOR endian_type 45+]static void [+ (get "float_name") +]_[+ (get "int_name") +]_[+ (get "end_name") +]_test (const char * filename) ; 46[+ ENDFOR endian_type +][+ ENDFOR int_type +][+ ENDFOR float_type 47+] 48 49static double double_data [DFT_DATA_LENGTH] ; 50static double double_test [DFT_DATA_LENGTH] ; 51 52static float float_data [DFT_DATA_LENGTH] ; 53static float float_test [DFT_DATA_LENGTH] ; 54 55static double double_data [DFT_DATA_LENGTH] ; 56static short short_data [DFT_DATA_LENGTH] ; 57static int int_data [DFT_DATA_LENGTH] ; 58 59int 60main (int argc, char *argv []) 61{ int allow_exit = 1 ; 62 63 if (argc == 2 && ! strstr (argv [1], "no-exit")) 64 allow_exit = 0 ; 65 66#if (HAVE_LRINTF == 0) 67 puts ("*** Cannot run this test on this platform because it lacks lrintf().") ; 68 exit (0) ; 69#endif 70 71 /* Float tests. */ 72 float_scaled_test ("float.raw", allow_exit, SF_FALSE, SF_ENDIAN_LITTLE | SF_FORMAT_RAW | SF_FORMAT_FLOAT, 73 OS_IS_OPENBSD ? -98.0 : -163.0) ; 74 75 /* Test both signed and unsigned 8 bit files. */ 76 float_scaled_test ("pcm_s8.raw", allow_exit, SF_FALSE, SF_FORMAT_RAW | SF_FORMAT_PCM_S8, -39.0) ; 77 float_scaled_test ("pcm_u8.raw", allow_exit, SF_FALSE, SF_FORMAT_RAW | SF_FORMAT_PCM_U8, -39.0) ; 78 79 float_scaled_test ("pcm_16.raw", allow_exit, SF_FALSE, SF_ENDIAN_BIG | SF_FORMAT_RAW | SF_FORMAT_PCM_16, -87.0) ; 80 float_scaled_test ("pcm_24.raw", allow_exit, SF_FALSE, SF_ENDIAN_LITTLE | SF_FORMAT_RAW | SF_FORMAT_PCM_24, -138.0) ; 81 float_scaled_test ("pcm_32.raw", allow_exit, SF_FALSE, SF_ENDIAN_BIG | SF_FORMAT_RAW | SF_FORMAT_PCM_32, -163.0) ; 82 83 float_scaled_test ("ulaw.raw", allow_exit, SF_FALSE, SF_FORMAT_RAW | SF_FORMAT_ULAW, -50.0) ; 84 float_scaled_test ("alaw.raw", allow_exit, SF_FALSE, SF_FORMAT_RAW | SF_FORMAT_ALAW, -49.0) ; 85 86 float_scaled_test ("ima_adpcm.wav", allow_exit, SF_FALSE, SF_FORMAT_WAV | SF_FORMAT_IMA_ADPCM, -47.0) ; 87 float_scaled_test ("ms_adpcm.wav" , allow_exit, SF_FALSE, SF_FORMAT_WAV | SF_FORMAT_MS_ADPCM, -40.0) ; 88 float_scaled_test ("gsm610.raw" , allow_exit, SF_FALSE, SF_FORMAT_RAW | SF_FORMAT_GSM610, -33.0) ; 89 90 float_scaled_test ("g721_32.au", allow_exit, SF_FALSE, SF_FORMAT_AU | SF_FORMAT_G721_32, -32.3) ; 91 float_scaled_test ("g723_24.au", allow_exit, SF_FALSE, SF_FORMAT_AU | SF_FORMAT_G723_24, -32.3) ; 92 float_scaled_test ("g723_40.au", allow_exit, SF_FALSE, SF_FORMAT_AU | SF_FORMAT_G723_40, -40.0) ; 93 94 /* PAF files do not use the same encoding method for 24 bit PCM data as other file 95 ** formats so we need to explicitly test it here. 96 */ 97 float_scaled_test ("le_paf_24.paf", allow_exit, SF_FALSE, SF_ENDIAN_LITTLE | SF_FORMAT_PAF | SF_FORMAT_PCM_24, -149.0) ; 98 float_scaled_test ("be_paf_24.paf", allow_exit, SF_FALSE, SF_ENDIAN_BIG | SF_FORMAT_PAF | SF_FORMAT_PCM_24, -149.0) ; 99 100 float_scaled_test ("dwvw_12.raw", allow_exit, SF_FALSE, SF_FORMAT_RAW | SF_FORMAT_DWVW_12, -64.0) ; 101 float_scaled_test ("dwvw_16.raw", allow_exit, SF_FALSE, SF_FORMAT_RAW | SF_FORMAT_DWVW_16, -92.0) ; 102 float_scaled_test ("dwvw_24.raw", allow_exit, SF_FALSE, SF_FORMAT_RAW | SF_FORMAT_DWVW_24, -151.0) ; 103 104 float_scaled_test ("adpcm.vox", allow_exit, SF_FALSE, SF_FORMAT_RAW | SF_FORMAT_VOX_ADPCM, -40.0) ; 105 106 float_scaled_test ("dpcm_16.xi", allow_exit, SF_FALSE, SF_FORMAT_XI | SF_FORMAT_DPCM_16, -90.0) ; 107 float_scaled_test ("dpcm_8.xi" , allow_exit, SF_FALSE, SF_FORMAT_XI | SF_FORMAT_DPCM_8 , -41.0) ; 108 109 float_scaled_test ("pcm_s8.sds", allow_exit, SF_FALSE, SF_FORMAT_SDS | SF_FORMAT_PCM_S8, -89.0) ; 110 float_scaled_test ("pcm_16.sds", allow_exit, SF_FALSE, SF_FORMAT_SDS | SF_FORMAT_PCM_16, -132.0) ; 111 float_scaled_test ("pcm_24.sds", allow_exit, SF_FALSE, SF_FORMAT_SDS | SF_FORMAT_PCM_24, -170.0) ; 112 113 float_scaled_test ("alac_16.caf", allow_exit, SF_FALSE, SF_FORMAT_CAF | SF_FORMAT_ALAC_16, -90.0) ; 114 float_scaled_test ("alac_32.caf", allow_exit, SF_FALSE, SF_FORMAT_CAF | SF_FORMAT_ALAC_32, -76.0) ; 115 float_scaled_test ("alac_24.caf", allow_exit, SF_FALSE, SF_FORMAT_CAF | SF_FORMAT_ALAC_24, -153.0) ; 116 float_scaled_test ("alac_20.caf", allow_exit, SF_FALSE, SF_FORMAT_CAF | SF_FORMAT_ALAC_20, -125.0) ; 117 118#if HAVE_EXTERNAL_XIPH_LIBS 119 float_scaled_test ("flac_8.flac", allow_exit, SF_FALSE, SF_FORMAT_FLAC | SF_FORMAT_PCM_S8, -39.0) ; 120 float_scaled_test ("flac_16.flac", allow_exit, SF_FALSE, SF_FORMAT_FLAC | SF_FORMAT_PCM_16, -87.0) ; 121 float_scaled_test ("flac_24.flac", allow_exit, SF_FALSE, SF_FORMAT_FLAC | SF_FORMAT_PCM_24, -138.0) ; 122 123 float_scaled_test ("vorbis.oga", allow_exit, SF_FALSE, SF_FORMAT_OGG | SF_FORMAT_VORBIS, -31.0) ; 124 125 float_scaled_test ("opus.opus", allow_exit, SF_FALSE, SF_FORMAT_OGG | SF_FORMAT_OPUS, -32.0) ; 126#endif 127 128 float_scaled_test ("replace_float.raw", allow_exit, SF_TRUE, SF_ENDIAN_LITTLE | SF_FORMAT_RAW | SF_FORMAT_FLOAT, -163.0) ; 129 130 /*============================================================================== 131 ** Double tests. 132 */ 133 134 double_scaled_test ("double.raw", allow_exit, SF_FALSE, SF_FORMAT_RAW | SF_FORMAT_DOUBLE, -201.0) ; 135 136 /* Test both signed (AIFF) and unsigned (WAV) 8 bit files. */ 137 double_scaled_test ("pcm_s8.raw", allow_exit, SF_FALSE, SF_FORMAT_RAW | SF_FORMAT_PCM_S8, -39.0) ; 138 double_scaled_test ("pcm_u8.raw", allow_exit, SF_FALSE, SF_FORMAT_RAW | SF_FORMAT_PCM_U8, -39.0) ; 139 140 double_scaled_test ("pcm_16.raw", allow_exit, SF_FALSE, SF_FORMAT_RAW | SF_FORMAT_PCM_16, -87.0) ; 141 double_scaled_test ("pcm_24.raw", allow_exit, SF_FALSE, SF_FORMAT_RAW | SF_FORMAT_PCM_24, -135.0) ; 142 double_scaled_test ("pcm_32.raw", allow_exit, SF_FALSE, SF_FORMAT_RAW | SF_FORMAT_PCM_32, -184.0) ; 143 144 double_scaled_test ("ulaw.raw", allow_exit, SF_FALSE, SF_FORMAT_RAW | SF_FORMAT_ULAW, -50.0) ; 145 double_scaled_test ("alaw.raw", allow_exit, SF_FALSE, SF_FORMAT_RAW | SF_FORMAT_ALAW, -49.0) ; 146 147 double_scaled_test ("ima_adpcm.wav", allow_exit, SF_FALSE, SF_FORMAT_WAV | SF_FORMAT_IMA_ADPCM, -47.0) ; 148 double_scaled_test ("ms_adpcm.wav" , allow_exit, SF_FALSE, SF_FORMAT_WAV | SF_FORMAT_MS_ADPCM, -40.0) ; 149 double_scaled_test ("gsm610.raw" , allow_exit, SF_FALSE, SF_FORMAT_RAW | SF_FORMAT_GSM610, -33.0) ; 150 151 double_scaled_test ("g721_32.au", allow_exit, SF_FALSE, SF_FORMAT_AU | SF_FORMAT_G721_32, -32.3) ; 152 double_scaled_test ("g723_24.au", allow_exit, SF_FALSE, SF_FORMAT_AU | SF_FORMAT_G723_24, -32.3) ; 153 double_scaled_test ("g723_40.au", allow_exit, SF_FALSE, SF_FORMAT_AU | SF_FORMAT_G723_40, -40.0) ; 154 155 /* 24 bit PCM PAF files tested here. */ 156 double_scaled_test ("be_paf_24.paf", allow_exit, SF_FALSE, SF_ENDIAN_BIG | SF_FORMAT_PAF | SF_FORMAT_PCM_24, -151.0) ; 157 double_scaled_test ("le_paf_24.paf", allow_exit, SF_FALSE, SF_ENDIAN_LITTLE | SF_FORMAT_PAF | SF_FORMAT_PCM_24, -151.0) ; 158 159 double_scaled_test ("dwvw_12.raw", allow_exit, SF_FALSE, SF_FORMAT_RAW | SF_FORMAT_DWVW_12, -64.0) ; 160 double_scaled_test ("dwvw_16.raw", allow_exit, SF_FALSE, SF_FORMAT_RAW | SF_FORMAT_DWVW_16, -92.0) ; 161 double_scaled_test ("dwvw_24.raw", allow_exit, SF_FALSE, SF_FORMAT_RAW | SF_FORMAT_DWVW_24, -151.0) ; 162 163 double_scaled_test ("adpcm.vox" , allow_exit, SF_FALSE, SF_FORMAT_RAW | SF_FORMAT_VOX_ADPCM, -40.0) ; 164 165 double_scaled_test ("dpcm_16.xi", allow_exit, SF_FALSE, SF_FORMAT_XI | SF_FORMAT_DPCM_16, -90.0) ; 166 double_scaled_test ("dpcm_8.xi" , allow_exit, SF_FALSE, SF_FORMAT_XI | SF_FORMAT_DPCM_8 , -41.0) ; 167 168 double_scaled_test ("pcm_s8.sds", allow_exit, SF_FALSE, SF_FORMAT_SDS | SF_FORMAT_PCM_S8, -89.0) ; 169 double_scaled_test ("pcm_16.sds", allow_exit, SF_FALSE, SF_FORMAT_SDS | SF_FORMAT_PCM_16, -132.0) ; 170 double_scaled_test ("pcm_24.sds", allow_exit, SF_FALSE, SF_FORMAT_SDS | SF_FORMAT_PCM_24, -180.0) ; 171 172 double_scaled_test ("alac_16.caf", allow_exit, SF_FALSE, SF_FORMAT_CAF | SF_FORMAT_ALAC_16, -90.0) ; 173 double_scaled_test ("alac_20.caf", allow_exit, SF_FALSE, SF_FORMAT_CAF | SF_FORMAT_ALAC_20, -125.0) ; 174 double_scaled_test ("alac_24.caf", allow_exit, SF_FALSE, SF_FORMAT_CAF | SF_FORMAT_ALAC_24, -153.0) ; 175 double_scaled_test ("alac_32.caf", allow_exit, SF_FALSE, SF_FORMAT_CAF | SF_FORMAT_ALAC_32, -186.0) ; 176 177#if HAVE_EXTERNAL_XIPH_LIBS 178 double_scaled_test ("flac_8.flac", allow_exit, SF_FALSE, SF_FORMAT_FLAC | SF_FORMAT_PCM_S8, -39.0) ; 179 double_scaled_test ("flac_16.flac", allow_exit, SF_FALSE, SF_FORMAT_FLAC | SF_FORMAT_PCM_16, -87.0) ; 180 double_scaled_test ("flac_24.flac", allow_exit, SF_FALSE, SF_FORMAT_FLAC | SF_FORMAT_PCM_24, -138.0) ; 181 182 double_scaled_test ("vorbis.oga", allow_exit, SF_FALSE, SF_FORMAT_OGG | SF_FORMAT_VORBIS, -29.0) ; 183 double_scaled_test ("opus.opus", allow_exit, SF_FALSE, SF_FORMAT_OGG | SF_FORMAT_OPUS, -32.0) ; 184#endif 185 186 double_scaled_test ("replace_double.raw", allow_exit, SF_TRUE, SF_FORMAT_RAW | SF_FORMAT_DOUBLE, -201.0) ; 187 188 putchar ('\n') ; 189 /* Float int tests. */ 190[+ FOR float_type +][+ FOR int_type +][+ FOR endian_type 191+] [+ (get "float_name") +]_[+ (get "int_name") +]_[+ (get "end_name") +]_test ("[+ (get "float_name") +]_[+ (get "int_name") +]_[+ (get "end_name") +].au") ; 192[+ ENDFOR endian_type +][+ ENDFOR int_type +][+ ENDFOR float_type 193+] 194 195 return 0 ; 196} /* main */ 197 198/*============================================================================================ 199 * Here are the test functions. 200 */ 201 202static void 203float_scaled_test (const char *filename, int allow_exit, int replace_float, int filetype, double target_snr) 204{ SNDFILE *file ; 205 SF_INFO sfinfo ; 206 double snr ; 207 int byterate ; 208 209 print_test_name ("float_scaled_test", filename) ; 210 211 gen_windowed_sine_float (float_data, DFT_DATA_LENGTH, 0.9999) ; 212 213 memset (&sfinfo, 0, sizeof (sfinfo)) ; 214 sfinfo.samplerate = SAMPLE_RATE ; 215 sfinfo.frames = DFT_DATA_LENGTH ; 216 sfinfo.channels = 1 ; 217 sfinfo.format = filetype ; 218 219 file = test_open_file_or_die (filename, SFM_WRITE, &sfinfo, SF_TRUE, __LINE__) ; 220 sf_command (file, SFC_TEST_IEEE_FLOAT_REPLACE, NULL, replace_float) ; 221 222 test_write_float_or_die (file, 0, float_data, DFT_DATA_LENGTH, __LINE__) ; 223 224 sf_close (file) ; 225 226 memset (float_test, 0, sizeof (float_test)) ; 227 228 file = test_open_file_or_die (filename, SFM_READ, &sfinfo, SF_TRUE, __LINE__) ; 229 sf_command (file, SFC_TEST_IEEE_FLOAT_REPLACE, NULL, replace_float) ; 230 231 exit_if_true (sfinfo.format != filetype, "\n\nLine %d: Returned format incorrect (0x%08X => 0x%08X).\n", __LINE__, filetype, sfinfo.format) ; 232 exit_if_true (sfinfo.frames < DFT_DATA_LENGTH, "\n\nLine %d: Incorrect number of frames in file (too short). (%" PRId64 " should be %d)\n", __LINE__, sfinfo.frames, DFT_DATA_LENGTH) ; 233 exit_if_true (sfinfo.channels != 1, "\n\nLine %d: Incorrect number of channels in file.\n", __LINE__) ; 234 235 check_log_buffer_or_die (file, __LINE__) ; 236 237 test_read_float_or_die (file, 0, float_test, DFT_DATA_LENGTH, __LINE__) ; 238 239 byterate = sf_current_byterate (file) ; 240 exit_if_true (byterate <= 0, "\n\nLine %d: byterate is zero.\n", __LINE__) ; 241 242 sf_close (file) ; 243 244 snr = dft_cmp_float (__LINE__, float_data, float_test, DFT_DATA_LENGTH, target_snr, allow_exit) ; 245 246 exit_if_true (snr > target_snr, "% 6.1fdB SNR\n\n Error : should be better than % 6.1fdB\n\n", snr, target_snr) ; 247 248 printf ("% 6.1fdB SNR ... ok\n", snr) ; 249 250 unlink (filename) ; 251 252 return ; 253} /* float_scaled_test */ 254 255static void 256double_scaled_test (const char *filename, int allow_exit, int replace_float, int filetype, double target_snr) 257{ SNDFILE *file ; 258 SF_INFO sfinfo ; 259 double snr ; 260 int byterate ; 261 262 print_test_name ("double_scaled_test", filename) ; 263 264 gen_windowed_sine_double (double_data, DFT_DATA_LENGTH, 0.9999) ; 265 266 memset (&sfinfo, 0, sizeof (sfinfo)) ; 267 sfinfo.samplerate = SAMPLE_RATE ; 268 sfinfo.frames = DFT_DATA_LENGTH ; 269 sfinfo.channels = 1 ; 270 sfinfo.format = filetype ; 271 272 file = test_open_file_or_die (filename, SFM_WRITE, &sfinfo, SF_TRUE, __LINE__) ; 273 sf_command (file, SFC_TEST_IEEE_FLOAT_REPLACE, NULL, replace_float) ; 274 275 test_write_double_or_die (file, 0, double_data, DFT_DATA_LENGTH, __LINE__) ; 276 277 sf_close (file) ; 278 279 memset (double_test, 0, sizeof (double_test)) ; 280 281 file = test_open_file_or_die (filename, SFM_READ, &sfinfo, SF_TRUE, __LINE__) ; 282 sf_command (file, SFC_TEST_IEEE_FLOAT_REPLACE, NULL, replace_float) ; 283 284 exit_if_true (sfinfo.format != filetype, "\n\nLine %d: Returned format incorrect (0x%08X => 0x%08X).\n", __LINE__, filetype, sfinfo.format) ; 285 exit_if_true (sfinfo.frames < DFT_DATA_LENGTH, "\n\nLine %d: Incorrect number of frames in file (too short). (%" PRId64 " should be %d)\n", __LINE__, sfinfo.frames, DFT_DATA_LENGTH) ; 286 exit_if_true (sfinfo.channels != 1, "\n\nLine %d: Incorrect number of channels in file.\n", __LINE__) ; 287 288 check_log_buffer_or_die (file, __LINE__) ; 289 290 test_read_double_or_die (file, 0, double_test, DFT_DATA_LENGTH, __LINE__) ; 291 292 byterate = sf_current_byterate (file) ; 293 exit_if_true (byterate <= 0, "\n\nLine %d: byterate is zero.\n", __LINE__) ; 294 295 sf_close (file) ; 296 297 snr = dft_cmp_double (__LINE__, double_data, double_test, DFT_DATA_LENGTH, target_snr, allow_exit) ; 298 299 exit_if_true (snr > target_snr, "% 6.1fdB SNR\n\n Error : should be better than % 6.1fdB\n\n", snr, target_snr) ; 300 301 printf ("% 6.1fdB SNR ... ok\n", snr) ; 302 303 unlink (filename) ; 304 305 return ; 306} /* double_scaled_test */ 307 308/*============================================================================== 309*/ 310 311[+ FOR float_type +][+ FOR int_type +][+ FOR endian_type 312+] 313static void 314[+ (get "float_name") +]_[+ (get "int_name") +]_[+ (get "end_name") +]_test (const char * filename) 315{ SNDFILE *file ; 316 SF_INFO sfinfo ; 317 int max ; 318 unsigned k ; 319 320 print_test_name ("[+ (get "float_name") +]_[+ (get "int_name") +]_[+ (get "end_name") +]_test", filename) ; 321 322 gen_windowed_sine_[+ (get "float_name") +] ([+ (get "float_name") +]_data, ARRAY_LEN ([+ (get "float_name") +]_data), 0.9999) ; 323 324 memset (&sfinfo, 0, sizeof (sfinfo)) ; 325 sfinfo.samplerate = SAMPLE_RATE ; 326 sfinfo.frames = ARRAY_LEN ([+ (get "int_name") +]_data) ; 327 sfinfo.channels = 1 ; 328 sfinfo.format = [+ (get "end_type") +] | SF_FORMAT_AU | [+ (get "minor_type") +] ; 329 330 file = test_open_file_or_die (filename, SFM_WRITE, &sfinfo, SF_TRUE, __LINE__) ; 331 test_write_[+ (get "float_name") +]_or_die (file, 0, [+ (get "float_name") +]_data, ARRAY_LEN ([+ (get "float_name") +]_data), __LINE__) ; 332 sf_close (file) ; 333 334 file = test_open_file_or_die (filename, SFM_READ, &sfinfo, SF_TRUE, __LINE__) ; 335 336 if (sfinfo.frames != ARRAY_LEN ([+ (get "float_name") +]_data)) 337 { printf ("\n\nLine %d: Incorrect number of frames in file (too short). (%" PRId64 " should be %d)\n", __LINE__, sfinfo.frames, DFT_DATA_LENGTH) ; 338 exit (1) ; 339 } ; 340 341 if (sfinfo.channels != 1) 342 { printf ("\n\nLine %d: Incorrect number of channels in file.\n", __LINE__) ; 343 exit (1) ; 344 } ; 345 346 sf_command (file, SFC_SET_SCALE_FLOAT_INT_READ, NULL, SF_TRUE) ; 347 348 test_read_[+ (get "int_name") +]_or_die (file, 0, [+ (get "int_name") +]_data, ARRAY_LEN ([+ (get "int_name") +]_data), __LINE__) ; 349 sf_close (file) ; 350 351 max = 0 ; 352 for (k = 0 ; k < ARRAY_LEN ([+ (get "int_name") +]_data) ; k++) 353 if (abs ([+ (get "int_name") +]_data [k]) > max) 354 max = abs ([+ (get "int_name") +]_data [k]) ; 355 356 if (1.0 * abs (max - [+ (get "int_max") +]) / [+ (get "int_max") +] > 0.01) 357 { printf ("\n\nLine %d: Bad maximum (%d should be %d).\n\n", __LINE__, max, [+ (get "int_max") +]) ; 358 exit (1) ; 359 } ; 360 361 unlink (filename) ; 362 puts ("ok") ; 363} /* [+ (get "float_name") +]_[+ (get "int_name") +]_[+ (get "end_name") +]_test */ 364[+ ENDFOR endian_type +][+ ENDFOR int_type +][+ ENDFOR float_type +] 365 366