From b10940c18a5b0c8276d308b0601efac585d33966 Mon Sep 17 00:00:00 2001 From: Pierre Habouzit Date: Sat, 19 May 2007 15:20:46 +0200 Subject: [PATCH] fix line number and file. --- tools/cpkg2c.mll | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/tools/cpkg2c.mll b/tools/cpkg2c.mll index 82be124..2e76dd9 100644 --- a/tools/cpkg2c.mll +++ b/tools/cpkg2c.mll @@ -312,11 +312,12 @@ and ext_pkg pkg = parse { let rettype = parse_rettype (lnum lexbuf) pkg.file ret in let args = parse_args (lnum lexbuf) pkg.file args in + let f, l = pkg.file, lnum lexbuf in let body = ext_body pkg (B.create 1024) lexbuf in let m = { rettype = rettype; args = args; fname = fname; - body = body }, pkg.file, lnum lexbuf in + body = body }, f, l in ext_pkg {pkg with methods = m::pkg.methods} lexbuf } | '}' sp* ';' (sp* '\n' as s)? -- 2.20.1