aboutsummaryrefslogtreecommitdiff
path: root/sucl/history.dcl
diff options
context:
space:
mode:
Diffstat (limited to 'sucl/history.dcl')
-rw-r--r--sucl/history.dcl9
1 files changed, 9 insertions, 0 deletions
diff --git a/sucl/history.dcl b/sucl/history.dcl
index af056b6..3daf399 100644
--- a/sucl/history.dcl
+++ b/sucl/history.dcl
@@ -49,3 +49,12 @@ historyToString ::
(writeHistory) infixl :: *File (History sym var) -> .File | toString sym & toString,== var
(writeHistoryAssociation) infixl :: *File (HistoryAssociation sym var) -> .File | toString sym & toString,== var
+
+printhistory ::
+ (sym->String)
+ (var->String)
+ String
+ (History sym var)
+ *File
+ -> .File
+ | == var