//                               -*- Mode: C -*- 
// 
// Cforall Version 1.0.0 Copyright (C) 2016 University of Waterloo
//
// The contents of this file are covered under the licence agreement in the
// file "LICENCE" distributed with Cforall.
// 
// read.c -- 
// 
// Author           : Peter A. Buhr
// Created On       : Wed Mar  2 16:56:02 2016
// Last Modified By : Peter A. Buhr
// Last Modified On : Wed Mar  2 16:56:44 2016
// Update Count     : 2
// 

#include <fstream>

int main() {
    char c;
    short int si;
    unsigned short int usi;
    int i;
    unsigned int ui;
    long int li;
    unsigned long int uli;
    long long int lli;
    unsigned long long int ulli;
    float f;
    double d;
    long double ld;
    float _Complex fc;
    double _Complex dc;
    long double _Complex ldc;
    char s1[10], s2[10];

    ifstream in;
    open( &in, "read.data", "r" );

    &in | &c
	| &si | &usi | &i | &ui | &li | &uli | &lli | &ulli
	| &f | &d | &ld
	| &fc | &dc | &ldc
	| str( s1 ) | str( s2, 10 );

    sout | c | ' ' | endl
	 | si | usi | i | ui | li | uli | lli | ulli | endl
	 | f | d | ld | endl
	 | f | "" | d | "" | ld | endl;

    sepSet( sout, ", $" );
    sout | fc | dc | ldc | endl
	 | sepOn | s1 | sepOff | s2 | endl
	 | s1 | "" | s2 | endl;
}

// Local Variables: //
// tab-width: 4 //
// compile-command: "cfa read.c" //
// End: //