package rocq-runtime
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>
The Rocq Prover -- Core Binaries and Tools
Install
dune-project
Dependency
Authors
Maintainers
Sources
rocq-9.3.0.tar.gz
sha256=3f0fc283e8644394aa9c7a6e3995b6d9ebbe1e6dda712bf431f9c372dcef95ad
doc/src/rocq-runtime.checklib/checkFlags.ml.html
Source file checkFlags.ml
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39(************************************************************************) (* * The Rocq Prover / The Rocq Development Team *) (* v * Copyright INRIA, CNRS and contributors *) (* <O___,, * (see version control and CREDITS file for authors & dates) *) (* \VV/ **************************************************************) (* // * This file is distributed under the terms of the *) (* * GNU Lesser General Public License Version 2.1 *) (* * (see LICENSE file for the text of the license) *) (************************************************************************) open Declarations let set_local_flags flags env = (* Explicitly ignored flags are set to not change *) let envflags = Environ.typing_flags env in let flags = { (* These flags may be overridden *) check_guarded = flags.check_guarded; check_positive = flags.check_positive; check_universes = flags.check_universes; check_eliminations = flags.check_eliminations; conv_oracle = flags.conv_oracle; share_reduction = flags.share_reduction; unfold_dep_heuristic = flags.unfold_dep_heuristic; allow_uip = flags.allow_uip; (* These flags may not *) enable_VM = envflags.enable_VM; enable_native_compiler = envflags.enable_native_compiler; indices_matter = envflags.indices_matter; impredicative_set = envflags.impredicative_set; sprop_allowed = envflags.sprop_allowed; } in Environ.set_typing_flags flags env (* Set from the -bytecode-compiler command line option. The checker consults this rather than the environment's flag when deciding whether to recompile the VM bytecode of a library. *) let enable_vm = ref false
sectionYPositions = computeSectionYPositions($el), 10)"
x-init="setTimeout(() => sectionYPositions = computeSectionYPositions($el), 10)"
>