From ae6e6a5fb1ca0fc8750203315283aaa02da07709 Mon Sep 17 00:00:00 2001 From: Kess Vargavind Date: Mon, 21 Sep 2009 08:35:18 +0200 Subject: Add license info and usage note for retab.sml Executable ignored and test run commited as well. --- tools/retab.sml | 15 +++++++++++++++ 1 file changed, 15 insertions(+) (limited to 'tools') diff --git a/tools/retab.sml b/tools/retab.sml index b374eff2..8e2a054e 100644 --- a/tools/retab.sml +++ b/tools/retab.sml @@ -1,3 +1,18 @@ +(* + * retab (c) 2009 The Mana World development team + * License: GPL, version 2 or later + * + * Compilation, e.g. (depends on SML implementation): + * mlton retab.sml + * + * Example usage: + * tools/retab < db/mob_db.txt > db/mob_db.txt.new && mv db/mob_db.txt.new db/mob_db.txt + * + * TODO: + * - Commas inside {} need to be seen as just one field when tabified + * - Commented lines should be left untabified + *) + fun width (#"\t", i) = let val m = i mod 8 in if m = 0 then 8 else m end | width (c, i) = 1 -- cgit v1.2.3-60-g2f50