check.c

fortran并行计算包

/* -*- Mode: C; c-basic-offset:4 ; -*- */
/*  $Id: check.c,v 1.3 2003/02/17 14:07:11 gropp Exp $
 *
 *  (C) 2002 by Argonne National Laboratory.
 *      See COPYRIGHT in top-level directory.
 */

#include <stdio.h>

/* This is a test program, so we allow printf */
/* style: allow:printf:3 sig:0 */

extern int MPIU_Snprintf( char *, size_t, const char *, ... );

int main( int argc, char *argv[] )
{
    char buf[1000];
    int n;

    n = MPIU_Snprintf( buf, 100, "This is a test\n" );
    printf( "%d:%s", n, buf );

    n = MPIU_Snprintf( buf, 100, "This is a test %d\n", 3000000 );
    printf( "%d:%s", n, buf );

    n = MPIU_Snprintf( buf, 100, "This %s %% %d\n", "is a test for ", -3000 );
    printf( "%d:%s", n, buf );

    return 0;
}