comparison src/jscomp.sml @ 582:66463006f893

Source containing an int
author Adam Chlipala <adamc@hcoop.net>
date Thu, 01 Jan 2009 10:08:22 -0500
parents 0094e0242100
children 1fd4c041634e
comparison
equal deleted inserted replaced
581:e955d50c389d 582:66463006f893
32 structure EM = ErrorMsg 32 structure EM = ErrorMsg
33 structure E = MonoEnv 33 structure E = MonoEnv
34 structure U = MonoUtil 34 structure U = MonoUtil
35 35
36 val funcs = [(("Basis", "alert"), "alert"), 36 val funcs = [(("Basis", "alert"), "alert"),
37 (("Basis", "htmlifyInt"), "ts"),
37 (("Basis", "htmlifyString"), "escape"), 38 (("Basis", "htmlifyString"), "escape"),
38 (("Basis", "new_client_source"), "sc"), 39 (("Basis", "new_client_source"), "sc"),
39 (("Basis", "set_client_source"), "sv")] 40 (("Basis", "set_client_source"), "sv")]
40 41
41 structure FM = BinaryMapFn(struct 42 structure FM = BinaryMapFn(struct