steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Add stack effect

db4
Slava Pestov 2008-10-12 18:40:57 -05:00
parent ed27d83921
commit 40c1529ce8
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/compiler/tests/alien.factor
View File

@ -173,7 +173,7 @@ C-STRUCT: rect
{ "float" "h" } { "float" "h" }
; ;
: <rect> : <rect> ( x y w h -- rect )
"rect" <c-object> "rect" <c-object>
[ set-rect-h ] keep [ set-rect-h ] keep
[ set-rect-w ] keep [ set-rect-w ] keep