all repos — NoPaste @ 3e3c433f026c49e04d0efa0f0f39fc688ed32bb1

Resurrected - The PussTheCat.org fork of NoPaste

scripts/CodeMirror/mode/pascal/index.html (view raw)

 1<!doctype html>
 2
 3<title>CodeMirror: Pascal mode</title>
 4<meta charset="utf-8"/>
 5<link rel=stylesheet href="../../doc/docs.css">
 6
 7<link rel="stylesheet" href="../../lib/codemirror.css">
 8<script src="../../lib/codemirror.js"></script>
 9<script src="pascal.js"></script>
10<style>.CodeMirror {border-top: 1px solid black; border-bottom: 1px solid black;}</style>
11<div id=nav>
12  <a href="https://codemirror.net"><h1>CodeMirror</h1><img id=logo src="../../doc/logo.png" alt=""></a>
13
14  <ul>
15    <li><a href="../../index.html">Home</a>
16    <li><a href="../../doc/manual.html">Manual</a>
17    <li><a href="https://github.com/codemirror/codemirror">Code</a>
18  </ul>
19  <ul>
20    <li><a href="../index.html">Language modes</a>
21    <li><a class=active href="#">Pascal</a>
22  </ul>
23</div>
24
25<article>
26<h2>Pascal mode</h2>
27
28
29<div><textarea id="code" name="code">
30(* Example Pascal code *)
31
32while a <> b do writeln('Waiting');
33 
34if a > b then 
35  writeln('Condition met')
36else 
37  writeln('Condition not met');
38 
39for i := 1 to 10 do 
40  writeln('Iteration: ', i:1);
41 
42repeat
43  a := a + 1
44until a = 10;
45 
46case i of
47  0: write('zero');
48  1: write('one');
49  2: write('two')
50end;
51</textarea></div>
52
53    <script>
54      var editor = CodeMirror.fromTextArea(document.getElementById("code"), {
55        lineNumbers: true,
56        mode: "text/x-pascal"
57      });
58    </script>
59
60    <p><strong>MIME types defined:</strong> <code>text/x-pascal</code>.</p>
61  </article>