summary refs log tree commit diff stats
path: root/packages/docutils/rst.nim
diff options
context:
space:
mode:
authorAraq <rumpf_a@web.de>2012-05-09 01:50:08 +0200
committerAraq <rumpf_a@web.de>2012-05-09 01:50:08 +0200
commit76235348f8ccb1363100bdc686f0fafae5dacc5f (patch)
treebea06a5eafa73a9202e06955d618d88c097b3f79 /packages/docutils/rst.nim
parentc323ec0155cc426e604e0c53a6baf00b17e439d7 (diff)
downloadNim-76235348f8ccb1363100bdc686f0fafae5dacc5f.tar.gz
extracted documentation generator
Diffstat (limited to 'packages/docutils/rst.nim')
-rwxr-xr-xpackages/docutils/rst.nim17
1 files changed, 4 insertions, 13 deletions
diff --git a/packages/docutils/rst.nim b/packages/docutils/rst.nim
index cd385ccac..2a497af9a 100755
--- a/packages/docutils/rst.nim
+++ b/packages/docutils/rst.nim
@@ -38,7 +38,8 @@ type
     meGeneralParseError,
     meInvalidDirective,
     mwRedefinitionOfLabel,
-    mwUnknownSubstitution
+    mwUnknownSubstitution,
+    mwUnsupportedLanguage
   
   TMsgHandler* = proc (filename: string, line, col: int, msgKind: TMsgKind,
                        arg: string) ## what to do in case of an error
@@ -53,7 +54,8 @@ const
     meGeneralParseError: "general parse error",
     meInvalidDirective: "invalid directive: '$1'",
     mwRedefinitionOfLabel: "redefinition of label '$1'", 
-    mwUnknownSubstitution: "unknown substitution '$1'"
+    mwUnknownSubstitution: "unknown substitution '$1'",
+    mwUnsupportedLanguage: "language '$1' not supported"
   ]
 
 proc rstnodeToRefname*(n: PRstNode): string
@@ -281,17 +283,6 @@ type
 
   EParseError* = object of EInvalidValue
 
-when false:
-  proc tokInfo(p: TRstParser, tok: TToken): TLineInfo = 
-    result = newLineInfo(p.filename, p.line + tok.line, p.col + tok.col)
-
-  proc rstMessage(p: TRstParser, msgKind: TMsgKind, arg: string) = 
-    GlobalError(tokInfo(p, p.tok[p.idx]), msgKind, arg)
-
-  proc rstMessage(p: TRstParser, msgKind: TMsgKind) = 
-    GlobalError(tokInfo(p, p.tok[p.idx]), msgKind, p.tok[p.idx].symbol)
-
-
 proc whichMsgClass*(k: TMsgKind): TMsgClass =
   ## returns which message class `k` belongs to.
   case ($k)[1]