summaryrefslogtreecommitdiffstats
path: root/byterun/extern.c
diff options
context:
space:
mode:
authorJacques Garrigue <garrigue at math.nagoya-u.ac.jp>2004-05-26 11:10:52 +0000
committerJacques Garrigue <garrigue at math.nagoya-u.ac.jp>2004-05-26 11:10:52 +0000
commit6a940ef65d7b70f94e221f4b6731b4ed7a9c410e (patch)
treea002b52a1f42795af154463599d59c883fd01bef /byterun/extern.c
parentd1482d5a412e7b42841a174d48e0288f5ab447b5 (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.c2
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;