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

windows.com: split off prettyprinting into windows.com.prettyprint

db4
Slava Pestov 2009-09-04 22:00:23 -05:00
parent 1bdaebdf5e
commit 3e6189fec1
3 changed files with 14 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
basis/windows/com/prettyprint/prettyprint.factor Executable file
View File

@ -0,0 +1,7 @@
! Copyright (C) 2009 Slava Pestov.
! See http://factorcode.org/license.txt for BSD license.
USING: windows.com windows.kernel32 windows.ole32
prettyprint.custom prettyprint.sections sequences ;
IN: windows.com.prettyprint
M: GUID pprint* guid>string "GUID: " prepend text ;

8
basis/windows/com/syntax/syntax.factor
View File

@ -2,7 +2,7 @@ USING: alien alien.c-types alien.accessors effects kernel
windows.ole32 parser lexer splitting grouping sequences
namespaces assocs quotations generalizations accessors words
macros alien.syntax fry arrays layouts math classes.struct
windows.kernel32 prettyprint.custom prettyprint.sections ;
windows.kernel32 ;
IN: windows.com.syntax
<PRIVATE
@ -99,4 +99,8 @@ SYNTAX: COM-INTERFACE:
SYNTAX: GUID: scan string>guid parsed ;
M: GUID pprint* guid>string "GUID: " prepend text ;
USING: vocabs vocabs.loader ;
"prettyprint" vocab [
"windows.com.prettyprint" require
] when

3
basis/windows/com/wrapper/wrapper.factor
View File

@ -3,8 +3,7 @@ init windows.com.syntax.private windows.com continuations kernel
namespaces windows.ole32 libc vocabs assocs accessors arrays
sequences quotations combinators math words compiler.units
destructors fry math.parser generalizations sets
specialized-arrays.alien specialized-arrays.direct.alien
windows.kernel32 classes.struct ;
specialized-arrays.alien windows.kernel32 classes.struct ;
IN: windows.com.wrapper
TUPLE: com-wrapper < disposable callbacks vtbls ;