diff options
author | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
commit | e0c6872cf40896c7be36b11dcc744620f10adf1d (patch) | |
tree | 60335e10d2f4354b0674ec22d7b53f0f8abee672 /web/glasgow/lit2x-0.16/literate/lit-2pgm-f.lprl |
Initial commit
Diffstat (limited to 'web/glasgow/lit2x-0.16/literate/lit-2pgm-f.lprl')
-rw-r--r-- | web/glasgow/lit2x-0.16/literate/lit-2pgm-f.lprl | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/web/glasgow/lit2x-0.16/literate/lit-2pgm-f.lprl b/web/glasgow/lit2x-0.16/literate/lit-2pgm-f.lprl new file mode 100644 index 0000000000..c31ced58e2 --- /dev/null +++ b/web/glasgow/lit2x-0.16/literate/lit-2pgm-f.lprl @@ -0,0 +1,12 @@ +\section[lit2pgm_for_f]{Lit2pgm-only code for language \tr{Fortran}} + +\begin{code} +sub mk_line_directive { + local($filename,$lineno) = @_; + + "# line $lineno \"$filename\"\n"; +} + +# so we get 'do'ne correctly +1; +\end{code} |