2 * NOTICE and LICENSE for Tecplot Input/Output Library (TecIO) - OpenFOAM
4 * Copyright (C) 1988-2009 Tecplot, Inc. All rights reserved worldwide.
6 * Tecplot hereby grants OpenCFD limited authority to distribute without
7 * alteration the source code to the Tecplot Input/Output library, known
8 * as TecIO, as part of its distribution of OpenFOAM and the
9 * OpenFOAM_to_Tecplot converter. Users of this converter are also hereby
10 * granted access to the TecIO source code, and may redistribute it for the
11 * purpose of maintaining the converter. However, no authority is granted
12 * to alter the TecIO source code in any form or manner.
14 * This limited grant of distribution does not supersede Tecplot, Inc.'s
15 * copyright in TecIO. Contact Tecplot, Inc. for further information.
18 * 3535 Factoria Blvd, Ste. 550
19 * Bellevue, WA 98006, USA
20 * Phone: +1 425 653 1200
21 * http://www.tecplot.com/
26 #define TECPLOTENGINEMODULE
29 *****************************************************************
30 *****************************************************************
32 ****** Copyright (C) 1988-2008 Tecplot, Inc. *******
34 *****************************************************************
35 *****************************************************************
38 #define FILESTREAMMODULE
44 #include "FILESTREAM.h"
48 FileStream_s
*FileStreamAlloc(FILE *File
,
49 Boolean_t IsByteOrderNative
)
51 REQUIRE(VALID_REF(File
) || File
== NULL
);
53 FileStream_s
*Result
= ALLOC_ITEM(FileStream_s
, "FileStream");
57 Result
->IsByteOrderNative
= IsByteOrderNative
;
60 ENSURE(VALID_REF(Result
) || Result
== NULL
);
66 void FileStreamDealloc(FileStream_s
**FileStream
)
68 REQUIRE(VALID_REF(FileStream
));
69 REQUIRE(VALID_REF(*FileStream
) || *FileStream
== NULL
);
71 if (*FileStream
!= NULL
)
73 FREE_ITEM(*FileStream
, "FileStream");
77 ENSURE(*FileStream
== NULL
);