Mercurial > urweb
diff src/jscomp.sml @ 1487:290de2dcecf6
Add client-side Basis.now and pretty-printing of times
author | Adam Chlipala <adam@chlipala.net> |
---|---|
date | Wed, 06 Jul 2011 08:35:31 -0400 |
parents | 36f7d1debb37 |
children | 94ef0b07066a |
line wrap: on
line diff
--- a/src/jscomp.sml Sun Jul 03 16:50:17 2011 -0400 +++ b/src/jscomp.sml Wed Jul 06 08:35:31 2011 -0400 @@ -1,4 +1,4 @@ -(* Copyright (c) 2008-2010, Adam Chlipala +(* Copyright (c) 2008-2011, Adam Chlipala * All rights reserved. * * Redistribution and use in source and binary forms, with or without @@ -646,7 +646,6 @@ val name = case Settings.jsFunc (m, x) of NONE => (EM.errorAt loc ("Unsupported FFI function " ^ m ^ "." ^ x ^ " in JavaScript"); - app (fn ((m', x'), _) => print (m' ^ "." ^ x' ^ "\n")) (Settings.allJsFuncs ()); "ERROR") | SOME s => s