File: test.odin.ref

package info (click to toggle)
kf6-syntax-highlighting 6.13.0-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 47,568 kB
  • sloc: xml: 197,750; cpp: 12,850; python: 3,023; sh: 955; perl: 546; ruby: 488; pascal: 393; javascript: 161; php: 150; jsp: 132; lisp: 131; haskell: 124; ada: 119; ansic: 107; makefile: 96; f90: 94; ml: 85; cobol: 81; yacc: 71; csh: 62; erlang: 54; sql: 51; java: 47; objc: 37; awk: 31; asm: 30; tcl: 29; fortran: 18; cs: 10
file content (122 lines) | stat: -rw-r--r-- 15,858 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
<Comment>// This is from Odin examples:</Comment><br/>
<Comment>// https://github.com/odin-lang/examples/blob/master/by_example/dir_info/main.odin</Comment><br/>
<Normal Text></Normal Text><br/>
<Use>package</Use><Normal Text> main</Normal Text><br/>
<Normal Text></Normal Text><br/>
<Use>import</Use><Normal Text> </Normal Text><String>"core:fmt"</String><br/>
<Use>import</Use><Normal Text> </Normal Text><String>"core:os"</String><br/>
<Use>import</Use><Normal Text> </Normal Text><String>"core:path/filepath"</String><br/>
<Use>import</Use><Normal Text> </Normal Text><String>"core:strings"</String><br/>
<Normal Text></Normal Text><br/>
<Comment>/**</Comment><br/>
<Comment> * This is</Comment><br/>
<Comment> * a multiline</Comment><br/>
<Comment> * comment</Comment><br/>
<Comment> */</Comment><br/>
<Normal Text></Normal Text><br/>
<Normal Text>packedDirective </Normal Text><Operator>::</Operator><Normal Text> </Normal Text><Keyword>struct</Keyword><Normal Text> </Normal Text><Directive>#packed</Directive><Normal Text> </Normal Text><Operator>{</Operator><br/>
<Normal Text>	x</Normal Text><Operator>:</Operator><Normal Text> </Normal Text><Data Type>u8</Data Type><Operator>,</Operator><br/>
<Normal Text>	y</Normal Text><Operator>:</Operator><Normal Text> </Normal Text><Data Type>i32</Data Type><Operator>,</Operator><br/>
<Normal Text>	z</Normal Text><Operator>:</Operator><Normal Text> </Normal Text><Data Type>u16</Data Type><Operator>,</Operator><br/>
<Normal Text>	w</Normal Text><Operator>:</Operator><Normal Text> </Normal Text><Data Type>u8</Data Type><Operator>,</Operator><br/>
<Operator>}</Operator><br/>
<Normal Text></Normal Text><br/>
<Normal Text>Foo </Normal Text><Operator>::</Operator><Normal Text> </Normal Text><Keyword>enum</Keyword><Normal Text> </Normal Text><Operator>{</Operator><br/>
<Normal Text>	A</Normal Text><Operator>,</Operator><br/>
<Normal Text>	B</Normal Text><Operator>,</Operator><br/>
<Normal Text>	C</Normal Text><Operator>,</Operator><br/>
<Normal Text>	D</Normal Text><Operator>,</Operator><br/>
<Operator>}</Operator><br/>
<Normal Text></Normal Text><br/>
<Attribute>@private</Attribute><br/>
<Normal Text>_SS_MAXSIZE   </Normal Text><Operator>::</Operator><Normal Text> </Normal Text><Decimal>128</Decimal><br/>
<Normal Text></Normal Text><br/>
<Attribute>@require_results</Attribute><br/>
<Procedure>some_proc</Procedure><Operator>::</Operator><Keyword>proc</Keyword><Procedure> </Procedure><String>"contextless"</String><Operator>()</Operator><Normal Text> </Normal Text><Operator>-></Operator><Normal Text> </Normal Text><Data Type>i32</Data Type><Operator>{</Operator><br/>
<Normal Text>    </Normal Text><Control Flow>return</Control Flow><Normal Text> </Normal Text><Decimal>0</Decimal><br/>
<Operator>}</Operator><br/>
<Normal Text></Normal Text><br/>
<Attribute>@</Attribute><Symbol>(</Symbol><Attribute>private</Attribute><Normal Text> </Normal Text><Operator>=</Operator><Normal Text> </Normal Text><String>"file"</String><Operator>)</Operator><br/>
<Procedure>print_file_info </Procedure><Operator>::</Operator><Procedure> </Procedure><Keyword>proc</Keyword><Operator>(</Operator><Normal Text>fi</Normal Text><Operator>:</Operator><Normal Text> os</Normal Text><Operator>.</Operator><Normal Text>File_Info</Normal Text><Operator>)</Operator><Normal Text> </Normal Text><Operator>{</Operator><br/>
<Normal Text>    </Normal Text><Context Variable>context</Context Variable><Operator>.</Operator><Normal Text>user_index </Normal Text><Operator>=</Operator><Normal Text> </Normal Text><Decimal>100</Decimal><br/>
<Normal Text>    </Normal Text><Variable>flt </Variable><Operator>:=</Operator><Normal Text> </Normal Text><Float>12.33</Float><br/>
<Normal Text>    </Normal Text><Variable>flt_e </Variable><Operator>:=</Operator><Normal Text> </Normal Text><Float>1e9</Float><br/>
<Normal Text>	</Normal Text><Variable>bin_ok </Variable><Operator>:=</Operator><Normal Text> </Normal Text><Binary>0b110001</Binary><br/>
<Normal Text>	</Normal Text><Variable>bin_wrong </Variable><Operator>:=</Operator><Normal Text> </Normal Text><Binary>0b11</Binary><Error>2</Error><Decimal>2001010123123</Decimal><br/>
<Normal Text>	</Normal Text><Variable>oct </Variable><Operator>:=</Operator><Normal Text> </Normal Text><Octal>0o1237</Octal><br/>
<Normal Text>	</Normal Text><Variable>oct_wrong </Variable><Operator>:=</Operator><Normal Text> </Normal Text><Octal>0o123</Octal><Error>9</Error><Decimal>999</Decimal><br/>
<Normal Text>	</Normal Text><Variable>hex </Variable><Operator>:=</Operator><Normal Text> </Normal Text><Hex>0xFF123AC</Hex><br/>
<Normal Text>	</Normal Text><Variable>hex_wrong </Variable><Operator>:=</Operator><Normal Text> </Normal Text><Hex>0xFF123AC</Hex><Error>HH</Error><br/>
<Normal Text></Normal Text><br/>
<Normal Text>	</Normal Text><Comment>// Split the path into directory and filename</Comment><br/>
<Normal Text>	</Normal Text><Variable>_, filename </Variable><Operator>:=</Operator><Normal Text> filepath</Normal Text><Operator>.</Operator><Procedure>split</Procedure><Operator>(</Operator><Normal Text>fi</Normal Text><Operator>.</Operator><Normal Text>fullpath</Normal Text><Operator>)</Operator><br/>
<Normal Text></Normal Text><br/>
<Normal Text>	SIZE_WIDTH </Normal Text><Operator>::</Operator><Normal Text> </Normal Text><Decimal>12</Decimal><br/>
<Normal Text>	buf</Normal Text><Operator>:</Operator><Normal Text> </Normal Text><Operator>[</Operator><Normal Text>SIZE_WIDTH</Normal Text><Operator>]</Operator><Data Type>u8</Data Type><br/>
<Normal Text></Normal Text><br/>
<Normal Text>	</Normal Text><Variable>raw_str </Variable><Operator>:=</Operator><Normal Text> </Normal Text><RawString>`this_is raw ;';@@""\\\' string`</RawString><br/>
<Normal Text>	</Normal Text><Comment>// Print size to string backed by buf on stack, no need to free</Comment><br/>
<Normal Text>	</Normal Text><Variable>_size </Variable><Operator>:=</Operator><Normal Text> </Normal Text><String>"-"</String><Normal Text> </Normal Text><Control Flow>if</Control Flow><Normal Text> fi</Normal Text><Operator>.</Operator><Normal Text>is_dir </Normal Text><Control Flow>else</Control Flow><Normal Text> fmt</Normal Text><Operator>.</Operator><Procedure>bprintf</Procedure><Operator>(</Operator><Normal Text>buf</Normal Text><Operator>[:],</Operator><Normal Text> </Normal Text><String>"%v"</String><Operator>,</Operator><Normal Text> fi</Normal Text><Operator>.</Operator><Normal Text>size</Normal Text><Operator>)</Operator><br/>
<Normal Text></Normal Text><br/>
<Normal Text>	</Normal Text><Variable>a</Variable><Operator>:</Operator><Normal Text> </Normal Text><Data Type>u8</Data Type><Normal Text> </Normal Text><Operator>=</Operator><Normal Text> </Normal Text><Keyword>cast</Keyword><Operator>(</Operator><Data Type>u8</Data Type><Operator>)</Operator><Character>'"'</Character><br/>
<Normal Text>	</Normal Text><Variable>b</Variable><Operator>:</Operator><Normal Text> </Normal Text><Data Type>u8</Data Type><Normal Text> </Normal Text><Operator>=</Operator><Normal Text> </Normal Text><Character>'"'</Character><br/>
<Normal Text></Normal Text><br/>
<Normal Text>	</Normal Text><Comment>// Right-justify size for display, heap allocated</Comment><br/>
<Normal Text>	</Normal Text><Variable>size </Variable><Operator>:=</Operator><Normal Text> strings</Normal Text><Operator>.</Operator><Procedure>right_justify</Procedure><Operator>(</Operator><Normal Text>_size</Normal Text><Operator>,</Operator><Normal Text> SIZE_WIDTH</Normal Text><Operator>,</Operator><Normal Text> </Normal Text><String>" "</String><Operator>)</Operator><br/>
<Normal Text>	</Normal Text><Keyword>defer</Keyword><Normal Text> </Normal Text><Procedure>delete</Procedure><Operator>(</Operator><Normal Text>size</Normal Text><Operator>)</Operator><br/>
<Normal Text></Normal Text><br/>
<Normal Text>	</Normal Text><Variable>val</Variable><Operator>:</Operator><Normal Text> </Normal Text><Data Type>i32</Data Type><Normal Text> </Normal Text><Operator>=</Operator><Normal Text> </Normal Text><Decimal>1</Decimal><br/>
<Normal Text>	</Normal Text><Control Flow>switch</Control Flow><Procedure> </Procedure><Operator>(</Operator><Normal Text>val</Normal Text><Operator>)</Operator><Normal Text> </Normal Text><Operator>{</Operator><br/>
<Normal Text>	</Normal Text><Keyword>case</Keyword><Normal Text> </Normal Text><Decimal>1</Decimal><Symbol>:</Symbol><br/>
<Normal Text>		val </Normal Text><Operator>=</Operator><Normal Text> </Normal Text><Decimal>2</Decimal><br/>
<Normal Text>	</Normal Text><Keyword>case</Keyword><Normal Text> </Normal Text><Decimal>2</Decimal><Symbol>:</Symbol><br/>
<Normal Text>		val </Normal Text><Operator>=</Operator><Normal Text> </Normal Text><Decimal>3</Decimal><br/>
<Normal Text>	</Normal Text><Keyword>case</Keyword><Operator>:</Operator><br/>
<Normal Text>		val </Normal Text><Operator>=</Operator><Normal Text> </Normal Text><Decimal>0</Decimal><br/>
<Normal Text>	</Normal Text><Operator>}</Operator><br/>
<Normal Text></Normal Text><br/>
<Normal Text>	</Normal Text><Comment>// This should not turn anything below into string colors</Comment><br/>
<Normal Text>	</Normal Text><Variable>triggerCharacter </Variable><Operator>:=</Operator><Normal Text> </Normal Text><String>"</String><String Char>\"</String Char><String>"</String><br/>
<Normal Text></Normal Text><br/>
<Normal Text>	</Normal Text><Control Flow>if</Control Flow><Normal Text> fi</Normal Text><Operator>.</Operator><Normal Text>is_dir </Normal Text><Operator>{</Operator><br/>
<Normal Text>		fmt</Normal Text><Operator>.</Operator><Procedure>printf </Procedure><Operator>(</Operator><String>"%v [%v]</String><String Char>\n</String Char><String> word"</String><Operator>,</Operator><Normal Text> size</Normal Text><Operator>,</Operator><Normal Text> filename</Normal Text><Operator>)</Operator><br/>
<Normal Text>	</Normal Text><Operator>}</Operator><Normal Text> </Normal Text><Control Flow>else</Control Flow><Normal Text> </Normal Text><Operator>{</Operator><br/>
<Normal Text>		fmt</Normal Text><Operator>.</Operator><Procedure>printf</Procedure><Operator>(</Operator><String>"%v %v</String><String Char>\n</String Char><String>"</String><Operator>,</Operator><Normal Text> size</Normal Text><Operator>,</Operator><Normal Text> filename</Normal Text><Operator>)</Operator><br/>
<Normal Text>	</Normal Text><Operator>}</Operator><br/>
<Operator>}</Operator><br/>
<Normal Text></Normal Text><br/>
<Procedure>main </Procedure><Operator>::</Operator><Procedure> </Procedure><Keyword>proc</Keyword><Operator>()</Operator><Normal Text> </Normal Text><Operator>{</Operator><br/>
<Normal Text>	</Normal Text><Variable>cwd </Variable><Operator>:=</Operator><Normal Text> os</Normal Text><Operator>.</Operator><Procedure>get_current_directory</Procedure><Operator>()</Operator><br/>
<Normal Text>	fmt</Normal Text><Operator>.</Operator><Procedure>println</Procedure><Operator>(</Operator><String>"Current working directory:"</String><Operator>,</Operator><Normal Text> cwd</Normal Text><Operator>)</Operator><br/>
<Normal Text></Normal Text><br/>
<Normal Text>	</Normal Text><Variable>f, err </Variable><Operator>:=</Operator><Normal Text> os</Normal Text><Operator>.</Operator><Procedure>open</Procedure><Operator>(</Operator><Normal Text>cwd</Normal Text><Operator>)</Operator><br/>
<Normal Text>	</Normal Text><Keyword>defer</Keyword><Normal Text> os</Normal Text><Operator>.</Operator><Procedure>close</Procedure><Operator>(</Operator><Normal Text>f</Normal Text><Operator>)</Operator><br/>
<Normal Text></Normal Text><br/>
<Normal Text>	</Normal Text><Control Flow>if</Control Flow><Normal Text> err </Normal Text><Operator>!=</Operator><Normal Text> os</Normal Text><Operator>.</Operator><Normal Text>ERROR_NONE </Normal Text><Operator>{</Operator><br/>
<Normal Text>		</Normal Text><Comment>// Print error to stderr and exit with errorcode</Comment><br/>
<Normal Text>		fmt</Normal Text><Operator>.</Operator><Procedure>eprintln</Procedure><Operator>(</Operator><String>"Could not open directory for reading"</String><Operator>,</Operator><Normal Text> err</Normal Text><Operator>)</Operator><br/>
<Normal Text>		os</Normal Text><Operator>.</Operator><Procedure>exit</Procedure><Operator>(</Operator><Decimal>1</Decimal><Operator>)</Operator><br/>
<Normal Text>	</Normal Text><Operator>}</Operator><br/>
<Normal Text></Normal Text><br/>
<Normal Text>	fis</Normal Text><Operator>:</Operator><Normal Text> </Normal Text><Operator>[]</Operator><Normal Text>os</Normal Text><Operator>.</Operator><Normal Text>File_Info</Normal Text><br/>
<Normal Text>	</Normal Text><Keyword>defer</Keyword><Normal Text> os</Normal Text><Operator>.</Operator><Procedure>file_info_slice_delete</Procedure><Operator>(</Operator><Normal Text>fis</Normal Text><Operator>)</Operator><Normal Text> </Normal Text><Comment>// fis is a slice, we need to remember to free it</Comment><br/>
<Normal Text></Normal Text><br/>
<Normal Text>	fis</Normal Text><Operator>,</Operator><Normal Text> err </Normal Text><Operator>=</Operator><Normal Text> os</Normal Text><Operator>.</Operator><Procedure>read_dir</Procedure><Operator>(</Operator><Normal Text>f</Normal Text><Operator>,</Operator><Normal Text> </Normal Text><Operator>-</Operator><Decimal>1</Decimal><Operator>)</Operator><Normal Text> </Normal Text><Comment>// -1 reads all file infos</Comment><br/>
<Normal Text>	</Normal Text><Control Flow>if</Control Flow><Normal Text> err </Normal Text><Operator>!=</Operator><Normal Text> os</Normal Text><Operator>.</Operator><Normal Text>ERROR_NONE </Normal Text><Operator>{</Operator><br/>
<Normal Text>		fmt</Normal Text><Operator>.</Operator><Procedure>eprintln</Procedure><Operator>(</Operator><String>"Could not read directory"</String><Operator>,</Operator><Normal Text> err</Normal Text><Operator>)</Operator><br/>
<Normal Text>		os</Normal Text><Operator>.</Operator><Procedure>exit</Procedure><Operator>(</Operator><Decimal>2</Decimal><Operator>)</Operator><br/>
<Normal Text>	</Normal Text><Operator>}</Operator><br/>
<Normal Text></Normal Text><br/>
<Normal Text>	</Normal Text><Control Flow>for</Control Flow><Normal Text> fi </Normal Text><Control Flow>in</Control Flow><Normal Text> fis </Normal Text><Operator>{</Operator><br/>
<Normal Text>		</Normal Text><Procedure>print_file_info</Procedure><Operator>(</Operator><Normal Text>fi</Normal Text><Operator>)</Operator><br/>
<Normal Text>	</Normal Text><Operator>}</Operator><br/>
<Normal Text></Normal Text><br/>
<Normal Text>	</Normal Text><Variable>enumTest </Variable><Operator>:=</Operator><Normal Text> Foo</Normal Text><Operator>.</Operator><Normal Text>A</Normal Text><br/>
<Normal Text>	</Normal Text><Directive>#partial</Directive><Normal Text> </Normal Text><Control Flow>switch</Control Flow><Normal Text> enumTest </Normal Text><Operator>{</Operator><br/>
<Normal Text>	</Normal Text><Keyword>case</Keyword><Normal Text> </Normal Text><Operator>.</Operator><Normal Text>A</Normal Text><Operator>:</Operator><br/>
<Normal Text>		fmt</Normal Text><Operator>.</Operator><Procedure>println</Procedure><Operator>(</Operator><String>"A letter</String><String Char>\n</String Char><String> nextline </String><String Char>\xfe</String Char><String> </String><String Char>\u200B</String Char><String> </String><String Char>\000</String Char><String> </String><String Char>\U0001f4ae</String Char><String>"</String><Operator>)</Operator><br/>
<Normal Text>	</Normal Text><Keyword>case</Keyword><Normal Text> </Normal Text><Operator>.</Operator><Normal Text>D</Normal Text><Operator>:</Operator><br/>
<Normal Text>		fmt</Normal Text><Operator>.</Operator><Procedure>println</Procedure><Operator>(</Operator><String>"D"</String><Operator>)</Operator><br/>
<Normal Text>	</Normal Text><Operator>}</Operator><br/>
<Operator>}</Operator><br/>
<Normal Text></Normal Text><br/>