diff options
author | Jacques Garrigue <garrigue at math.nagoya-u.ac.jp> | 2008-01-25 08:39:49 +0000 |
---|---|---|
committer | Jacques Garrigue <garrigue at math.nagoya-u.ac.jp> | 2008-01-25 08:39:49 +0000 |
commit | 759304681e8be86c56011c6989afb926de96e3d3 (patch) | |
tree | fd7ad2d99d35d9b2a37e3a40978f4a88e0d1067c /byterun/mlvalues.h | |
parent | cb40742e750ae18c67828321aa87f312dcee4d6a (diff) |
grant PR#3760
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@8790 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'byterun/mlvalues.h')
-rw-r--r-- | byterun/mlvalues.h | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/byterun/mlvalues.h b/byterun/mlvalues.h index 110c808eb..d6263aefc 100644 --- a/byterun/mlvalues.h +++ b/byterun/mlvalues.h @@ -188,8 +188,11 @@ typedef opcode_t * code_t; #define Class_val(val) Field((val), 0) #define Oid_val(val) Long_val(Field((val), 1)) CAMLextern value caml_get_public_method (value obj, value tag); -/* called as: +/* Called as: caml_callback(caml_get_public_method(obj, caml_hash_variant(name)), obj) */ +/* caml_get_public_method returns 0 if tag not in the table. + Note however that tags being hashed, same tag does not necessarily mean + same method name. */ /* Special case of tuples of fields: closures */ #define Closure_tag 247 |