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

Merge branch 'master' of git://factorcode.org/git/factor

db4
Doug Coleman 2009-08-29 18:59:36 -05:00
parent ec579dcfc1 51405868d1
commit 1099e2ad3a
2 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/classes/struct/struct.factor
View File

@ -45,7 +45,7 @@ M: struct equal?
] 1 define-partial-eval
: malloc-struct ( class -- struct )
[ heap-size malloc ] keep memory>struct ; inline
[ 1 swap heap-size calloc ] keep memory>struct ; inline
: (struct) ( class -- struct )
[ heap-size <byte-array> ] keep memory>struct ; inline

5
basis/tools/deprecation/deprecation.factor
View File

@ -1,5 +1,6 @@
! (c)2009 Joe Groff bsd license
USING: accessors arrays assocs compiler.units debugger init io
USING: accessors arrays assocs combinators.short-circuit
compiler.units debugger init io
io.streams.null kernel namespaces prettyprint sequences
source-files.errors summary tools.crossref
tools.crossref.private tools.errors words ;
@ -41,7 +42,7 @@ T{ error-type
: check-deprecations ( usage -- )
dup word? [
dup "forgotten" word-prop
dup { [ "forgotten" word-prop ] [ deprecated? ] } 1||
[ clear-deprecation-note ] [
dup def>> uses [ deprecated? ] filter
[ clear-deprecation-note ] [ >array deprecation-note ] if-empty