Commit 58bd7319 authored by thomas.forbriger's avatar thomas.forbriger Committed by thomas.forbriger
Browse files

disabled blitz in libtfxx

This is a legacy commit from before 2015-03-01.
It may be incomplete as well as inconsistent.
See COPYING.legacy and README.history for details.
started with libbfowgxx code


SVN Path:     http://gpitrsvn.gpi.uni-karlsruhe.de/repos/TFSoftware/trunk
SVN Revision: 1350
SVN UUID:     67feda4a-a26e-11df-9d6e-31afc202ad0c
parent ca54ea40
# this is <Makefile>
# ----------------------------------------------------------------------------
# $Id: Makefile,v 1.14 2002-11-29 18:41:16 forbrig Exp $
# $Id: Makefile,v 1.15 2003-06-24 19:13:46 tforb Exp $
#
# Copyright (c) 2002 by Thomas Forbriger (IMG Frankfurt)
#
......@@ -21,14 +21,16 @@
#
# REVISIONS and CHANGES
# 15/11/2002 V1.0 Thomas Forbriger
# 24/06/2003 V1.1 disabled blitz part of the code
#
# ============================================================================
#
HEADERS=$(shell find . -name \*.h)
SRC=misc/fortranio.cc misc/commandline.cc misc/ioswap.cc misc/error.cc \
misc/blitzfortranio.cc hacks/hack_blitztogrepg.cc
TESTS=$(wildcard tests/*.cc)
#SRC=misc/fortranio.cc misc/commandline.cc misc/ioswap.cc misc/error.cc \
# misc/blitzfortranio.cc hacks/hack_blitztogrepg.cc
SRC=misc/fortranio.cc misc/commandline.cc misc/ioswap.cc misc/error.cc
TESTS=$(filter-out tests/blitztest,$(wildcard tests/*.cc))
FTESTS=$(wildcard tests/*.f)
README=$(shell find . -name README) README.xtra
......
......@@ -3,7 +3,7 @@
*
* ----------------------------------------------------------------------------
*
* $Id: ioswap.cc,v 1.7 2002-11-28 14:04:43 forbrig Exp $
* $Id: ioswap.cc,v 1.8 2003-06-24 19:13:47 tforb Exp $
* \author Thomas Forbriger
* \date 18/11/2002
*
......@@ -14,13 +14,14 @@
* REVISIONS and CHANGES
* - 18/11/2002 V1.0 Thomas Forbriger
* - 19/11/2002 V1.1 should have reached stbility
* - 24/06/2003 V1.2 don't specify default parameters twice
*
* ============================================================================
*/
#define TF_IOSWAP_CC_VERSION \
"TF_IOSWAP_CC V1.0 "
#define TF_IOSWAP_CC_CVSID \
"$Id: ioswap.cc,v 1.7 2002-11-28 14:04:43 forbrig Exp $"
"$Id: ioswap.cc,v 1.8 2003-06-24 19:13:47 tforb Exp $"
#include <tfxx/misc.h>
#include <iostream>
......@@ -133,7 +134,7 @@ Ecpu_type cpu()
//! check magic number in file
Emagic_type file_magic_test(std::istream& is, const char* const cmagic,
const bool& fortranmode=false)
const bool& fortranmode)
{
Emagic_type result=magic_nomatch;
IOUnion<int> req_magic, in_magic;
......@@ -156,7 +157,7 @@ Emagic_type file_magic_test(std::istream& is, const char* const cmagic,
//! write magic number to file
void file_magic_write(std::ostream& os, const char* const cmagic,
const bool& fortranmode=false)
const bool& fortranmode)
{
IOUnion<int> ifour, imagic;
ifour.value=IOTsize<int>::Msize;
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment