summaryrefslogtreecommitdiff
path: root/src/translate/grt/grt-cbinding.c
diff options
context:
space:
mode:
authorTristan Gingold2014-11-05 05:11:00 +0100
committerTristan Gingold2014-11-05 05:11:00 +0100
commit3fddf1c59fd7a8fcd260bb9e05c611bef3dd141b (patch)
treecbfe6d75f8e09db8b98f335406fb6ecb2fce3e0c /src/translate/grt/grt-cbinding.c
parent0a088b311ed2fcebc542f8a2e42d09e2e3c9311c (diff)
downloadghdl-3fddf1c59fd7a8fcd260bb9e05c611bef3dd141b.tar.gz
ghdl-3fddf1c59fd7a8fcd260bb9e05c611bef3dd141b.tar.bz2
ghdl-3fddf1c59fd7a8fcd260bb9e05c611bef3dd141b.zip
Move files and dirs from translate/
Diffstat (limited to 'src/translate/grt/grt-cbinding.c')
-rw-r--r--src/translate/grt/grt-cbinding.c99
1 files changed, 0 insertions, 99 deletions
diff --git a/src/translate/grt/grt-cbinding.c b/src/translate/grt/grt-cbinding.c
deleted file mode 100644
index b95c0f0..0000000
--- a/src/translate/grt/grt-cbinding.c
+++ /dev/null
@@ -1,99 +0,0 @@
-/* GRT C bindings.
- Copyright (C) 2002, 2003, 2004, 2005 Tristan Gingold.
-
- GHDL is free software; you can redistribute it and/or modify it under
- the terms of the GNU General Public License as published by the Free
- Software Foundation; either version 2, or (at your option) any later
- version.
-
- GHDL is distributed in the hope that it will be useful, but WITHOUT ANY
- WARRANTY; without even the implied warranty of MERCHANTABILITY or
- FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
- for more details.
-
- You should have received a copy of the GNU General Public License
- along with GCC; see the file COPYING. If not, write to the Free
- Software Foundation, 59 Temple Place - Suite 330, Boston, MA
- 02111-1307, USA.
-*/
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-
-FILE *
-__ghdl_get_stdout (void)
-{
- return stdout;
-}
-
-FILE *
-__ghdl_get_stdin (void)
-{
- return stdin;
-}
-
-FILE *
-__ghdl_get_stderr (void)
-{
- return stderr;
-}
-
-int
-__ghdl_snprintf_g (char *buf, unsigned int len, double val)
-{
- snprintf (buf, len, "%g", val);
- return strlen (buf);
-}
-
-void
-__ghdl_snprintf_nf (char *buf, unsigned int len, int ndigits, double val)
-{
- snprintf (buf, len, "%.*f", ndigits, val);
-}
-
-void
-__ghdl_snprintf_fmtf (char *buf, unsigned int len,
- const char *format, double v)
-{
- snprintf (buf, len, format, v);
-}
-
-void
-__ghdl_fprintf_g (FILE *stream, double val)
-{
- fprintf (stream, "%g", val);
-}
-
-void
-__ghdl_fprintf_clock (FILE *stream, int a, int b)
-{
- fprintf (stream, "%3d.%03d", a, b);
-}
-
-#ifndef WITH_GNAT_RUN_TIME
-void
-__gnat_last_chance_handler (void)
-{
- abort ();
-}
-
-void *
-__gnat_malloc (size_t size)
-{
- void *res;
- res = malloc (size);
- return res;
-}
-
-void
-__gnat_free (void *ptr)
-{
- free (ptr);
-}
-
-void *
-__gnat_realloc (void *ptr, size_t size)
-{
- return realloc (ptr, size);
-}
-#endif