diff options
| author |  Adam Chlipala <adamc@hcoop.net> | 2009-11-01 10:20:20 -0500 |
|---|---|---|
| committer | Adam Chlipala <adamc@hcoop.net> | 2009-11-01 10:20:20 -0500 |
| commit | e20e964083a048ad4cbb88cc1af3790694f51dfa (patch) | |
| tree | 09a704610f44afd4ad023245a9f59d901c3c4345 /lib/ur | |
| parent | 1be7e54fa70a40b16164f69e7153ada0e4935994 (diff) | |
Bidding interface
Diffstat (limited to 'lib/ur')
| -rw-r--r-- | lib/ur/basis.urs | 1 | ||||
| -rw-r--r-- | lib/ur/string.ur | 2 | ||||
| -rw-r--r-- | lib/ur/string.urs | 2 |
3 files changed, 5 insertions, 0 deletions
diff --git a/lib/ur/basis.urs b/lib/ur/basis.urs index 0f70fa14..d1ecf1ca 100644 --- a/lib/ur/basis.urs +++ b/lib/ur/basis.urs @@ -62,6 +62,7 @@ val strchr : string -> char -> option string val strindex : string -> char -> option int val strcspn : string -> string -> option int val substring : string -> int -> int -> string +val str1 : char -> string class show val show : t ::: Type -> show t -> t -> string diff --git a/lib/ur/string.ur b/lib/ur/string.ur index e31bbc27..fb5a3f97 100644 --- a/lib/ur/string.ur +++ b/lib/ur/string.ur @@ -1,5 +1,7 @@ type t = Basis.string +val str = Basis.str1 + val length = Basis.strlen val append = Basis.strcat diff --git a/lib/ur/string.urs b/lib/ur/string.urs index 8fd434b4..1b584c08 100644 --- a/lib/ur/string.urs +++ b/lib/ur/string.urs @@ -1,5 +1,7 @@ type t = string +val str : char -> t + val length : t -> int val append : t -> t -> t |