diff --git a/src/proto_alpha/lib_protocol/src/alpha_context.mli b/src/proto_alpha/lib_protocol/src/alpha_context.mli
index 412415ea2..a397d232e 100644
--- a/src/proto_alpha/lib_protocol/src/alpha_context.mli
+++ b/src/proto_alpha/lib_protocol/src/alpha_context.mli
@@ -263,6 +263,7 @@ module Constants : sig
   val block_security_deposit: Tez.t
   val endorsement_security_deposit: Tez.t
   val faucet_credit: Tez.t
+  val max_revelations_per_block: int
 
   val preserved_cycles: context -> int
   val blocks_per_cycle: context -> int32
diff --git a/src/proto_alpha/lib_protocol/src/constants_repr.ml b/src/proto_alpha/lib_protocol/src/constants_repr.ml
index 356ed52b0..8ccaaee80 100644
--- a/src/proto_alpha/lib_protocol/src/constants_repr.ml
+++ b/src/proto_alpha/lib_protocol/src/constants_repr.ml
@@ -44,6 +44,8 @@ let faucet_credit =
 let bootstrap_wealth =
   Tez_repr.(mul_exn one 4_000_000)
 
+let max_revelations_per_block = 32
+
 type constants = {
   preserved_cycles: int ;
   blocks_per_cycle: int32 ;
diff --git a/src/proto_alpha/lib_protocol/src/main.ml b/src/proto_alpha/lib_protocol/src/main.ml
index 5879db235..c6c4474df 100644
--- a/src/proto_alpha/lib_protocol/src/main.ml
+++ b/src/proto_alpha/lib_protocol/src/main.ml
@@ -20,7 +20,8 @@ let max_block_length =
 let validation_passes =
   Updater.[ { max_size = 32 * 1024 ; max_op = Some 32 } ; (* 32kB FIXME *)
             { max_size = 32 * 1024 ; max_op = None } ; (* 32kB FIXME *)
-            { max_size = 32 * 1024 ; max_op = Some 32 } ; (* 32kB FIXME *)
+            { max_size = 32 * 1024 ; (* 32kB FIXME *)
+              max_op = Some Alpha_context.Constants.max_revelations_per_block } ;
             { max_size = 512 * 1024 ; max_op = None } ] (* 512kB *)
 
 let rpc_services = Services_registration.get_rpc_services ()