Mercurial > urweb

comparison src/compiler.sml @ 1170:52c6ac6a59f1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Basic analysis of tag and CSS class usage
author Adam Chlipala <adamc@hcoop.net>
date Sat, 27 Feb 2010 14:57:57 -0500
parents 8679ba87cf3c
children 7a2a7a8f9cab
comparison
equal deleted inserted replaced
1169:420e38516dc2 1170:52c6ac6a59f1
999 print = CorePrint.p_file CoreEnv.empty 999 print = CorePrint.p_file CoreEnv.empty
1000 } 1000 }
1001 1001
1002 val toEffectize = transform effectize "effectize" o toMarshalcheck 1002 val toEffectize = transform effectize "effectize" o toMarshalcheck
1003 1003
1004 val css = {
1005 func = Css.summarize,
1006 print = fn _ => Print.box []
1007 }
1008
1009 val toCss = transform css "css" o toShake5
1010
1004 val monoize = { 1011 val monoize = {
1005 func = Monoize.monoize CoreEnv.empty, 1012 func = Monoize.monoize CoreEnv.empty,
1006 print = MonoPrint.p_file MonoEnv.empty 1013 print = MonoPrint.p_file MonoEnv.empty
1007 } 1014 }
1008 1015