vasilito/RedBear-OS
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
Files
e811f4fc23e9e6b0bfac6a27ff2aa91e7e0c52fc
RedBear-OS/local/recipes/kde/kf6-syntaxhighlighting/source/autotests/html/highlight.cr.html
T

258 lines
31 KiB
HTML
Raw Blame History

<!DOCTYPE html>
<html><head>
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8"/>
<title>highlight.cr</title>
<meta name="generator" content="KF5::SyntaxHighlighting - Definition (Crystal) - Theme (Breeze Light)"/>
</head><body style="background-color:#ffffff;color:#1f1c1b"><pre>
<span style="color:#898887"># This file is a testcase for the highlighting of Crystal code</span>
<span style="color:#898887"># It's not executable code, but a collection of code snippets</span>
<span style="color:#898887">#</span>
<span style="color:#644a9b;font-weight:bold">require</span> <span style="color:#bf0303">"lib_z"</span>
<span style="color:#644a9b;font-weight:bold">require</span> <span style="color:#bf0303">"./digest"</span>
<span style="font-weight:bold">module</span> <span style="color:#0057ae">Digest</span><span style="font-weight:bold">::</span><span style="color:#0057ae">Adler32</span>
<span style="font-weight:bold">def</span> <span style="color:#b08000">self</span><span style="color:#0057ae">.initial</span> : <span style="color:#0057ae">UInt32</span>
<span style="color:#0057ae">LibZ</span><span style="color:#0057ae">.adler32</span>(<span style="color:#b08000">0</span>, <span style="color:#b08000">nil</span>, <span style="color:#b08000">0</span>)<span style="color:#0057ae">.to_u32</span>
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">def</span> <span style="color:#b08000">self</span><span style="color:#0057ae">.checksum</span>(data) : <span style="color:#0057ae">UInt32</span>
update(data, initial)
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">def</span> <span style="color:#b08000">self</span><span style="color:#0057ae">.update</span>(data, adler32 : <span style="color:#0057ae">UInt32</span>) : <span style="color:#0057ae">UInt32</span>
slice <span style="font-weight:bold">=</span> data<span style="color:#0057ae">.to_slice</span>
<span style="color:#0057ae">LibZ</span><span style="color:#0057ae">.adler32</span>(adler32, slice, slice<span style="color:#0057ae">.size</span>)<span style="color:#0057ae">.to_u32</span>
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">def</span> <span style="color:#b08000">self</span><span style="color:#0057ae">.combine</span>(adler1 : <span style="color:#0057ae">UInt32</span>, adler2 : <span style="color:#0057ae">UInt32</span>, len) : <span style="color:#0057ae">UInt32</span>
<span style="color:#0057ae">LibZ</span><span style="color:#0057ae">.adler32_combine</span>(adler1, adler2, len)<span style="color:#0057ae">.to_u32</span>
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">struct</span> <span style="color:#0057ae">BigRational</span>
<span style="color:#0057ae">Number</span><span style="color:#0057ae">.expand_div</span> <span style="font-weight:bold">[</span><span style="color:#0057ae">Int8</span>, <span style="color:#0057ae">UInt8</span>, <span style="color:#0057ae">Int16</span>, <span style="color:#0057ae">UInt16</span>, <span style="color:#0057ae">Int32</span>, <span style="color:#0057ae">UInt32</span>, <span style="color:#0057ae">Int64</span>, <span style="color:#0057ae">UInt64</span>, <span style="color:#0057ae">Int128</span>, <span style="color:#0057ae">UInt128</span><span style="font-weight:bold">]</span>, <span style="color:#0057ae">BigRational</span>
<span style="color:#0057ae">Number</span><span style="color:#0057ae">.expand_div</span> <span style="font-weight:bold">[</span><span style="color:#0057ae">Float32</span>, <span style="color:#0057ae">Float64</span><span style="font-weight:bold">]</span>, <span style="color:#0057ae">BigRational</span>
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">module</span> <span style="color:#0057ae">Crystal</span><span style="font-weight:bold">::</span><span style="color:#0057ae">Repl</span><span style="font-weight:bold">::</span><span style="color:#0057ae">Closure</span>
<span style="color:#aa5500;font-weight:bold">VAR_NAME</span> <span style="font-weight:bold">=</span> <span style="color:#bf0303">".closure_var"</span>
<span style="color:#aa5500;font-weight:bold">ARG_NAME</span> <span style="font-weight:bold">=</span> <span style="color:#bf0303">".closure_arg"</span>
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">class</span> <span style="color:#0057ae">FunctionType</span>
<span style="color:#006e28">getter</span> arg_types : <span style="color:#0057ae">Array</span>(<span style="color:#0057ae">ArgType</span>)
<span style="color:#006e28">getter</span> return_type : <span style="color:#0057ae">ArgType</span>
<span style="color:#006e28">@@cvar</span> <span style="font-weight:bold">=</span> <span style="color:#b08000">3</span>
<span style="color:#006e28">@ivar</span> <span style="font-weight:bold">=</span> <span style="color:#b08000">7</span>
<span style="font-weight:bold">def</span> initialize(<span style="color:#006e28">@arg_types</span>, <span style="color:#006e28">@return_type</span>)
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">def</span> /<span style="color:#ff5500">/(other : Int::Unsigned) : BigInt</span>
<span style="color:#ff5500"> check_division_by_zero other</span>
<span style="color:#ff5500"> unsafe_floored_div(other)</span>
<span style="color:#ff5500"> end</span>
<span style="color:#ff5500"> def /</span><span style="font-weight:bold">/</span>(other : <span style="color:#0057ae">Int</span>) : <span style="color:#0057ae">BigInt</span>
check_division_by_zero other
<span style="font-weight:bold">if</span> other <span style="font-weight:bold">&lt;</span> <span style="color:#b08000">0</span>
(<span style="font-weight:bold">-</span><span style="color:#b08000">self</span>)<span style="color:#0057ae">.unsafe_floored_div</span>(<span style="font-weight:bold">-</span>other)
<span style="color:#006e28">@cvar</span> <span style="font-weight:bold">+=</span> <span style="color:#b08000">1</span>
<span style="font-weight:bold">else</span>
unsafe_floored_div(other)
<span style="color:#006e28">@ivar</span> <span style="font-weight:bold">+=</span> <span style="color:#b08000">10</span>
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">end</span>
<span style="color:#644a9b;font-weight:bold">require</span> <span style="color:#bf0303">"llvm/enums/atomic"</span>
<span style="font-weight:bold">struct</span> <span style="color:#0057ae">Atomic</span>(T)
<span style="color:#898887"># Creates an Atomic with the given initial value.</span>
<span style="font-weight:bold">def</span> compare_and_set(cmp : T, new : T) : <span style="font-weight:bold">{</span>T, <span style="color:#0057ae">Bool</span><span style="font-weight:bold">}</span>
<span style="font-weight:bold">{%</span> <span style="font-weight:bold">if</span> T<span style="color:#0057ae">.union?</span> <span style="font-weight:bold">&amp;&amp;</span> T<span style="color:#0057ae">.union_types.all?</span> <span style="font-weight:bold">{</span> <span style="font-weight:bold">|</span>t<span style="font-weight:bold">|</span> t <span style="font-weight:bold">==</span> <span style="color:#0057ae">Nil</span> <span style="font-weight:bold">||</span> t <span style="font-weight:bold">&lt;</span> <span style="color:#0057ae">Reference</span> <span style="font-weight:bold">}</span> <span style="font-weight:bold">%}</span>
address, success <span style="font-weight:bold">=</span> <span style="color:#0057ae">Ops</span><span style="color:#0057ae">.cmpxchg</span>(pointerof(<span style="color:#006e28">@value</span>)<span style="color:#0057ae">.as</span>(<span style="color:#0057ae">LibC</span><span style="font-weight:bold">::</span><span style="color:#0057ae">SizeT</span><span style="font-weight:bold">*</span>), <span style="color:#0057ae">LibC</span><span style="font-weight:bold">::</span><span style="color:#0057ae">SizeT</span><span style="color:#0057ae">.new</span>(cmp<span style="color:#0057ae">.as</span>(T)<span style="color:#0057ae">.object_id</span>), <span style="color:#0057ae">LibC</span><span style="font-weight:bold">::</span><span style="color:#0057ae">SizeT</span><span style="color:#0057ae">.new</span>(new<span style="color:#0057ae">.as</span>(T)<span style="color:#0057ae">.object_id</span>), <span style="color:#bf0303">:sequentially_consistent</span>, <span style="color:#bf0303">:sequentially_consistent</span>)
<span style="font-weight:bold">{</span>address <span style="font-weight:bold">==</span> <span style="color:#b08000">0</span> ? <span style="color:#b08000">nil</span> : <span style="color:#0057ae">Pointer</span>(T)<span style="color:#0057ae">.new</span>(address)<span style="color:#0057ae">.as</span>(T), success<span style="font-weight:bold">}</span>
<span style="font-weight:bold">{%</span> <span style="font-weight:bold">elsif</span> T <span style="font-weight:bold">&lt;</span> <span style="color:#0057ae">Reference</span> <span style="font-weight:bold">%}</span>
<span style="color:#898887"># Use addresses again (but this can't return nil)</span>
address, success <span style="font-weight:bold">=</span> <span style="color:#0057ae">Ops</span><span style="color:#0057ae">.cmpxchg</span>(pointerof(<span style="color:#006e28">@value</span>)<span style="color:#0057ae">.as</span>(<span style="color:#0057ae">LibC</span><span style="font-weight:bold">::</span><span style="color:#0057ae">SizeT</span><span style="font-weight:bold">*</span>), <span style="color:#0057ae">LibC</span><span style="font-weight:bold">::</span><span style="color:#0057ae">SizeT</span><span style="color:#0057ae">.new</span>(cmp<span style="color:#0057ae">.as</span>(T)<span style="color:#0057ae">.object_id</span>), <span style="color:#0057ae">LibC</span><span style="font-weight:bold">::</span><span style="color:#0057ae">SizeT</span><span style="color:#0057ae">.new</span>(new<span style="color:#0057ae">.as</span>(T)<span style="color:#0057ae">.object_id</span>), <span style="color:#bf0303">:sequentially_consistent</span>, <span style="color:#bf0303">:sequentially_consistent</span>)
<span style="font-weight:bold">{</span><span style="color:#0057ae">Pointer</span>(T)<span style="color:#0057ae">.new</span>(address)<span style="color:#0057ae">.as</span>(T), success<span style="font-weight:bold">}</span>
<span style="font-weight:bold">{%</span> <span style="font-weight:bold">else</span> <span style="font-weight:bold">%}</span>
<span style="color:#0057ae">Ops</span><span style="color:#0057ae">.cmpxchg</span>(pointerof(<span style="color:#006e28">@value</span>), cmp, new, <span style="color:#bf0303">:sequentially_consistent</span>, <span style="color:#bf0303">:sequentially_consistent</span>)
<span style="font-weight:bold">{%</span> <span style="font-weight:bold">end</span> <span style="font-weight:bold">%}</span>
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">def</span> swap(value : T)
<span style="font-weight:bold">{%</span> <span style="font-weight:bold">if</span> T<span style="color:#0057ae">.union?</span> <span style="font-weight:bold">&amp;&amp;</span> T<span style="color:#0057ae">.union_types.all?</span> <span style="font-weight:bold">{</span> <span style="font-weight:bold">|</span>t<span style="font-weight:bold">|</span> t <span style="font-weight:bold">==</span> <span style="color:#0057ae">Nil</span> <span style="font-weight:bold">||</span> t <span style="font-weight:bold">&lt;</span> <span style="color:#0057ae">Reference</span> <span style="font-weight:bold">}</span> <span style="font-weight:bold">||</span> T <span style="font-weight:bold">&lt;</span> <span style="color:#0057ae">Reference</span> <span style="font-weight:bold">%}</span>
address <span style="font-weight:bold">=</span> <span style="color:#0057ae">Ops</span><span style="color:#0057ae">.atomicrmw</span>(<span style="color:#bf0303">:xchg</span>, pointerof(<span style="color:#006e28">@value</span>)<span style="color:#0057ae">.as</span>(<span style="color:#0057ae">LibC</span><span style="font-weight:bold">::</span><span style="color:#0057ae">SizeT</span><span style="font-weight:bold">*</span>), <span style="color:#0057ae">LibC</span><span style="font-weight:bold">::</span><span style="color:#0057ae">SizeT</span><span style="color:#0057ae">.new</span>(value<span style="color:#0057ae">.as</span>(T)<span style="color:#0057ae">.object_id</span>), <span style="color:#bf0303">:sequentially_consistent</span>, <span style="color:#b08000">false</span>)
<span style="color:#0057ae">Pointer</span>(T)<span style="color:#0057ae">.new</span>(address)<span style="color:#0057ae">.as</span>(T)
<span style="font-weight:bold">{%</span> <span style="font-weight:bold">else</span> <span style="font-weight:bold">%}</span>
<span style="color:#0057ae">Ops</span><span style="color:#0057ae">.atomicrmw</span>(<span style="color:#bf0303">:xchg</span>, pointerof(<span style="color:#006e28">@value</span>), value, <span style="color:#bf0303">:sequentially_consistent</span>, <span style="color:#b08000">false</span>)
<span style="font-weight:bold">{%</span> <span style="font-weight:bold">end</span> <span style="font-weight:bold">%}</span>
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">class</span> <span style="color:#0057ae">Deque</span>(T)
<span style="color:#644a9b;font-weight:bold">include</span> <span style="color:#0057ae">Indexable</span><span style="font-weight:bold">::</span><span style="color:#0057ae">Mutable</span>(T)
<span style="color:#006e28">@start</span> <span style="font-weight:bold">=</span> <span style="color:#b08000">0</span>
<span style="color:#0057ae;font-weight:bold">protected</span> <span style="color:#006e28">setter</span> size
<span style="color:#0057ae;font-weight:bold">private</span> <span style="color:#006e28">getter</span> buffer
<span style="font-weight:bold">def</span> initialize(size : <span style="color:#0057ae">Int</span>, value : T)
<span style="font-weight:bold">if</span> size <span style="font-weight:bold">&lt;</span> <span style="color:#b08000">0</span>
<span style="color:#644a9b;font-weight:bold">raise</span> <span style="color:#0057ae">ArgumentError</span><span style="color:#0057ae">.new</span>(<span style="color:#bf0303">"Negative deque size: </span><span style="color:#3daee9">#{</span>size<span style="color:#3daee9">}</span><span style="color:#bf0303">"</span>)
<span style="font-weight:bold">end</span>
<span style="color:#006e28">@size</span> <span style="font-weight:bold">=</span> size<span style="color:#0057ae">.to_i</span>
<span style="color:#006e28">@capacity</span> <span style="font-weight:bold">=</span> size<span style="color:#0057ae">.to_i</span>
<span style="font-weight:bold">unless</span> <span style="color:#006e28">@capacity</span> <span style="font-weight:bold">==</span> <span style="color:#b08000">0</span>
<span style="color:#006e28">@buffer</span> <span style="font-weight:bold">=</span> <span style="color:#0057ae">Pointer</span>(T)<span style="color:#0057ae">.malloc</span>(<span style="color:#006e28">@capacity</span>, value)
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">end</span>
<span style="color:#898887"># Returns a new `Deque` that has this deque's elements cloned.</span>
<span style="color:#898887"># That is, it returns a deep copy of this deque.</span>
<span style="color:#898887">#</span>
<span style="color:#898887"># Use `#dup` if you want a shallow copy.</span>
<span style="font-weight:bold">def</span> clone
<span style="font-weight:bold">{%</span> <span style="font-weight:bold">if</span> T <span style="font-weight:bold">==</span> <span style="font-weight:bold">::</span><span style="color:#0057ae">Bool</span> <span style="font-weight:bold">||</span> T <span style="font-weight:bold">==</span> <span style="font-weight:bold">::</span><span style="color:#0057ae">Char</span> <span style="font-weight:bold">||</span> T <span style="font-weight:bold">==</span> <span style="font-weight:bold">::</span><span style="color:#0057ae">String</span> <span style="font-weight:bold">||</span> T <span style="font-weight:bold">==</span> <span style="font-weight:bold">::</span><span style="color:#0057ae">Symbol</span> <span style="font-weight:bold">||</span> T <span style="font-weight:bold">&lt;</span> <span style="font-weight:bold">::</span><span style="color:#0057ae">Number</span><span style="font-weight:bold">::</span><span style="color:#0057ae">Primitive</span> <span style="font-weight:bold">%</span><span style="font-weight:bold">}</span>
<span style="color:#0057ae">Deque</span>(T)<span style="color:#0057ae">.new</span>(size) <span style="font-weight:bold">{</span> <span style="font-weight:bold">|</span>i<span style="font-weight:bold">|</span> <span style="color:#b08000">self</span><span style="font-weight:bold">[</span>i<span style="font-weight:bold">]</span><span style="color:#0057ae">.clone.as</span>(T) <span style="font-weight:bold">}</span>
<span style="font-weight:bold">{</span>% <span style="font-weight:bold">else</span> %<span style="font-weight:bold">}</span>
exec_recursive_clone <span style="font-weight:bold">do</span> <span style="font-weight:bold">|</span>hash<span style="font-weight:bold">|</span>
clone <span style="font-weight:bold">=</span> <span style="color:#0057ae">Deque</span>(T)<span style="color:#0057ae">.new</span>(size)
each <span style="font-weight:bold">do</span> <span style="font-weight:bold">|</span>element<span style="font-weight:bold">|</span>
clone <span style="font-weight:bold">&lt;&lt;</span> element<span style="color:#0057ae">.clone</span>
<span style="font-weight:bold">end</span>
clone
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">{</span>% <span style="font-weight:bold">end</span> %<span style="font-weight:bold">}</span>
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">def</span> delete_at(index : <span style="color:#0057ae">Int</span>) : T
<span style="font-weight:bold">unless</span> <span style="color:#b08000">0</span> <span style="font-weight:bold">&lt;=</span> index <span style="font-weight:bold">&lt;</span> @size
raise <span style="color:#0057ae">IndexError</span><span style="color:#0057ae">.new</span>
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">return</span> shift <span style="font-weight:bold">if</span> index <span style="font-weight:bold">==</span> <span style="color:#b08000">0</span>
<span style="font-weight:bold">if</span> index <span style="font-weight:bold">></span> @size <span style="font-weight:bold">//</span> <span style="color:#b08000">2</span>
<span style="color:#898887"># Move following items to the left, starting with the first one</span>
<span style="color:#898887"># [56-01234] -> [6x-01235]</span>
dst <span style="font-weight:bold">=</span> rindex
finish <span style="font-weight:bold">=</span> (@start <span style="font-weight:bold">+</span> @size <span style="font-weight:bold">-</span> <span style="color:#b08000">1</span>) <span style="font-weight:bold">%</span> @capacity
loop <span style="font-weight:bold">do</span>
src <span style="font-weight:bold">=</span> dst <span style="font-weight:bold">+</span> <span style="color:#b08000">1</span>
src <span style="font-weight:bold">-=</span> @capacity <span style="font-weight:bold">if</span> src <span style="font-weight:bold">>=</span> @capacity
@buffer<span style="font-weight:bold">[</span>dst<span style="font-weight:bold">]</span> <span style="font-weight:bold">=</span> @buffer<span style="font-weight:bold">[</span>src<span style="font-weight:bold">]</span>
<span style="font-weight:bold">break</span> <span style="font-weight:bold">if</span> src <span style="font-weight:bold">==</span> finish
dst <span style="font-weight:bold">=</span> src
<span style="font-weight:bold">end</span>
(@buffer <span style="font-weight:bold">+</span> finish)<span style="color:#0057ae">.clear</span>
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">def</span> each(<span style="font-weight:bold">&amp; : </span>T <span style="font-weight:bold">-></span>) : <span style="color:#0057ae">Nil</span>
halfs <span style="font-weight:bold">do</span> <span style="font-weight:bold">|</span>r<span style="font-weight:bold">|</span>
r<span style="color:#0057ae">.each</span> <span style="font-weight:bold">do</span> <span style="font-weight:bold">|</span>i<span style="font-weight:bold">|</span>
<span style="font-weight:bold">yield</span> @buffer<span style="font-weight:bold">[</span>i<span style="font-weight:bold">]</span>
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">def</span> pop : T
pop <span style="font-weight:bold">{</span> <span style="color:#644a9b;font-weight:bold">raise</span> <span style="color:#0057ae">IndexError</span><span style="color:#0057ae">.new</span> <span style="font-weight:bold">}</span>
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">macro</span> <span style="font-weight:bold">[]</span>(<span style="font-weight:bold">*</span>args)
array <span style="font-weight:bold">=</span> uninitialized <span style="color:#0057ae">Array</span>(<span style="color:#0057ae">Int32</span>)
<span style="font-weight:bold">{</span>% <span style="font-weight:bold">for</span> arg, i <span style="font-weight:bold">in</span> args %<span style="font-weight:bold">}</span>
array<span style="color:#0057ae">.to_unsafe</span><span style="font-weight:bold">[</span><span style="font-weight:bold">{{</span>i<span style="font-weight:bold">}}</span><span style="font-weight:bold">]</span> <span style="font-weight:bold">=</span> <span style="font-weight:bold">{{</span>arg<span style="font-weight:bold">}}</span>
<span style="font-weight:bold">{</span>% <span style="font-weight:bold">end</span> %<span style="font-weight:bold">}</span>
array
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">def</span> message : <span style="color:#0057ae">String</span>
<span style="font-weight:bold">case</span> <span style="color:#b08000">self</span>
<span style="font-weight:bold">when</span> <span style="color:#aa5500;font-weight:bold">SUCCESS</span> <span style="font-weight:bold">then</span> <span style="color:#bf0303">"No error occurred. System call completed successfully."</span>
<span style="font-weight:bold">when</span> <span style="color:#aa5500;font-weight:bold">TXTBSY</span> <span style="font-weight:bold">then</span> <span style="color:#0057ae">Errno</span><span style="font-weight:bold">::</span><span style="color:#aa5500">ETXTBSY</span>
<span style="font-weight:bold">when</span> <span style="color:#aa5500;font-weight:bold">NOTCAPABLE</span> <span style="font-weight:bold">then</span> <span style="color:#0057ae">Errno</span><span style="font-weight:bold">::</span><span style="color:#aa5500">ENOTCAPABLE</span>
<span style="font-weight:bold">else</span> <span style="color:#0057ae">Errno</span><span style="font-weight:bold">::</span><span style="color:#aa5500">EINVAL</span>
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">end</span>
enum <span style="color:#0057ae">Signal</span>
<span style="color:#aa5500;font-weight:bold">KILL</span> <span style="font-weight:bold">=</span> <span style="color:#b08000">0</span>
<span style="color:#aa5500;font-weight:bold">BILL</span> <span style="font-weight:bold">=</span> <span style="color:#b08000">101</span>
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">end</span>
<span style="color:#898887"># :nodoc:</span>
<span style="font-weight:bold">module</span> <span style="color:#0057ae">Ops</span>
<span style="color:#898887"># Defines methods that directly map to LLVM instructions related to atomic operations.</span>
@<span style="font-weight:bold">[</span><span style="color:#0057ae">Primitive</span>(<span style="color:#bf0303">:cmpxchg</span>)<span style="font-weight:bold">]</span>
<span style="font-weight:bold">def</span> <span style="color:#b08000">self</span><span style="color:#0057ae">.cmpxchg</span>(ptr : T<span style="font-weight:bold">*</span>, cmp : T, new : T, success_ordering : <span style="color:#aa5500;font-weight:bold">LLVM</span><span style="font-weight:bold">::</span><span style="color:#0057ae">AtomicOrdering</span>, failure_ordering : <span style="color:#aa5500;font-weight:bold">LLVM</span><span style="font-weight:bold">::</span><span style="color:#0057ae">AtomicOrdering</span>) : <span style="font-weight:bold">{</span>T, <span style="color:#0057ae">Bool</span><span style="font-weight:bold">}</span> forall T
<span style="font-weight:bold">end</span>
@<span style="font-weight:bold">[</span><span style="color:#0057ae">Primitive</span>(<span style="color:#bf0303">:atomicrmw</span>)<span style="font-weight:bold">]</span>
<span style="font-weight:bold">def</span> <span style="color:#b08000">self</span><span style="color:#0057ae">.atomicrmw</span>(op : <span style="color:#aa5500;font-weight:bold">LLVM</span><span style="font-weight:bold">::</span><span style="color:#0057ae">AtomicRMWBinOp</span>, ptr : T<span style="font-weight:bold">*</span>, val : T, ordering : <span style="color:#aa5500;font-weight:bold">LLVM</span><span style="font-weight:bold">::</span><span style="color:#0057ae">AtomicOrdering</span>, singlethread : <span style="color:#0057ae">Bool</span>) : T forall T
<span style="font-weight:bold">end</span>
<span style="font-weight:bold">end</span>
@<span style="font-weight:bold">[</span><span style="color:#0057ae">Link</span>(<span style="color:#bf0303">"z"</span>)<span style="font-weight:bold">]</span>
lib <span style="color:#0057ae">LibZ</span>
<span style="font-weight:bold">alias</span> <span style="color:#0057ae">Char</span> <span style="font-weight:bold">=</span> <span style="color:#0057ae">LibC</span><span style="font-weight:bold">::</span><span style="color:#0057ae">Char</span>
<span style="font-weight:bold">alias</span> <span style="color:#0057ae">SizeT</span> <span style="font-weight:bold">=</span> <span style="color:#0057ae">LibC</span><span style="font-weight:bold">::</span><span style="color:#0057ae">SizeT</span>
fun zlibVersion : <span style="color:#0057ae">Char</span><span style="font-weight:bold">*</span>
fun crc32_combine(crc1 : <span style="color:#0057ae">ULong</span>, crc2 : <span style="color:#0057ae">ULong</span>, len : <span style="color:#0057ae">Long</span>) : <span style="color:#0057ae">ULong</span>
<span style="font-weight:bold">alias</span> <span style="color:#0057ae">AllocFunc</span> <span style="font-weight:bold">=</span> <span style="color:#0057ae">Void</span><span style="font-weight:bold">*</span>, <span style="color:#0057ae">UInt</span>, <span style="color:#0057ae">UInt</span> <span style="font-weight:bold">-></span> <span style="color:#0057ae">Void</span><span style="font-weight:bold">*</span>
<span style="font-weight:bold">alias</span> <span style="color:#0057ae">FreeFunc</span> <span style="font-weight:bold">=</span> (<span style="color:#0057ae">Void</span><span style="font-weight:bold">*</span>, <span style="color:#0057ae">Void</span><span style="font-weight:bold">*</span>) <span style="font-weight:bold">-></span>
<span style="font-weight:bold">struct</span> <span style="color:#0057ae">ZStream</span>
next_in : <span style="color:#0057ae">Bytef</span><span style="font-weight:bold">*</span>
avail_in : <span style="color:#0057ae">UInt</span>
next_out : <span style="color:#0057ae">Bytef</span><span style="font-weight:bold">*</span>
total_out : <span style="color:#0057ae">ULong</span>
msg : <span style="color:#0057ae">Char</span><span style="font-weight:bold">*</span>
state : <span style="color:#0057ae">Void</span><span style="font-weight:bold">*</span>
zalloc : <span style="color:#0057ae">AllocFunc</span>
zfree : <span style="color:#0057ae">FreeFunc</span>
opaque : <span style="color:#0057ae">Void</span><span style="font-weight:bold">*</span>
data_type : <span style="color:#0057ae">Int</span>
adler : <span style="color:#0057ae">Long</span>
<span style="font-weight:bold">end</span>
<span style="color:#898887"># error codes</span>
enum <span style="color:#0057ae">Error</span>
<span style="color:#aa5500;font-weight:bold">OK</span> <span style="font-weight:bold">=</span> <span style="color:#b08000">0</span>
<span style="color:#aa5500;font-weight:bold">VERSION_ERROR</span> <span style="font-weight:bold">=</span> <span style="font-weight:bold">-</span><span style="color:#b08000">6</span>
<span style="font-weight:bold">end</span>
enum <span style="color:#0057ae">Flush</span>
<span style="color:#aa5500;font-weight:bold">NO_FLUSH</span> <span style="font-weight:bold">=</span> <span style="color:#b08000">0</span>
<span style="color:#aa5500;font-weight:bold">TREES</span> <span style="font-weight:bold">=</span> <span style="color:#b08000">6</span>
<span style="font-weight:bold">end</span>
<span style="color:#aa5500;font-weight:bold">MAX_BITS</span> <span style="font-weight:bold">=</span> <span style="color:#b08000">15</span>
fun deflateInit2 <span style="font-weight:bold">=</span> deflateInit2_(stream : <span style="color:#0057ae">ZStream</span><span style="font-weight:bold">*</span>, level : <span style="color:#0057ae">Int32</span>, method : <span style="color:#0057ae">Int32</span>,
window_bits : <span style="color:#0057ae">Int32</span>, mem_level : <span style="color:#0057ae">Int32</span>, strategy : <span style="color:#0057ae">Int32</span>,
version : <span style="color:#0057ae">UInt8</span><span style="font-weight:bold">*</span>, stream_size : <span style="color:#0057ae">Int32</span>) : <span style="color:#0057ae">Error</span>
fun deflate(stream : <span style="color:#0057ae">ZStream</span><span style="font-weight:bold">*</span>, flush : <span style="color:#0057ae">Flush</span>) : <span style="color:#0057ae">Error</span>
fun deflateSetDictionary(stream : <span style="color:#0057ae">ZStream</span><span style="font-weight:bold">*</span>, dictionary : <span style="color:#0057ae">UInt8</span><span style="font-weight:bold">*</span>, len : <span style="color:#0057ae">UInt</span>) : <span style="color:#0057ae">Int</span>
fun inflateInit2 <span style="font-weight:bold">=</span> inflateInit2_(stream : <span style="color:#0057ae">ZStream</span><span style="font-weight:bold">*</span>, window_bits : <span style="color:#0057ae">Int32</span>, version : <span style="color:#0057ae">UInt8</span><span style="font-weight:bold">*</span>, stream_size : <span style="color:#0057ae">Int32</span>) : <span style="color:#0057ae">Error</span>
fun inflate(stream : <span style="color:#0057ae">ZStream</span><span style="font-weight:bold">*</span>, flush : <span style="color:#0057ae">Flush</span>) : <span style="color:#0057ae">Error</span>
fun inflateSetDictionary(stream : <span style="color:#0057ae">ZStream</span><span style="font-weight:bold">*</span>, dictionary : <span style="color:#0057ae">UInt8</span><span style="font-weight:bold">*</span>, len : <span style="color:#0057ae">UInt</span>) : <span style="color:#0057ae">Error</span>
<span style="font-weight:bold">end</span>
</pre></body></html>
Reference in New Issue View Git Blame Copy Permalink