compiler, stack-checker docs: Fix for 32-bit builds.
parent
a6ce3e9113
commit
712aa303db
|
@ -24,10 +24,10 @@ HELP: allocation-size
|
|||
{ $values { "insns" { $link sequence } " of " { $link insn } } { "n" number } }
|
||||
{ $description "Calculates the total number of bytes allocated by the block." }
|
||||
{ $examples
|
||||
{ $example
|
||||
{ $unchecked-example
|
||||
"USING: accessors compiler.cfg.debugger compiler.cfg.gc-checks.private kernel prettyprint sequences ;"
|
||||
"[ V{ } clone ] test-ssa first entry>> successors>> first instructions>> allocation-size ."
|
||||
"32"
|
||||
"32 ! 16 on 32-bit"
|
||||
}
|
||||
} ;
|
||||
|
||||
|
|
|
@ -14,7 +14,7 @@ HELP: param-prep-quot
|
|||
{ $values { "params" alien-node-params } { "quot" quotation } }
|
||||
{ $description "Builds a quotation which coerces values on the stack to the required types for the alien call." }
|
||||
{ $examples
|
||||
{ $example
|
||||
{ $unchecked-example
|
||||
"USING: alien.c-types prettyprint stack-checker.alien ;"
|
||||
"T{ alien-invoke-params { parameters { void* c-string int } } } param-prep-quot ."
|
||||
"[ [ [ [ ] dip >c-ptr ] dip \\ utf8 string>alien ] dip >fixnum ]"
|
||||
|
|
Loading…
Reference in New Issue