Merge branch 'devel' of github.com:nim-lang/Nim into devel
This commit is contained in:
commit
0c683d28bb
8 changed files with 154 additions and 17 deletions
|
|
@ -978,12 +978,13 @@ proc genAsmOrEmitStmt(p: BProc, t: PNode, isAsmStmt=false): Rope =
|
||||||
if isAsmStmt and hasGnuAsm in CC[p.config.cCompiler].props:
|
if isAsmStmt and hasGnuAsm in CC[p.config.cCompiler].props:
|
||||||
for x in splitLines(res):
|
for x in splitLines(res):
|
||||||
var j = 0
|
var j = 0
|
||||||
while x[j] in {' ', '\t'}: inc(j)
|
while j < x.len and x[j] in {' ', '\t'}: inc(j)
|
||||||
|
if j < x.len:
|
||||||
if x[j] in {'"', ':'}:
|
if x[j] in {'"', ':'}:
|
||||||
# don't modify the line if already in quotes or
|
# don't modify the line if already in quotes or
|
||||||
# some clobber register list:
|
# some clobber register list:
|
||||||
add(result, x); add(result, "\L")
|
add(result, x); add(result, "\L")
|
||||||
elif x[j] != '\0':
|
else:
|
||||||
# ignore empty lines
|
# ignore empty lines
|
||||||
add(result, "\"")
|
add(result, "\"")
|
||||||
add(result, x)
|
add(result, x)
|
||||||
|
|
|
||||||
|
|
@ -74,9 +74,10 @@ template wr(x) =
|
||||||
template goodCol(col): bool = col in 40..MaxLineLen
|
template goodCol(col): bool = col in 40..MaxLineLen
|
||||||
|
|
||||||
const
|
const
|
||||||
splitters = {tkComma, tkSemicolon, tkParLe, tkParDotLe,
|
openPars = {tkParLe, tkParDotLe,
|
||||||
tkBracketLe, tkBracketLeColon, tkCurlyDotLe,
|
tkBracketLe, tkBracketLeColon, tkCurlyDotLe,
|
||||||
tkCurlyLe}
|
tkCurlyLe}
|
||||||
|
splitters = openPars + {tkComma, tkSemicolon}
|
||||||
oprSet = {tkOpr, tkDiv, tkMod, tkShl, tkShr, tkIn, tkNotin, tkIs,
|
oprSet = {tkOpr, tkDiv, tkMod, tkShl, tkShr, tkIn, tkNotin, tkIs,
|
||||||
tkIsnot, tkNot, tkOf, tkAs, tkDotDot, tkAnd, tkOr, tkXor}
|
tkIsnot, tkNot, tkOf, tkAs, tkDotDot, tkAnd, tkOr, tkXor}
|
||||||
|
|
||||||
|
|
@ -169,7 +170,9 @@ proc emitTok*(em: var Emitter; L: TLexer; tok: TToken) =
|
||||||
of tokKeywordLow..tokKeywordHigh:
|
of tokKeywordLow..tokKeywordHigh:
|
||||||
if endsInAlpha(em):
|
if endsInAlpha(em):
|
||||||
wr(" ")
|
wr(" ")
|
||||||
elif not em.inquote and not endsInWhite(em) and tok.tokType in oprSet:
|
elif not em.inquote and not endsInWhite(em) and
|
||||||
|
em.lastTok notin openPars:
|
||||||
|
#and tok.tokType in oprSet
|
||||||
wr(" ")
|
wr(" ")
|
||||||
|
|
||||||
if not em.inquote:
|
if not em.inquote:
|
||||||
|
|
|
||||||
|
|
@ -211,7 +211,12 @@ proc evalOp(m: TMagic, n, a, b, c: PNode; g: ModuleGraph): PNode =
|
||||||
of mUnaryMinusF64: result = newFloatNodeT(- getFloat(a), n, g)
|
of mUnaryMinusF64: result = newFloatNodeT(- getFloat(a), n, g)
|
||||||
of mNot: result = newIntNodeT(1 - getInt(a), n, g)
|
of mNot: result = newIntNodeT(1 - getInt(a), n, g)
|
||||||
of mCard: result = newIntNodeT(nimsets.cardSet(g.config, a), n, g)
|
of mCard: result = newIntNodeT(nimsets.cardSet(g.config, a), n, g)
|
||||||
of mBitnotI: result = newIntNodeT(not getInt(a), n, g)
|
of mBitnotI:
|
||||||
|
case skipTypes(n.typ, abstractRange).kind
|
||||||
|
of tyUInt..tyUInt64:
|
||||||
|
result = newIntNodeT((not getInt(a)) and lastOrd(g.config, a.typ, fixedUnsigned=true), n, g)
|
||||||
|
else:
|
||||||
|
result = newIntNodeT(not getInt(a), n, g)
|
||||||
of mLengthArray: result = newIntNodeT(lengthOrd(g.config, a.typ), n, g)
|
of mLengthArray: result = newIntNodeT(lengthOrd(g.config, a.typ), n, g)
|
||||||
of mLengthSeq, mLengthOpenArray, mXLenSeq, mLengthStr, mXLenStr:
|
of mLengthSeq, mLengthOpenArray, mXLenSeq, mLengthStr, mXLenStr:
|
||||||
if a.kind == nkNilLit:
|
if a.kind == nkNilLit:
|
||||||
|
|
@ -250,8 +255,10 @@ proc evalOp(m: TMagic, n, a, b, c: PNode; g: ModuleGraph): PNode =
|
||||||
of tyInt8: result = newIntNodeT(int8(getInt(a)) shl int8(getInt(b)), n, g)
|
of tyInt8: result = newIntNodeT(int8(getInt(a)) shl int8(getInt(b)), n, g)
|
||||||
of tyInt16: result = newIntNodeT(int16(getInt(a)) shl int16(getInt(b)), n, g)
|
of tyInt16: result = newIntNodeT(int16(getInt(a)) shl int16(getInt(b)), n, g)
|
||||||
of tyInt32: result = newIntNodeT(int32(getInt(a)) shl int32(getInt(b)), n, g)
|
of tyInt32: result = newIntNodeT(int32(getInt(a)) shl int32(getInt(b)), n, g)
|
||||||
of tyInt64, tyInt, tyUInt..tyUInt64:
|
of tyInt64, tyInt:
|
||||||
result = newIntNodeT(`shl`(getInt(a), getInt(b)), n, g)
|
result = newIntNodeT(`shl`(getInt(a), getInt(b)), n, g)
|
||||||
|
of tyUInt..tyUInt64:
|
||||||
|
result = newIntNodeT(`shl`(getInt(a), getInt(b)) and lastOrd(g.config, a.typ, fixedUnsigned=true), n, g)
|
||||||
else: internalError(g.config, n.info, "constant folding for shl")
|
else: internalError(g.config, n.info, "constant folding for shl")
|
||||||
of mShrI:
|
of mShrI:
|
||||||
case skipTypes(n.typ, abstractRange).kind
|
case skipTypes(n.typ, abstractRange).kind
|
||||||
|
|
|
||||||
|
|
@ -16,7 +16,7 @@ proc test(infile, outfile: string) =
|
||||||
let produced = dir / nimFile & ".pretty"
|
let produced = dir / nimFile & ".pretty"
|
||||||
if strip(readFile(expected)) != strip(readFile(produced)):
|
if strip(readFile(expected)) != strip(readFile(produced)):
|
||||||
echo "FAILURE: files differ: ", nimFile
|
echo "FAILURE: files differ: ", nimFile
|
||||||
discard execShellCmd("diff -uNdr " & produced & " " & expected)
|
discard execShellCmd("diff -uNdr " & expected & " " & produced)
|
||||||
failures += 1
|
failures += 1
|
||||||
else:
|
else:
|
||||||
echo "SUCCESS: files identical: ", nimFile
|
echo "SUCCESS: files identical: ", nimFile
|
||||||
|
|
|
||||||
|
|
@ -8,6 +8,22 @@ import verylongnamehere,verylongnamehere,verylongnamehereverylongnamehereverylon
|
||||||
proc `[]=`() = discard "index setter"
|
proc `[]=`() = discard "index setter"
|
||||||
proc `putter=`() = discard cast[pointer](cast[int](buffer) + size)
|
proc `putter=`() = discard cast[pointer](cast[int](buffer) + size)
|
||||||
|
|
||||||
|
(not false)
|
||||||
|
|
||||||
|
let expr = if true: "true" else: "false"
|
||||||
|
|
||||||
|
var body = newNimNode(nnkIfExpr).add(
|
||||||
|
newNimNode(nnkElifBranch).add(
|
||||||
|
infix(newDotExpr(ident("a"), ident("kind")), "==", newDotExpr(ident("b"), ident("kind"))),
|
||||||
|
condition
|
||||||
|
),
|
||||||
|
newNimNode(nnkElse).add(newStmtList(newNimNode(nnkReturnStmt).add(ident("false"))))
|
||||||
|
)
|
||||||
|
|
||||||
|
# comment
|
||||||
|
|
||||||
|
var x = 1
|
||||||
|
|
||||||
type
|
type
|
||||||
GeneralTokenizer* = object of RootObj ## comment here
|
GeneralTokenizer* = object of RootObj ## comment here
|
||||||
kind*: TokenClass ## and here
|
kind*: TokenClass ## and here
|
||||||
|
|
|
||||||
|
|
@ -9,6 +9,24 @@ import verylongnamehere, verylongnamehere,
|
||||||
proc `[]=`() = discard "index setter"
|
proc `[]=`() = discard "index setter"
|
||||||
proc `putter=`() = discard cast[pointer](cast[int](buffer) + size)
|
proc `putter=`() = discard cast[pointer](cast[int](buffer) + size)
|
||||||
|
|
||||||
|
(not false)
|
||||||
|
|
||||||
|
let expr = if true: "true" else: "false"
|
||||||
|
|
||||||
|
var body = newNimNode(nnkIfExpr).add(
|
||||||
|
newNimNode(nnkElifBranch).add(
|
||||||
|
infix(newDotExpr(ident("a"), ident("kind")), "==", newDotExpr(ident("b"),
|
||||||
|
ident("kind"))),
|
||||||
|
condition
|
||||||
|
),
|
||||||
|
newNimNode(nnkElse).add(newStmtList(newNimNode(nnkReturnStmt).add(ident(
|
||||||
|
"false"))))
|
||||||
|
)
|
||||||
|
|
||||||
|
# comment
|
||||||
|
|
||||||
|
var x = 1
|
||||||
|
|
||||||
type
|
type
|
||||||
GeneralTokenizer* = object of RootObj ## comment here
|
GeneralTokenizer* = object of RootObj ## comment here
|
||||||
kind*: TokenClass ## and here
|
kind*: TokenClass ## and here
|
||||||
|
|
|
||||||
58
tests/arithm/tnot.nim
Normal file
58
tests/arithm/tnot.nim
Normal file
|
|
@ -0,0 +1,58 @@
|
||||||
|
discard """
|
||||||
|
output: '''
|
||||||
|
-5
|
||||||
|
-5
|
||||||
|
-5
|
||||||
|
-5
|
||||||
|
4
|
||||||
|
4
|
||||||
|
4
|
||||||
|
4
|
||||||
|
251
|
||||||
|
65531
|
||||||
|
4294967291
|
||||||
|
18446744073709551611
|
||||||
|
4
|
||||||
|
4
|
||||||
|
4
|
||||||
|
4
|
||||||
|
'''
|
||||||
|
"""
|
||||||
|
|
||||||
|
# Signed types
|
||||||
|
block:
|
||||||
|
const t0: int8 = not 4
|
||||||
|
const t1: int16 = not 4
|
||||||
|
const t2: int32 = not 4
|
||||||
|
const t3: int64 = not 4
|
||||||
|
const t4: int8 = not -5
|
||||||
|
const t5: int16 = not -5
|
||||||
|
const t6: int32 = not -5
|
||||||
|
const t7: int64 = not -5
|
||||||
|
echo t0
|
||||||
|
echo t1
|
||||||
|
echo t2
|
||||||
|
echo t3
|
||||||
|
echo t4
|
||||||
|
echo t5
|
||||||
|
echo t6
|
||||||
|
echo t7
|
||||||
|
|
||||||
|
# Unsigned types
|
||||||
|
block:
|
||||||
|
const t0: uint8 = not 4'u8
|
||||||
|
const t1: uint16 = not 4'u16
|
||||||
|
const t2: uint32 = not 4'u32
|
||||||
|
const t3: uint64 = not 4'u64
|
||||||
|
const t4: uint8 = not 251'u8
|
||||||
|
const t5: uint16 = not 65531'u16
|
||||||
|
const t6: uint32 = not 4294967291'u32
|
||||||
|
const t7: uint64 = not 18446744073709551611'u64
|
||||||
|
echo t0
|
||||||
|
echo t1
|
||||||
|
echo t2
|
||||||
|
echo t3
|
||||||
|
echo t4
|
||||||
|
echo t5
|
||||||
|
echo t6
|
||||||
|
echo t7
|
||||||
34
tests/arithm/tshl.nim
Normal file
34
tests/arithm/tshl.nim
Normal file
|
|
@ -0,0 +1,34 @@
|
||||||
|
discard """
|
||||||
|
output: '''
|
||||||
|
0
|
||||||
|
0
|
||||||
|
1
|
||||||
|
1
|
||||||
|
0
|
||||||
|
0
|
||||||
|
0
|
||||||
|
1
|
||||||
|
'''
|
||||||
|
"""
|
||||||
|
|
||||||
|
# Signed types
|
||||||
|
block:
|
||||||
|
const t0: int8 = 1'i8 shl 8
|
||||||
|
const t1: int16 = 1'i16 shl 16
|
||||||
|
const t2: int32 = 1'i32 shl 32
|
||||||
|
const t3: int64 = 1'i64 shl 64
|
||||||
|
echo t0
|
||||||
|
echo t1
|
||||||
|
echo t2
|
||||||
|
echo t3
|
||||||
|
|
||||||
|
# Unsigned types
|
||||||
|
block:
|
||||||
|
const t0: uint8 = 1'u8 shl 8
|
||||||
|
const t1: uint16 = 1'u16 shl 16
|
||||||
|
const t2: uint32 = 1'u32 shl 32
|
||||||
|
const t3: uint64 = 1'u64 shl 64
|
||||||
|
echo t0
|
||||||
|
echo t1
|
||||||
|
echo t2
|
||||||
|
echo t3
|
||||||
Loading…
Add table
Add a link
Reference in a new issue