use unix line endings
This commit is contained in:
parent
ad65a20391
commit
1d55fd8d12
1 changed files with 43 additions and 43 deletions
|
|
@ -1,54 +1,54 @@
|
||||||
# Test various aspects
|
# Test various aspects
|
||||||
|
|
||||||
# bug #572
|
# bug #572
|
||||||
var a=12345678901'u64
|
var a=12345678901'u64
|
||||||
|
|
||||||
var x = (x: 42, y: (a: 8, z: 10))
|
var x = (x: 42, y: (a: 8, z: 10))
|
||||||
echo x.y
|
echo x.y
|
||||||
|
|
||||||
import
|
import
|
||||||
mvarious
|
mvarious
|
||||||
|
|
||||||
type
|
type
|
||||||
PA = ref TA
|
PA = ref TA
|
||||||
PB = ref TB
|
PB = ref TB
|
||||||
|
|
||||||
TB = object
|
TB = object
|
||||||
a: PA
|
a: PA
|
||||||
|
|
||||||
TA = object
|
TA = object
|
||||||
b: TB
|
b: TB
|
||||||
x: int
|
x: int
|
||||||
|
|
||||||
proc getPA(): PA =
|
proc getPA(): PA =
|
||||||
var
|
var
|
||||||
b: bool
|
b: bool
|
||||||
b = not false
|
b = not false
|
||||||
return nil
|
return nil
|
||||||
|
|
||||||
# bug #501
|
# bug #501
|
||||||
proc f(): int = 54
|
proc f(): int = 54
|
||||||
|
|
||||||
var
|
var
|
||||||
global: int
|
global: int
|
||||||
|
|
||||||
var
|
var
|
||||||
s: string
|
s: string
|
||||||
i: int
|
i: int
|
||||||
r: TA
|
r: TA
|
||||||
|
|
||||||
r.b.a.x = 0
|
r.b.a.x = 0
|
||||||
global = global + 1
|
global = global + 1
|
||||||
exportme()
|
exportme()
|
||||||
write(stdout, "Hallo wie heißt du? ")
|
write(stdout, "Hallo wie heißt du? ")
|
||||||
write(stdout, getPA().x)
|
write(stdout, getPA().x)
|
||||||
s = readLine(stdin)
|
s = readLine(stdin)
|
||||||
i = 0
|
i = 0
|
||||||
while i < s.len:
|
while i < s.len:
|
||||||
if s[i] == 'c': write(stdout, "'c' in deinem Namen gefunden\n")
|
if s[i] == 'c': write(stdout, "'c' in deinem Namen gefunden\n")
|
||||||
i = i + 1
|
i = i + 1
|
||||||
|
|
||||||
write(stdout, "Du heißt " & s)
|
write(stdout, "Du heißt " & s)
|
||||||
|
|
||||||
# bug #544
|
# bug #544
|
||||||
when false:
|
when false:
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue