entries=[{HistoryItem | line="custom", timestamp=""}],
offset=1, flags=0}
-Start :: *World -> (String, *World)
+Start :: *World -> (String, [String], *World)
Start w
#! w = setReadLineName "Test program" w
#! w = usingHistory w
#! (i, w) = historySetPos 1 w
#! (h, w) = previousHistory w
#! (h, w) = nextHistory w
+#! (s, i, w) = historyExpand "hoi" w
+#! (s, i, w) = getHistoryEvent "hoi" 1 0 w
+#! (s, w) = historyArgExtract 1 2 "hoi1 hoi2 hoi3" w
+#! (s, w) = historyArgExtract 98 99 "hoi1 hoi2 hoi3" w
+#! (ss, w) = historyTokenize "hoi1 hoi2 hoi3" w
#! (oh, w) = historyGetHistoryState w
#! w = historySetHistoryState testHistory w
#! (h, w) = historyGetHistoryState w
#! w = clearHistory w
-= (toString h, w)
+= (toString h, ss, w)