SCM Repository
[smlnj] / sml / releases / release-110.36 / ckit / src / parser / util / sourcemap.sml |
Diff of /sml/releases/release-110.36/ckit/src/parser/util/sourcemap.sml
Parent Directory
|
Revision Log
|
Patch
revision 597, Wed Apr 5 18:34:51 2000 UTC | revision 639, Tue May 2 21:44:37 2000 UTC | |
---|---|---|
# | Line 27 | Line 27 |
27 | * it looks like filePos could just be a ref of the record *) | * it looks like filePos could just be a ref of the record *) |
28 | ||
29 | fun newmap{srcFile} = SOURCEMAP | fun newmap{srcFile} = SOURCEMAP |
30 | { linePos = ref [0], | { linePos = ref [1], (* this compensates for lex bug : yypos off by 2 *) |
31 | filePos = ref [{linePos=[],line=1,srcFile=srcFile}], | filePos = ref [{linePos=[],line=1,srcFile=srcFile}], |
32 | lineNum = ref 1 | lineNum = ref 1 |
33 | } | } |
|
root@smlnj-gforge.cs.uchicago.edu | ViewVC Help |
Powered by ViewVC 1.0.0 |