From 521ba1a43e3d75deec4dcf2eafdf7e4e7b72b15e Mon Sep 17 00:00:00 2001
From: Sergey Mironov <grrwlf@gmail.com>
Date: Mon, 7 Oct 2013 14:08:10 +0400
Subject: Add show instance for 'id' type

---
 lib/ur/basis.urs | 1 +
 1 file changed, 1 insertion(+)

(limited to 'lib/ur/basis.urs')

diff --git a/lib/ur/basis.urs b/lib/ur/basis.urs
index 73cef3d2..eefb5d2c 100644
--- a/lib/ur/basis.urs
+++ b/lib/ur/basis.urs
@@ -775,6 +775,7 @@ val redirect : t ::: Type -> url -> transaction t
 type id
 val fresh : transaction id
 val giveFocus : id -> transaction unit
+val show_id : show id
 
 val dyn : ctx ::: {Unit} -> use ::: {Type} -> bind ::: {Type} -> [ctx ~ [Dyn]] => unit
           -> tag [Signal = signal (xml ([Dyn] ++ ctx) use bind)] ([Dyn] ++ ctx) [] use bind
-- 
cgit v1.2.3