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

alien.marshall: dynamic-cast: renamed to unmarshall-cast

db4
Jeremy Hughes 2009-07-13 10:26:41 +12:00
parent 2aec1d697c
commit 687d541838
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
basis/alien/marshall/marshall.factor
View File

@ -20,10 +20,10 @@ IN: alien.marshall
TUPLE: alien-wrapper { underlying alien } ; TUPLE: alien-wrapper { underlying alien } ;
TUPLE: struct-wrapper < alien-wrapper disposed ; TUPLE: struct-wrapper < alien-wrapper disposed ;
GENERIC: dynamic-cast ( alien-wrapper -- alien-wrapper' ) GENERIC: unmarshall-cast ( alien-wrapper -- alien-wrapper' )
M: alien-wrapper dynamic-cast ; M: alien-wrapper unmarshall-cast ;
M: struct-wrapper dynamic-cast ; M: struct-wrapper unmarshall-cast ;
: marshall-pointer ( obj -- alien ) : marshall-pointer ( obj -- alien )
{ {