bugfix: duplicate gtk2.set_tab_pos
This commit is contained in:
parent
3ff6354a7c
commit
0d63b2519b
4 changed files with 17 additions and 18 deletions
|
|
@ -1,4 +1,4 @@
|
||||||
# Example program to show the new parsexml module
|
# Example program to show the parsexml module
|
||||||
# This program reads an HTML file and writes its title to stdout.
|
# This program reads an HTML file and writes its title to stdout.
|
||||||
# Errors and whitespace are ignored.
|
# Errors and whitespace are ignored.
|
||||||
|
|
||||||
|
|
@ -31,6 +31,6 @@ while true:
|
||||||
of xmlEof: break # end of file reached
|
of xmlEof: break # end of file reached
|
||||||
else: nil # ignore other events
|
else: nil # ignore other events
|
||||||
|
|
||||||
quit("Could not determine title!")
|
|
||||||
x.close()
|
x.close()
|
||||||
|
quit("Could not determine title!")
|
||||||
|
|
||||||
|
|
|
||||||
|
|
@ -7732,7 +7732,6 @@ proc set_homogeneous*(a: PNotebook, `homogeneous`: guint)
|
||||||
proc show_border*(a: PNotebook): guint
|
proc show_border*(a: PNotebook): guint
|
||||||
proc set_show_border*(a: PNotebook, `show_border`: guint)
|
proc set_show_border*(a: PNotebook, `show_border`: guint)
|
||||||
proc tab_pos*(a: PNotebook): guint
|
proc tab_pos*(a: PNotebook): guint
|
||||||
proc set_tab_pos*(a: PNotebook, `tab_pos`: guint)
|
|
||||||
proc scrollable*(a: PNotebook): guint
|
proc scrollable*(a: PNotebook): guint
|
||||||
proc set_scrollable*(a: PNotebook, `scrollable`: guint)
|
proc set_scrollable*(a: PNotebook, `scrollable`: guint)
|
||||||
proc in_child*(a: PNotebook): guint
|
proc in_child*(a: PNotebook): guint
|
||||||
|
|
@ -14219,11 +14218,6 @@ proc tab_pos*(a: PNotebook): guint =
|
||||||
result = (a.Notebookflag0 and bm_TGtkNotebook_tab_pos) shr
|
result = (a.Notebookflag0 and bm_TGtkNotebook_tab_pos) shr
|
||||||
bp_TGtkNotebook_tab_pos
|
bp_TGtkNotebook_tab_pos
|
||||||
|
|
||||||
proc set_tab_pos*(a: PNotebook, `tab_pos`: guint) =
|
|
||||||
a.Notebookflag0 = a.Notebookflag0 or
|
|
||||||
(int16(`tab_pos` shl bp_TGtkNotebook_tab_pos) and
|
|
||||||
bm_TGtkNotebook_tab_pos)
|
|
||||||
|
|
||||||
proc scrollable*(a: PNotebook): guint =
|
proc scrollable*(a: PNotebook): guint =
|
||||||
result = (a.Notebookflag0 and bm_TGtkNotebook_scrollable) shr
|
result = (a.Notebookflag0 and bm_TGtkNotebook_scrollable) shr
|
||||||
bp_TGtkNotebook_scrollable
|
bp_TGtkNotebook_scrollable
|
||||||
|
|
|
||||||
|
|
@ -22,13 +22,12 @@ proc semTemplateExpr(c: PContext, n: PNode, s: PSym,
|
||||||
|
|
||||||
proc semFieldAccess(c: PContext, n: PNode, flags: TExprFlags = {}): PNode
|
proc semFieldAccess(c: PContext, n: PNode, flags: TExprFlags = {}): PNode
|
||||||
proc semExprWithType(c: PContext, n: PNode, flags: TExprFlags = {}): PNode =
|
proc semExprWithType(c: PContext, n: PNode, flags: TExprFlags = {}): PNode =
|
||||||
var d: PNode
|
|
||||||
result = semExpr(c, n, flags)
|
result = semExpr(c, n, flags)
|
||||||
if result == nil: InternalError("semExprWithType")
|
if result == nil: InternalError("semExprWithType")
|
||||||
if (result.typ == nil):
|
if (result.typ == nil):
|
||||||
liMessage(n.info, errExprXHasNoType, renderTree(result, {renderNoComments}))
|
liMessage(n.info, errExprXHasNoType, renderTree(result, {renderNoComments}))
|
||||||
if result.typ.kind == tyVar:
|
if result.typ.kind == tyVar:
|
||||||
d = newNodeIT(nkHiddenDeref, result.info, result.typ.sons[0])
|
var d = newNodeIT(nkHiddenDeref, result.info, result.typ.sons[0])
|
||||||
addSon(d, result)
|
addSon(d, result)
|
||||||
result = d
|
result = d
|
||||||
|
|
||||||
|
|
@ -39,13 +38,7 @@ proc semSym(c: PContext, n: PNode, s: PSym, flags: TExprFlags): PNode =
|
||||||
of skProc, skMethod, skIterator, skConverter:
|
of skProc, skMethod, skIterator, skConverter:
|
||||||
if not (sfProcVar in s.flags) and (s.typ.callConv == ccDefault) and
|
if not (sfProcVar in s.flags) and (s.typ.callConv == ccDefault) and
|
||||||
(getModule(s).id != c.module.id):
|
(getModule(s).id != c.module.id):
|
||||||
liMessage(n.info, warnXisPassedToProcVar, s.name.s)
|
liMessage(n.info, errXCannotBePassedToProcVar, s.name.s)
|
||||||
# XXX change this to
|
|
||||||
# errXCannotBePassedToProcVar after version 0.8.2
|
|
||||||
# TODO VERSION 0.8.4
|
|
||||||
#if (s.magic <> mNone) then
|
|
||||||
# liMessage(n.info,
|
|
||||||
# errInvalidContextForBuiltinX, s.name.s);
|
|
||||||
result = symChoice(c, n, s)
|
result = symChoice(c, n, s)
|
||||||
of skConst:
|
of skConst:
|
||||||
#
|
#
|
||||||
|
|
@ -109,7 +102,7 @@ proc checkConvertible(info: TLineInfo, castDest, src: PType) =
|
||||||
checkConversionBetweenObjects(info, d, s)
|
checkConversionBetweenObjects(info, d, s)
|
||||||
elif (skipTypes(castDest, abstractVarRange).Kind in IntegralTypes) and
|
elif (skipTypes(castDest, abstractVarRange).Kind in IntegralTypes) and
|
||||||
(skipTypes(src, abstractVarRange).Kind in IntegralTypes):
|
(skipTypes(src, abstractVarRange).Kind in IntegralTypes):
|
||||||
# accept conversion between intregral types
|
# accept conversion between integral types
|
||||||
else:
|
else:
|
||||||
# we use d, s here to speed up that operation a bit:
|
# we use d, s here to speed up that operation a bit:
|
||||||
case cmpTypes(d, s)
|
case cmpTypes(d, s)
|
||||||
|
|
|
||||||
12
web/news.txt
12
web/news.txt
|
|
@ -2,6 +2,18 @@
|
||||||
News
|
News
|
||||||
====
|
====
|
||||||
|
|
||||||
|
2010-XX-XX Version 0.8.10 released
|
||||||
|
==================================
|
||||||
|
|
||||||
|
|
||||||
|
Changes affecting backwards compatibility
|
||||||
|
-----------------------------------------
|
||||||
|
|
||||||
|
- Procs not marked as ``procvar`` cannot only be passed to a procvar anymore,
|
||||||
|
unless they are used in the same module.
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
2010-03-14 Version 0.8.8 released
|
2010-03-14 Version 0.8.8 released
|
||||||
=================================
|
=================================
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue