Merge branch 'master' of git://factorcode.org/git/factor
commit
2deb1254e5
|
@ -34,7 +34,7 @@ ERROR: no-slots-named class seq ;
|
||||||
: check-columns ( class columns -- )
|
: check-columns ( class columns -- )
|
||||||
tuck
|
tuck
|
||||||
[ [ first ] map ]
|
[ [ first ] map ]
|
||||||
[ "slots" word-prop [ name>> ] map ] bi* diff
|
[ all-slots [ name>> ] map ] bi* diff
|
||||||
[ drop ] [ no-slots-named ] if-empty ;
|
[ drop ] [ no-slots-named ] if-empty ;
|
||||||
|
|
||||||
: define-persistent ( class table columns -- )
|
: define-persistent ( class table columns -- )
|
||||||
|
|
Loading…
Reference in New Issue