diff options
author | Jacques Garrigue <garrigue at math.nagoya-u.ac.jp> | 2004-05-26 11:10:52 +0000 |
---|---|---|
committer | Jacques Garrigue <garrigue at math.nagoya-u.ac.jp> | 2004-05-26 11:10:52 +0000 |
commit | 6a940ef65d7b70f94e221f4b6731b4ed7a9c410e (patch) | |
tree | a002b52a1f42795af154463599d59c883fd01bef /byterun/extern.c | |
parent | d1482d5a412e7b42841a174d48e0288f5ab447b5 (diff) |
switch to new vtable representation
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@6331 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'byterun/extern.c')
-rw-r--r-- | byterun/extern.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/byterun/extern.c b/byterun/extern.c index 8142f79e4..85a549539 100644 --- a/byterun/extern.c +++ b/byterun/extern.c @@ -338,9 +338,11 @@ static void extern_rec(value v) writecode32(CODE_INFIXPOINTER, Infix_offset_hd(hd)); extern_rec(v - Infix_offset_hd(hd)); break; + /* Use default case for objects case Object_tag: extern_invalid_argument("output_value: object value"); break; + */ case Custom_tag: { unsigned long sz_32, sz_64; char * ident = Custom_ops_val(v)->identifier; |