mirror of
https://github.com/Zeal-Operating-System/ZealOS.git
synced 2024-12-29 00:36:32 +00:00
dbf8647d59
Added top & right borders to RawDr. Improved spacing in some debug and compiler reporting. Fixed RawPutChar and EdLite tab width. Fixed Ui missing '0x' prefix syntax highlighter bug. Added 32BitPaint demo.
72 lines
4.9 KiB
HTML
Executable file
72 lines
4.9 KiB
HTML
Executable file
<!DOCTYPE HTML>
|
|
<html>
|
|
<head>
|
|
<meta http-equiv="Content-Type" content="text/html;charset=US-ASCII">
|
|
<meta name="generator" content="ZealOS V0.08">
|
|
<style type="text/css">
|
|
body {background-color:#000000;}
|
|
.cF0{color:#ffffff;background-color:#000000;}
|
|
.cF1{color:#3465a4;background-color:#000000;}
|
|
.cF2{color:#4e9a06;background-color:#000000;}
|
|
.cF3{color:#06989a;background-color:#000000;}
|
|
.cF4{color:#a24444;background-color:#000000;}
|
|
.cF5{color:#75507b;background-color:#000000;}
|
|
.cF6{color:#ce982f;background-color:#000000;}
|
|
.cF7{color:#bcc0b9;background-color:#000000;}
|
|
.cF8{color:#555753;background-color:#000000;}
|
|
.cF9{color:#729fcf;background-color:#000000;}
|
|
.cFA{color:#82bc49;background-color:#000000;}
|
|
.cFB{color:#34e2e2;background-color:#000000;}
|
|
.cFC{color:#ac3535;background-color:#000000;}
|
|
.cFD{color:#ad7fa8;background-color:#000000;}
|
|
.cFE{color:#fce94f;background-color:#000000;}
|
|
.cFF{color:#000000;background-color:#000000;}
|
|
</style>
|
|
</head>
|
|
<body>
|
|
<pre style="font-family:monospace;font-size:12pt">
|
|
<a name="l1"></a><span class=cF1>F64</span><span class=cF0> global;
|
|
<a name="l2"></a>
|
|
<a name="l3"></a></span><span class=cF1>F64</span><span class=cF0> CompileDemo(</span><span class=cF1>U8</span><span class=cF0> *st)
|
|
<a name="l4"></a>{
|
|
<a name="l5"></a> </span><span class=cF9>I64</span><span class=cF0> type;
|
|
<a name="l6"></a> </span><span class=cF1>U8</span><span class=cF0> *machine_code;
|
|
<a name="l7"></a> </span><span class=cF9>CCompCtrl</span><span class=cF0> *cc = </span><span class=cF5>CompCtrlNew</span><span class=cF0>(st, </span><span class=cF3>CCF_DONT_FREE_BUF</span><span class=cF0>);
|
|
<a name="l8"></a> </span><span class=cF1>F64</span><span class=cF0> res = </span><span class=cFE>0</span><span class=cF0>;
|
|
<a name="l9"></a>
|
|
<a name="l10"></a> </span><span class=cF5>Lex</span><span class=cF0>(cc); </span><span class=cF2>//Gotta get it started</span><span class=cF0>
|
|
<a name="l11"></a> </span><span class=cF6>"Compile \"%s\"\n"</span><span class=cF0>, st;
|
|
<a name="l12"></a> </span><span class=cF1>do</span><span class=cF0>
|
|
<a name="l13"></a> </span><span class=cF7>{</span><span class=cF0>
|
|
<a name="l14"></a> </span><span class=cF1>if</span><span class=cF0> (machine_code = </span><span class=cF5>LexExpression2Bin</span><span class=cF7>(</span><span class=cF0>cc, &type</span><span class=cF7>)</span><span class=cF0>)
|
|
<a name="l15"></a> {
|
|
<a name="l16"></a> </span><span class=cF1>if</span><span class=cF0> (type != </span><span class=cF3>RT_F64</span><span class=cF0>)
|
|
<a name="l17"></a> res = </span><span class=cF5>ToF64</span><span class=cF0>(</span><span class=cF5>Call</span><span class=cF7>(</span><span class=cF0>machine_code</span><span class=cF7>)</span><span class=cF0>);
|
|
<a name="l18"></a> </span><span class=cF1>else</span><span class=cF0>
|
|
<a name="l19"></a> res = </span><span class=cF5>Call</span><span class=cF0>(machine_code)(</span><span class=cF1>F64</span><span class=cF0>);
|
|
<a name="l20"></a> </span><span class=cF5>Free</span><span class=cF0>(machine_code);
|
|
<a name="l21"></a> }
|
|
<a name="l22"></a> </span><span class=cF6>"res=%9.4f\n"</span><span class=cF0>, res;
|
|
<a name="l23"></a> </span><span class=cF1>if</span><span class=cF0> (cc->token == </span><span class=cF6>';'</span><span class=cF0>)
|
|
<a name="l24"></a> </span><span class=cF5>Lex</span><span class=cF0>(cc);
|
|
<a name="l25"></a> </span><span class=cF7>}</span><span class=cF0>
|
|
<a name="l26"></a> </span><span class=cF1>while</span><span class=cF0> (cc->token != </span><span class=cF3>TK_EOF</span><span class=cF0>); </span><span class=cF2>//end of file?</span><span class=cF0>
|
|
<a name="l27"></a>
|
|
<a name="l28"></a> </span><span class=cF5>CompCtrlDel</span><span class=cF0>(cc);
|
|
<a name="l29"></a>
|
|
<a name="l30"></a> </span><span class=cF1>return</span><span class=cF0> res;
|
|
<a name="l31"></a>}
|
|
<a name="l32"></a>
|
|
<a name="l33"></a>CompileDemo(</span><span class=cF6>"2 + Cos(pi)"</span><span class=cF0>);
|
|
<a name="l34"></a>CompileDemo(</span><span class=cF6>"1; 2 + 4"</span><span class=cF0>);
|
|
<a name="l35"></a>CompileDemo(</span><span class=cF6>"global = 1; global * 2; global / 3; Sin(global)"</span><span class=cF0>);
|
|
<a name="l36"></a>
|
|
<a name="l37"></a></span><span class=cF2>//This is just like you typed-it on</span><span class=cF0>
|
|
<a name="l38"></a></span><span class=cF2>//the cmd line.</span><span class=cF0>
|
|
<a name="l39"></a></span><span class=cF5>ExePrint</span><span class=cF0>(
|
|
<a name="l40"></a></span><span class=cF6>"I64 i;"</span><span class=cF0>
|
|
<a name="l41"></a></span><span class=cF6>"for (i = 0; i < 10; i++) "</span><span class=cF0>
|
|
<a name="l42"></a></span><span class=cF6>" \"%%d\n\", i;"</span><span class=cF0>
|
|
<a name="l43"></a>);
|
|
</span></pre></body>
|
|
</html>
|