Permalink
Browse files

Install STD.TEXTIO package

  • Loading branch information...
1 parent 71a30d6 commit bed58416db82638754c7777d316b2a0b8266f67d @nickg committed Dec 27, 2012
Showing with 17 additions and 17 deletions.
  1. +1 −1 lib/std/Makefile.am
  2. +14 −14 lib/std/textio.vhd
  3. +2 −2 src/type.c
View
@@ -1,7 +1,7 @@
nvc = $(nvc_verbose)$(top_builddir)/src/nvc
stddir = $(pkgdatadir)/std
-std_DATA = std/_NVC_LIB std/STD.STANDARD #std/STD.TEXTIO
+std_DATA = std/_NVC_LIB std/STD.STANDARD std/STD.TEXTIO
nvc_verbose = $(nvc_verbose_@AM_V@)
nvc_verbose_ = $(nvc_verbose_@AM_DEFAULT_V@)
View
@@ -14,52 +14,52 @@ package TEXTIO is
file INPUT : TEXT open READ_MODE is "STD_INPUT";
file OUTPUT : TEXT open WRITE_MODE is "STD_OUTPUT";
-
+
procedure READLINE (file F: TEXT; L: out LINE);
-
- procedure READ (L : inout LINE;
+
+ procedure READ (L : inout LINE;
VALUE : out BIT;
GOOD : out BOOLEAN );
procedure READ (L : inout LINE;
VALUE : out BIT );
-
- procedure READ (L : inout LINE;
+
+ procedure READ (L : inout LINE;
VALUE : out BIT_VECTOR;
GOOD : out BOOLEAN );
procedure READ (L : inout LINE;
VALUE : out BIT_VECTOR );
- procedure READ (L : inout LINE;
+ procedure READ (L : inout LINE;
VALUE : out BOOLEAN;
GOOD : out BOOLEAN );
procedure READ (L : inout LINE;
VALUE : out BOOLEAN );
-
- procedure READ (L : inout LINE;
+
+ procedure READ (L : inout LINE;
VALUE : out CHARACTER;
GOOD : out BOOLEAN );
procedure READ (L : inout LINE;
VALUE : out CHARACTER );
-
- procedure READ (L : inout LINE;
+
+ procedure READ (L : inout LINE;
VALUE : out INTEGER;
GOOD : out BOOLEAN );
procedure READ (L : inout LINE;
VALUE : out INTEGER );
- --procedure READ (L : inout LINE;
+ --procedure READ (L : inout LINE;
-- VALUE : out REAL;
-- GOOD : out BOOLEAN );
--procedure READ (L : inout LINE;
-- VALUE : out REAL );
- procedure READ (L : inout LINE;
+ procedure READ (L : inout LINE;
VALUE : out STRING;
GOOD : out BOOLEAN );
procedure READ (L : inout LINE;
VALUE : out STRING );
-
- procedure READ (L : inout LINE;
+
+ procedure READ (L : inout LINE;
VALUE : out TIME;
GOOD : out BOOLEAN );
procedure READ (L : inout LINE;
View
@@ -105,7 +105,7 @@ static const imask_t has_map[T_LAST_TYPE_KIND] = {
};
#define ITEM_TYPE_ARRAY (I_PARAMS | I_INDEX_CONSTR)
-#define ITEM_TYPE (I_BASE | I_ELEM | I_ACCESS | I_RESULT)
+#define ITEM_TYPE (I_BASE | I_ELEM | I_ACCESS | I_RESULT | I_FILE)
#define ITEM_TREE (I_RESOLUTION)
#define ITEM_UNIT_ARRAY (I_UNITS)
#define ITEM_TREE_ARRAY (I_LITERALS | I_FIELDS)
@@ -213,7 +213,7 @@ static void item_without_type(imask_t mask)
;
assert(item < ARRAY_LEN(item_text_map));
- fatal("tree item %s does not have a type", item_text_map[item]);
+ fatal("type item %s does not have a type", item_text_map[item]);
}
type_t type_new(type_kind_t kind)

0 comments on commit bed5841

Please sign in to comment.