/xen/tools/ocaml/libs/xl/ |
A D | genwrap.py | 66 def ocaml_type_of(ty): argument 122 for f in ty.fields: 221 module_name = ty.rawname[0].upper() + ty.rawname[1:] 343 (nparent,fexpr) = ty.member(c, f, ty.rawname is not None) 464 s += "static value Val_%s (%s)\n" % (ty.rawname, ty.make_arg(ty.rawname+"_c")) 469 s += ocaml_Val(ty, "%s_ocaml" % ty.rawname, "%s_c" % ty.rawname, indent="\t") + "\n" 506 if ty.dispose_fn: 538 if t not in [ty.rawname for ty in types]: 541 types = [ty for ty in types if not ty.rawname in blacklist] 555 for ty in types: [all …]
|
/xen/tools/libxl/ |
A D | gentest.py | 31 s += "%s = %s;\n" % (ty.pass_arg(v, parent is None), randomize_enum(ty)) 62 elif hasattr(ty, "rand_init") and ty.rand_init is not None: 78 elif ty.private: 234 ty.rand_init = "%s_rand_init" % ty.typename 243 (ty.typename, ty.typename, ty.typename)) 272 (ty.typename, ty.pass_arg(arg, isref=False))) 276 (ty.typename, ty.typename)) 279 (ty.typename, ty.pass_arg(arg, isref=False))) 312 (ty.typename, ty.pass_arg(arg, isref=False))) 315 (ty.typename, ty.pass_arg(arg, isref=False))) [all …]
|
A D | gentypes.py | 11 if isinstance(ty, idl.Aggregate) and ty.typename is None: 19 s += libxl_C_instance_of(ty.lenvar.type, ty.lenvar.name) + ";\n" 47 s += "typedef %s %s {\n" % (ty.kind, ty.typename) 617 f.write("%svoid %s(%s);\n" % (ty.hidden(), ty.dispose_fn, ty.make_arg("p"))) 626 f.write("%svoid %s(%s);\n" % (ty.hidden(), ty.init_fn, ty.make_arg("p"))) 635 …f.write("%schar *%s_to_json(libxl_ctx *ctx, %s);\n" % (ty.hidden(), ty.typename, ty.make_arg("p"))) 639 … f.write("%sconst char *%s_to_string(%s);\n" % (ty.hidden(), ty.typename, ty.make_arg("p"))) 664 for ty in [ty for ty in types if ty.json_gen_fn is not None]: 688 for ty in [ty for ty in types if ty.json_parse_fn is not None]: 690 (ty.hidden(), ty.namespace + "_" + ty.rawname, [all …]
|
A D | idl.py | 280 e, ty = f 283 self.fields.append(Field(ty, e, enumname=en))
|
/xen/tools/golang/xenlight/ |
A D | gengotypes.py | 44 for ty in types: 81 for v in ty.values: 107 for f in ty.fields: 163 for f in ty.fields: 222 for ty in types: 249 cname = ty.typename 254 for f in ty.fields: 294 cname = ty.name 345 for f in ty.fields: 458 for f in ty.fields: [all …]
|
/xen/tools/tests/vpci/ |
A D | emul.h | 114 const typeof(y) ty = (y); \ 116 (void) (&tx == &ty); \ 117 tx < ty ? tx : ty; \ 122 const typeof(y) ty = (y); \ 124 (void) (&tx == &ty); \ 125 tx > ty ? tx : ty; \
|
/xen/tools/ocaml/libs/xb/ |
A D | packet.ml | 21 ty: Op.operation; RecordField 30 let create tid rid ty data = { tid = tid; rid = rid; ty = ty; data = data; } 33 create ppkt.Partial.tid ppkt.Partial.rid ppkt.Partial.ty (Buffer.contents ppkt.Partial.buf) 36 let header = string_of_header pkt.tid pkt.rid (Op.to_cval pkt.ty) (String.length pkt.data) in 40 pkt.tid, pkt.rid, pkt.ty, pkt.data 43 let get_ty pkt = pkt.ty
|
A D | xenbus_stubs.c | 56 CAMLprim value stub_string_of_header(value tid, value rid, value ty, value len) in stub_string_of_header() argument 58 CAMLparam4(tid, rid, ty, len); in stub_string_of_header() 61 .type = Int_val(ty), in stub_string_of_header()
|
A D | partial.ml | 21 ty: Op.operation; RecordField 43 ty = (Op.of_cval opint);
|
A D | op.ml | 49 let to_string ty = 50 match ty with
|
A D | partial.mli | 4 ty : Op.operation; RecordField
|
A D | packet.mli | 1 type t = { tid : int; rid : int; ty : Op.operation; data : string; } RecordField
|
A D | xb.mli | 40 ty : Op.operation;
|
/xen/tools/ocaml/xenstored/ |
A D | process.ml | 228 match ty with 296 match t.Transaction.ty with 306 if wlog then write_access_log ~ty:request.Packet.ty ~tid ~con ~data:request.Packet.data; 309 if wlog then write_response_log ~ty:request.Packet.ty ~tid ~con ~response:response'; 400 match t.Transaction.ty with 463 let function_of_type ty = 464 match ty with 484 let retain_op_in_history ty = 485 match ty with 522 let ty = req.Packet.ty in [all …]
|
A D | transaction.ml | 74 type ty = No | Full of ( type 81 ty: ty; RecordField 91 let get_id t = match t.ty with No -> none | Full (id, _, _) -> id 121 let ty = if id = none then No else Full(id, Store.copy store, store) in 123 ty = ty; 145 let add_wop t ty path = t.paths <- (ty, path) :: t.paths 201 match t.ty with
|
A D | config.ml | 17 type ty = type 89 else let ty = List.assoc k expected in 90 match ty with
|
A D | packet.ml | 4 ty: Xenbus.Xb.Op.operation; RecordField
|
A D | logging.ml | 312 let xb_op ~tid ~con ~ty data = 313 let print = match ty with 320 if print then access_logging ~tid ~con ~data (XbOp ty) ~level:Info 330 let xb_answer ~tid ~con ~ty data = 331 let print, level = match ty with 337 if print then access_logging ~tid ~con ~data (XbOp ty) ~level
|
A D | connection.ml | 132 let send_reply con tid rid ty data = 136 Xenbus.Xb.queue con.xb (Xenbus.Xb.Packet.create tid rid ty data) 139 let send_ack con tid rid ty = send_reply con tid rid ty "OK\000"
|
A D | perms.ml | 73 let ty = permty_of_char s.[0] 75 (id, ty)
|
/xen/tools/ocaml/libs/xs/ |
A D | xsraw.ml | 135 | ty -> unexpected_packet Xb.Op.Watchevent ty 138 let rec sync_recv ty con = 149 sync_recv ty con 150 | rty when rty = ty -> Xb.Packet.get_data pkt 151 | rty -> unexpected_packet ty rty 158 let ty = Xb.Packet.get_ty (Xb.peek_output con.xb) in 160 sync_recv ty con
|
A D | queueop.ml | 19 let queue_path ty (tid: int) (path: string) con = 21 Xb.queue con (Xb.Packet.create tid 0 ty data)
|
/xen/xen/tools/kconfig/ |
A D | gconf.c | 891 gint ty = (gint) event->y; in on_treeview2_button_press_event() local 894 gtk_tree_view_get_path_at_pos(view, tx, ty, &path, &column, &cx, in on_treeview2_button_press_event() 1007 gint ty = (gint) event->y; in on_treeview1_button_press_event() local 1010 gtk_tree_view_get_path_at_pos(view, tx, ty, &path, &column, &cx, in on_treeview1_button_press_event()
|