Fix dinput for recent slot renaming

db4
U-SLAVA-DFB8FF805\Slava 2008-09-04 15:53:46 -05:00
parent ac8075f30e
commit a596626947
1 changed files with 1 additions and 1 deletions

View File

@ -22,7 +22,7 @@ SYMBOLS:
: (offsetof) ( field struct -- offset )
[ (field-spec-of) offset>> ] [ drop 0 ] if* ;
: (sizeof) ( field struct -- size )
[ (field-spec-of) class>> "[" split1 drop heap-size ] [ drop 1 ] if* ;
[ (field-spec-of) type>> "[" split1 drop heap-size ] [ drop 1 ] if* ;
: (flag) ( thing -- integer )
{