From: Sergey Matveev <stargrave@stargrave.org>
Date: Thu, 9 Oct 2025 19:32:11 +0000 (+0300)
Subject: Shorter UTC command
X-Git-Url: http://www.git.cypherpunks.su/?a=commitdiff_plain;h=e04a34fc83378858203a8eb0f693b200a7656d6ce8a5f9ebf468e66e6ae8f085;p=keks.git

Shorter UTC command
---

diff --git a/c/lib/schema.c b/c/lib/schema.c
index 7f1b937..a1ec8dd 100644
--- a/c/lib/schema.c
+++ b/c/lib/schema.c
@@ -37,7 +37,7 @@ static const char CmdSchema[] = "S";
 static const char CmdTake[] = ".";
 static const char CmdPrec[] = "P";
 static const char CmdType[] = "T";
-static const char CmdUTC[] = "UTC";
+static const char CmdUTC[] = "U";
 
 static const char TypeBin[] = "B";
 static const char TypeBlob[] = "O";
diff --git a/go/schema/check.go b/go/schema/check.go
index 2b47b93..f03368b 100644
--- a/go/schema/check.go
+++ b/go/schema/check.go
@@ -41,7 +41,7 @@ const (
 	CmdTake      = "."
 	CmdPrec      = "P"
 	CmdType      = "T"
-	CmdUTC       = "UTC"
+	CmdUTC       = "U"
 	Magic        = "schema"
 )
 
diff --git a/spec/schema/cmds b/spec/schema/cmds
index 6e750ee..e84a31f 100644
--- a/spec/schema/cmds
+++ b/spec/schema/cmds
@@ -68,7 +68,7 @@ PREC | ["P", p]
         18: up to attoseconds;
     If chosen element of float type, then TODO.
 
-UTC | ["UTC"]
+UTC | ["U"]
     Check that chosen (if it exists) element, of TAI type,
     can be converted to UTC.
 
diff --git a/tcl/schema.tcl b/tcl/schema.tcl
index b8a373b..664b66c 100755
--- a/tcl/schema.tcl
+++ b/tcl/schema.tcl
@@ -28,7 +28,7 @@ proc GT {n} {subst {LIST {{STR >} {INT $n}}}}
 proc LT {n} {subst {LIST {{STR <} {INT $n}}}}
 proc SCHEMA {s} {subst {LIST {{STR S} {STR $s}}}}
 proc PREC {p} {subst {LIST {{STR P} {INT $p}}}}
-proc UTC {} {return {LIST {{STR UTC}}}}
+proc UTC {} {return {LIST {{STR U}}}}
 
 proc TAKE {k} {
     if {$k == "."} {