comparison lib/ur/basis.urs @ 847:0f7e2cca6d9b

<dyn> inside <table>; fix Specialize bug with datatype decls generating other mutually-recursive datatype decls
author Adam Chlipala <adamc@hcoop.net>
date Sat, 13 Jun 2009 14:29:36 -0400
parents 0d30e6338c65
children e04af9641067
comparison
equal deleted inserted replaced
846:0d30e6338c65 847:0f7e2cca6d9b
528 528
529 type url 529 type url
530 val bless : string -> url 530 val bless : string -> url
531 val checkUrl : string -> option url 531 val checkUrl : string -> option url
532 532
533 val dyn : use ::: {Type} -> bind ::: {Type} -> unit 533 val dyn : ctx ::: {Unit} -> use ::: {Type} -> bind ::: {Type} -> [ctx ~ body] => unit
534 -> tag [Signal = signal (xml body use bind)] body [] use bind 534 -> tag [Signal = signal (xml (body ++ ctx) use bind)] (body ++ ctx) [] use bind
535 535
536 val head : unit -> tag [] html head [] [] 536 val head : unit -> tag [] html head [] []
537 val title : unit -> tag [] head [] [] [] 537 val title : unit -> tag [] head [] [] []
538 val link : unit -> tag [Rel = string, Typ = string, Href = url, Media = string] head [] [] [] 538 val link : unit -> tag [Rel = string, Typ = string, Href = url, Media = string] head [] [] []
539 539