comparison lib/ur/basis.urs @ 770:c125df6fabfc

Runtime URL and MIME type filtering
author Adam Chlipala <adamc@hcoop.net>
date Sat, 02 May 2009 18:20:15 -0400
parents 16b34dc2e29c
children a8bdd5a0d9b0
comparison
equal deleted inserted replaced
769:efceae06df17 770:c125df6fabfc
512 con tabl = [Body, Table] 512 con tabl = [Body, Table]
513 con tr = [Body, Tr] 513 con tr = [Body, Tr]
514 514
515 type url 515 type url
516 val bless : string -> url 516 val bless : string -> url
517 val checkUrl : string -> option url
517 518
518 val dyn : use ::: {Type} -> bind ::: {Type} -> unit 519 val dyn : use ::: {Type} -> bind ::: {Type} -> unit
519 -> tag [Signal = signal (xml body use bind)] body [] use bind 520 -> tag [Signal = signal (xml body use bind)] body [] use bind
520 521
521 val head : unit -> tag [] html head [] [] 522 val head : unit -> tag [] html head [] []
598 599
599 val upload : formTag file [] [Value = string, Size = int] 600 val upload : formTag file [] [Value = string, Size = int]
600 601
601 type mimeType 602 type mimeType
602 val blessMime : string -> mimeType 603 val blessMime : string -> mimeType
604 val checkMime : string -> option mimeType
603 val returnBlob : t ::: Type -> blob -> mimeType -> transaction t 605 val returnBlob : t ::: Type -> blob -> mimeType -> transaction t
604 val blobSize : blob -> int 606 val blobSize : blob -> int
605 607
606 con radio = [Body, Radio] 608 con radio = [Body, Radio]
607 val radio : formTag string radio [] 609 val radio : formTag string radio []