X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=testprograms%2Ffloat_example.c;h=395161b3a55c16920582a4c0b43a836fe0c0984c;hb=0eb9e8a7def8f3003527c59013190344d27f38f2;hp=783ada1295a37c8b8187b8d186c52619273edff9;hpb=df83e37827032795585d3b25776c465870672901;p=libfirm diff --git a/testprograms/float_example.c b/testprograms/float_example.c index 783ada129..395161b3a 100644 --- a/testprograms/float_example.c +++ b/testprograms/float_example.c @@ -1,9 +1,14 @@ -/* Copyright (C) 1998 - 2000 by Universitaet Karlsruhe -* All rights reserved. -* -* Authors: Christian Schaefer, Goetz Lindenmaier -* -*/ +/* + * Project: libFIRM + * File name: testprograms/float_example.c + * Purpose: + * Author: Christian Schaefer, Goetz Lindenmaier + * Modified by: + * Created: + * CVS-ID: $Id$ + * Copyright: (c) 1999-2003 Universität Karlsruhe + * Licence: This file protected by GPL - GNU GENERAL PUBLIC LICENSE. + */ # include # include @@ -34,10 +39,10 @@ int main(int argc, char **argv) ir_node *x; /* to build control flow */ tarval *tv; - printf("\nCreating an IR graph: EMPTY...\n"); + printf("\nCreating an IR graph: FLOAT EXAMPLE...\n"); /* init library */ - init_firm (); + init_firm (NULL); /** Build type information for the procedure. **/ @@ -48,7 +53,7 @@ int main(int argc, char **argv) */ owner = get_glob_type(); -#define METHODNAME "main" +#define METHODNAME "FLOAT_EXAMPLE_main" #define NRARGS 0 #define NRES 1 /* The type of the method */ @@ -73,7 +78,7 @@ int main(int argc, char **argv) #define NUM_OF_LOCAL_VARS 0 irg = new_ir_graph (ent, NUM_OF_LOCAL_VARS); - tv = tarval_d_from_str ("12345678901234567890.1234567890", 31); + tv = new_tarval_from_str ("12345678901234567890.1234567890", 31, mode_D);