Js_simpl (js_of_ocaml-compiler.Js_of_ocaml_compiler.Js

val if_statement : 
  Javascript.expression ->
  Javascript.location ->
  (Javascript.statement * Javascript.location) ->
  bool ->
  (Javascript.statement * Javascript.location) ->
  bool ->
  (Javascript.statement * Javascript.location) list

val get_variable : 
  Js_of_ocaml_compiler.Code.Var.Set.t ->
  Javascript.expression ->
  Js_of_ocaml_compiler.Code.Var.Set.t

val block : 
  (Javascript.statement * Javascript.location) list ->
  Javascript.statement * Javascript.location

val unblock : 
  (Javascript.statement * Javascript.location) ->
  (Javascript.statement * Javascript.location) list