Edgewall Software

ProcessorBazaar: pascal-0.0.1.py

File pascal-0.0.1.py, 391 bytes (added by shadow, 2 years ago)
Line 
1"""
2Processor that calls Pascal Mimeview processor
3
4Version: 0.0.1 (2006-09-10)
5
6Example:
7{{{
8#!pascal
9procedure Example(const A, B : byte);
10begin
11        if (A=B) then for i:=0 to 25 do begin
12            WriteLn('Example');
13        end;
14end;
15}}}
16
17SHadoW
18shadow(at)mapik(dot)net
19"""
20
21from trac.mimeview import Mimeview
22
23def execute(hdf, text, env):
24    return Mimeview(env).render(None, 'text/x-pascal', text)
25