Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
POTTIER Francois
menhir
Commits
6a0e6726
Commit
6a0e6726
authored
Nov 04, 2015
by
POTTIER Francois
Browse files
Comment.
parent
59bffe97
Changes
1
Hide whitespace changes
Inline
Side-by-side
src/codeBackend.ml
View file @
6a0e6726
...
@@ -686,9 +686,13 @@ let letunless e x e1 e2 =
...
@@ -686,9 +686,13 @@ let letunless e x e1 e2 =
(* ------------------------------------------------------------------------ *)
(* ------------------------------------------------------------------------ *)
(* Calling conventions. *)
(* Calling conventions. *)
(* The contents of a stack cell, exposed as individual parameters. The
(* The contents of a stack cell, exposed as individual parameters. The choice of
choice of identifiers is suitable for use in the definition of
identifiers is suitable for use in the definition of [run]. *)
[run]. *)
(* This code also determines the layout of a stack cell. The first field in a
stack cell is always a pointer to the rest of the stack; it is followed by
the fields listed below, each of which may or may not appear. [runpushcell]
and [gotopushcell] are the two places where stack cells are allocated. *)
let
runcellparams
var
holds_state
symbol
=
let
runcellparams
var
holds_state
symbol
=
elementif
holds_state
(
var
state
)
@
elementif
holds_state
(
var
state
)
@
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment