-#LyX 1.6.0 created this file. For more info see http://www.lyx.org/
-\lyxformat 345
+#LyX 2.1 created this file. For more info see http://www.lyx.org/
+\lyxformat 448
\begin_document
\begin_header
-\use_default_options false
-\textclass literate-article
+\textclass article
\begin_preamble
%
% ps2pdf stuff
\def\nwendcode{\endtrivlist \endgroup \vfil\penalty10\vfilneg}
\let\nwdocspar=\smallbreak
\end_preamble
+\use_default_options false
+\begin_modules
+noweb
+\end_modules
+\maintain_unincluded_children false
\language english
+\language_package default
\inputencoding auto
+\fontencoding global
\font_roman times
\font_sans helvet
\font_typewriter courier
+\font_math auto
\font_default_family default
+\use_non_tex_fonts false
\font_sc false
\font_osf false
\font_sf_scale 100
\font_tt_scale 100
\graphics default
+\default_output_format default
+\output_sync 0
+\bibtex_command default
+\index_command default
\paperfontsize default
\spacing single
\use_hyperref false
\papersize default
\use_geometry false
-\use_amsmath 0
-\use_esint 0
+\use_package amsmath 0
+\use_package amssymb 0
+\use_package esint 0
+\use_package mathdots 1
+\use_package mathtools 0
+\use_package mhchem 1
+\use_package undertilde 0
\cite_engine basic
+\cite_engine_type numerical
+\biblio_style plain
\use_bibtopic false
+\use_indices false
\paperorientation portrait
+\suppress_date false
+\justification true
+\use_refstyle 0
+\index Index
+\shortcut idx
+\color #008000
+\end_index
\secnumdepth 3
\tocdepth 3
\paragraph_separation indent
-\defskip medskip
+\paragraph_indentation default
\quotes_language english
\papercolumns 1
\papersides 1
\paperpagestyle default
\tracking_changes false
\output_changes false
-\author ""
+\html_math_output 0
+\html_css_as_file 0
+\html_be_strict false
\end_header
\begin_body
\end_layout
\begin_layout Standard
-The motivation for this program was Bugzilla bug 190
+The motivation for this program was LyX bug 190
\begin_inset Foot
status collapsed
\begin_layout Plain Layout
-http://bugzilla.lyx.org/show_bug.cgi?id=190
+http://www.lyx.org/trac/ticket/190
\end_layout
\end_inset
available for all other platforms.
\end_layout
-\begin_layout Scrap
+\begin_layout Chunk
+
<<listerrors>>=
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
#!/usr/bin/python -tt
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
"""reformat noweb and compiler errors for LyX.
-\begin_inset Newline newline
-\end_inset
+\end_layout
+\begin_layout Chunk
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
Expects to read from stdin and output to stdout.
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
"""
-\begin_inset Newline newline
-\end_inset
+\end_layout
+\begin_layout Chunk
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
__author__ = "Kayvan A.
Sylvan <kayvan@sylvan.com>"
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
__date__ = "$Date: 2005/07/18 09:42:26 $"
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
__version__ = "$Revision: 1.5 $"
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
__credits__ = """Edmar Wienskoski Jr.
<edmar-w-jr@technologist.com>
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
original Literate support for LyX.
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
Bernard Michael Hurley <berhardh@westherts.ac.uk>
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
modifications to original listerrors."""
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
__copyright__ = "Copyright 2002 - Kayvan Sylvan."
-\begin_inset Newline newline
-\end_inset
+\end_layout
+\begin_layout Chunk
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
import sys, string
-\begin_inset Newline newline
-\end_inset
+\end_layout
+\begin_layout Chunk
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
<<Function Bodies>>
-\begin_inset Newline newline
-\end_inset
+\end_layout
+\begin_layout Chunk
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
if __name__ == "__main__":
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
main()
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
@
\end_layout
The following function mimics the TeX error message format.
\end_layout
-\begin_layout Scrap
+\begin_layout Chunk
+
<<Function Bodies>>=
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
def write_error(msg, tool = "noweb", line_number = 1):
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
"""Write out the given message in TeX error style.
-\begin_inset Newline newline
-\end_inset
+\end_layout
+\begin_layout Chunk
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
+
+\end_layout
+
+\begin_layout Chunk
called like: write_error(msg, tool, line_number)."""
\begin_inset Newline newline
set of functions:
\end_layout
-\begin_layout Scrap
+\begin_layout Chunk
+
<<Function Bodies>>=
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
__lines = [] # lines pushed back
-\begin_inset Newline newline
-\end_inset
+\end_layout
+\begin_layout Chunk
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
def getline(file = sys.stdin):
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
"""read a line from internal stack or from file.
-\begin_inset Newline newline
-\end_inset
+\end_layout
+\begin_layout Chunk
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
optional file argument defaults to sys.stdin."""
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
global __lines
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
lines = __lines
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
if lines:
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
line = lines.pop()
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
else:
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
line = file.readline()
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
return line
-\begin_inset Newline newline
-\end_inset
+\end_layout
+\begin_layout Chunk
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
@ %def getline
\end_layout
And now for the corresponding pushline function:
\end_layout
-\begin_layout Scrap
+\begin_layout Chunk
+
<<Function Bodies>>=
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
def pushline(line):
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
"push a line onto the pushback stack."
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
+
+\end_layout
+
+\begin_layout Chunk
global __lines
\begin_inset Newline newline
\end_layout
-\begin_layout Scrap
+\begin_layout Chunk
+
<<Function Bodies>>=
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
def main():
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
"""Entry point for listerrors.
Takes no options.
-\begin_inset Newline newline
-\end_inset
+\end_layout
+\begin_layout Chunk
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
Reads stdin and writes to stdout.
Filter errors"""
-\begin_inset Newline newline
-\end_inset
+\end_layout
+\begin_layout Chunk
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
while 1:
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
line = getline()
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
if line == "": break
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
<<Check line against patterns and take action>>
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
@ %def main
\end_layout
(noweb, gcc, etc.) and act accordingly.
\end_layout
-\begin_layout Scrap
+\begin_layout Chunk
+
<<Check line against patterns and take action>>=
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
+
+\end_layout
+
+\begin_layout Chunk
try_patterns_dispatch = [ noweb_try, gcc_try, xlc_try ]
\begin_inset Newline newline
line is enough.
\end_layout
-\begin_layout Scrap
+\begin_layout Chunk
+
<<Function Bodies>>=
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
def noweb_try(line):
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
"""see if line is a noweb error.
-\begin_inset Newline newline
-\end_inset
+\end_layout
+\begin_layout Chunk
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
Returns 1 on success, 0 otherwise.
Outputs on stdout."""
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
retval = 0
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
<<Look for the unescaped angle-brackets in documentation>>
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
<<Look for anything with double angle brackets>>
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
<<Last ditch effort scan for specific strings>>
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
return retval
-\begin_inset Newline newline
-\end_inset
+\end_layout
+\begin_layout Chunk
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
@ %def noweb_try
\end_layout
This is the only message with an associated line number from noweb.
\end_layout
-\begin_layout Scrap
+\begin_layout Chunk
+
+\end_layout
+
+\begin_layout Chunk
+
<<Look for the unescaped angle-brackets in documentation>>=
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
if string.find(line, ": unescaped << in documentation chunk") != -1:
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
line_parts = string.split(line, ':')
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
num_str = line_parts[1]
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
num_len = len(num_str)
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
i = 0
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
while i < num_len and (num_str[i] in string.digits): i = i + 1
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
if i == num_len:
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
write_error(":" + line_parts[2], "noweb", int(num_str))
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
retval = 1
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
@
\end_layout
\begin_layout Standard
-Some noweb messages are simply about undefined scraps.
+Some noweb messages are simply about undefined chunks.
These can be seen by looking for matching double-angle-brackets.
\end_layout
-\begin_layout Scrap
+\begin_layout Chunk
+
<<Look for anything with double angle brackets>>=
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
+
+\end_layout
+
+\begin_layout Chunk
if (not retval):
\begin_inset Newline newline
Finally, here is an additional list of explicit strings to check for.
\end_layout
-\begin_layout Scrap
+\begin_layout Chunk
+
<<Last ditch effort scan for specific strings>>=
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
if (not retval):
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
msgs_to_try = ("couldn't open file",
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
"couldn't open temporary file",
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
"error writing temporary file",
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
"ill-formed option",
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
"unknown option",
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
"Bad format sequence",
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
"Can't open output file",
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
"Can't open temporary file",
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
"Capacity exceeded:",
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
"Ignoring unknown option -",
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
"This can't happen:",
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
"non-numeric line number in")
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
for msg in msgs_to_try:
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
if string.find(line, msg) != -1:
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
write_error(line, "noweb")
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
retval = 1
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
break
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
@
\end_layout
\begin_layout LyX-Code
foo.c: In function `main':
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
foo.c:3: `bar' undeclared (first use in this function)
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
foo.c:3: (Each undeclared identifier is reported only once
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
+
+\end_layout
+
+\begin_layout Chunk
foo.c:3: for each function it appears in.)
\begin_inset Newline newline
any and all lines that do not match the expected pattern.
\end_layout
-\begin_layout Scrap
+\begin_layout Chunk
+
<<Function Bodies>>=
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
def gcc_try(line):
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
"""See if line is a gcc error.
Read ahead to handle all the lines.
-\begin_inset Newline newline
-\end_inset
+\end_layout
+\begin_layout Chunk
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
Returns 1 on success, 0 otherwise.
Outputs on stdout."""
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
retval = 0
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
<<Handle the gcc error message>>
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
return retval
-\begin_inset Newline newline
-\end_inset
+\end_layout
+\begin_layout Chunk
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
@ %def gcc_try
\end_layout
line number.
\end_layout
-\begin_layout Scrap
+\begin_layout Chunk
+
<<Handle the gcc error message>>=
\begin_inset Newline newline
\end_inset
message, we do the following:
\end_layout
-\begin_layout Scrap
+\begin_layout Chunk
+
<<Accumulate gcc error lines and print it>>=
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
num_str = next_line[first_space:num_end]
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
msgs = [line[first_space:]]
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
msgs.append(next_line[num_end + 1:])
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
header_to_see = next_line[:num_end]
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
next_line = getline()
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
while next_line and next_line[:num_end] == header_to_see:
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
msgs.append(next_line[num_end + 1:])
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
next_line = getline()
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
if next_line: pushline(next_line)
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
write_error(msgs, "gcc", int(num_str))
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
retval = 1
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
@
\end_layout
\end_layout
-\begin_layout Scrap
+\begin_layout Chunk
+
+\end_layout
+
+\begin_layout Chunk
+
+\end_layout
+
+\begin_layout Chunk
+
<<Function Bodies>>=
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
def xlc_try(line):
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
"""see if line is an xlc error.
-\begin_inset Newline newline
-\end_inset
+\end_layout
+\begin_layout Chunk
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
Returns 1 on success, 0 otherwise.
Outputs on stdout."""
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
retval = 0
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
if line[0] == '"': # This is the first character of all xlc errors
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
next_quote = string.find(line, '"', 1)
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
first_space = string.find(line, ' ')
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
if (next_quote != -1) and (first_space > next_quote): # no space inisde
quotes
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
if line[first_space - 1:first_space + 6] == ", line ":
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
num_start = num_end = first_space + 6
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
while line[num_end] in string.digits: num_end = num_end + 1
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
if num_end > num_start:
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
write_error(line, "xlc", int(line[num_start : num_end]))
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
retval = 1
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
return retval
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
@ %def xlc_try
\end_layout
\begin_inset Quotes erd
\end_inset
- convertor to call a generic script that always extracts a scrap named
+ convertor to call a generic script that always extracts a chunk named
\family typewriter
build-script
\family default
\begin_layout LyX-Code
#!/bin/sh
-\begin_inset Newline newline
-\end_inset
+\end_layout
-notangle -Rbuild-script $1 | env NOWEB_SOURCE=$1 sh
+\begin_layout LyX-Code
+notangle -Rbuild-script $1 | env NOWEB_SOURCE=$1 NOWEB_OUTPUT_DIR=$2 sh
\end_layout
\begin_layout Standard
This section defines our build-script, which extracts the code.
\end_layout
-\begin_layout Scrap
+\begin_layout Chunk
+
<<build-script>>=
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
#!/bin/sh
-\begin_inset Newline newline
-\end_inset
+\end_layout
+
+\begin_layout Chunk
if [ -z "$NOWEB_SOURCE" ]; then NOWEB_SOURCE=listerrors.nw; fi
-\begin_inset Newline newline
-\end_inset
+\end_layout
-notangle -Rlisterrors ${NOWEB_SOURCE} > listerrors
-\begin_inset Newline newline
-\end_inset
+\begin_layout Chunk
-chmod +x listerrors
-\begin_inset Newline newline
-\end_inset
+if [ -z "$NOWEB_OUTPUT_DIR" ]; then NOWEB_OUTPUT_DIR=.; fi
+\end_layout
+
+\begin_layout Chunk
+
+notangle -Rlisterrors ${NOWEB_SOURCE} > ${NOWEB_OUTPUT_DIR}/listerrors
+\end_layout
+
+\begin_layout Chunk
+
+chmod +x ${NOWEB_OUTPUT_DIR}/listerrors
+\end_layout
+
+\begin_layout Chunk
@
\end_layout