From: Xen hg user Date: Wed, 26 Jan 2011 17:39:04 +0000 (+0000) Subject: [whitespace] Repairing whitespace within the Features module. X-Git-Url: http://xenbits.xensource.com/gitweb?a=commitdiff_plain;h=e28ab0a4b8474d4f8ac3f0d7e394d42ab452b0e2;p=xcp%2Fxen-api.git [whitespace] Repairing whitespace within the Features module. Signed-off-by: Jonathan Knowles Proof that this patch introduces no semantic changes: camlp4o -printer o -no_comments $file: ocaml/license/features.ml 26a618732a366e603aa87b3788f0e84e - 26a618732a366e603aa87b3788f0e84e - PASS ocaml/license/features.mli f778551b861102e29dbdbefe8c90329b - f778551b861102e29dbdbefe8c90329b - PASS --- diff --git a/ocaml/license/features.ml b/ocaml/license/features.ml index f7988b53..e414703b 100644 --- a/ocaml/license/features.ml +++ b/ocaml/license/features.ml @@ -17,9 +17,27 @@ open D (* Features and restrictions *) -type feature = VLAN | QoS | Shared_storage | Netapp | Equalogic | Pooling - | HA | Marathon | Email | Performance | WLB | RBAC | DMC | Checkpoint - | Vswitch_controller | CPU_masking | Connection | No_platform_filter | No_nag_dialog | VMPR +type feature = + | VLAN + | QoS + | Shared_storage + | Netapp + | Equalogic + | Pooling + | HA + | Marathon + | Email + | Performance + | WLB + | RBAC + | DMC + | Checkpoint + | Vswitch_controller + | CPU_masking + | Connection + | No_platform_filter + | No_nag_dialog + | VMPR type orientation = Positive | Negative diff --git a/ocaml/license/features.mli b/ocaml/license/features.mli index 48cdb2c0..c207f3d8 100644 --- a/ocaml/license/features.mli +++ b/ocaml/license/features.mli @@ -17,30 +17,30 @@ (** Features than can be enabled and disabled. *) type feature = -| VLAN (** Enable VLAN. Currently not used. *) -| QoS (** Enable QoS control. Currently not used. *) -| Shared_storage (** Enable shared storage. Currently not used? *) -| Netapp (** Enable use of NetApp SRs *) -| Equalogic (** Enable use of Equalogic SRs *) -| Pooling (** Enable pooling of hosts *) -| HA (** Enable High Availability (HA) *) -| Marathon (** Currently not used *) -| Email (** Enable email alerting *) -| Performance (** Currently not used? *) -| WLB (** Enable Workload Balancing (WLB) *) -| RBAC (** Enable Role-Based Access Control (RBAC) *) -| DMC (** Enable Dynamic Memory Control (DMC) *) -| Checkpoint (** Enable Checkpoint functionality *) -| Vswitch_controller (** Enable use of a Distributed VSwitch (DVS) Controller *) -| CPU_masking (** Enable masking of CPU features *) -| Connection (** Used by XenCenter *) -| No_platform_filter (** Filter platform data *) -| No_nag_dialog (** Used by XenCenter *) -| VMPR (** Enable use of VM Protection and Recovery *) - + | VLAN (** Enable VLAN. Currently not used. *) + | QoS (** Enable QoS control. Currently not used. *) + | Shared_storage (** Enable shared storage. Currently not used? *) + | Netapp (** Enable use of NetApp SRs *) + | Equalogic (** Enable use of Equalogic SRs *) + | Pooling (** Enable pooling of hosts *) + | HA (** Enable High Availability (HA) *) + | Marathon (** Currently not used *) + | Email (** Enable email alerting *) + | Performance (** Currently not used? *) + | WLB (** Enable Workload Balancing (WLB) *) + | RBAC (** Enable Role-Based Access Control (RBAC) *) + | DMC (** Enable Dynamic Memory Control (DMC) *) + | Checkpoint (** Enable Checkpoint functionality *) + | Vswitch_controller (** Enable use of a Distributed VSwitch (DVS) Controller *) + | CPU_masking (** Enable masking of CPU features *) + | Connection (** Used by XenCenter *) + | No_platform_filter (** Filter platform data *) + | No_nag_dialog (** Used by XenCenter *) + | VMPR (** Enable use of VM Protection and Recovery *) + (** The list of all known features. *) val all_features : feature list - + (** Returns a compact list of the current restrictions. *) val to_compact_string : feature list -> string @@ -55,4 +55,3 @@ val is_enabled : __context:Context.t -> feature -> bool (** Update the pool-level restrictions list in the database. *) val update_pool_features : __context:Context.t -> unit -