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

Nicer sheet. implementation

slava 2006-08-01 01:08:25 +00:00
parent 25f4e1e425
commit f3bd44083d
2 changed files with 8 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
TODO.FACTOR.txt
View File

@ -6,7 +6,6 @@
- gdb triggers 'mutliple i/o ops on port' error - gdb triggers 'mutliple i/o ops on port' error
- "localhost" 50 <client> won't fail - "localhost" 50 <client> won't fail
- factorcode httpd crashed: bad file descriptor - factorcode httpd crashed: bad file descriptor
- one-column table doesn't need borders...?
- editor: - editor:
- scroll to caret - scroll to caret
- better listener multi-line expression handling - better listener multi-line expression handling

10
library/tools/describe.factor
View File

@ -77,10 +77,14 @@ M: vocab-link summary ( vocab-link -- )
DEFER: describe DEFER: describe
: sheet. ( sheet -- ) : sheet. ( sheet -- )
flip flip dup empty? [
H{ { table-gap { 10 0 } } } drop
] [
dup first length 1 =
{ 0 0 } { 10 0 } ? table-gap associate
[ dup unparse-short swap write-object ] [ dup unparse-short swap write-object ]
tabular-output ; tabular-output
] if ;
: describe ( object -- ) dup summary print sheet sheet. ; : describe ( object -- ) dup summary print sheet sheet. ;