|
From: shelarcy <she...@gm...> - 2009-03-12 18:33:22
|
DarcsURL: C:/home/shelarcy/wxhaskell
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="=_"
--=_
Content-Type: text/plain
Content-Transfer-Encoding: quoted-printable
Fri Mar 13 02:13:45 =93=8C=8B=9E (=95W=8F=80=8E=9E) 2009 shelarcy <shelarc=
y...@gm...>
* Fix typo in previous Refactor to return wxPoint/wxSize/wxRect class dir=
ectly patch.
Fri Mar 13 02:19:34 =93=8C=8B=9E (=95W=8F=80=8E=9E) 2009 shelarcy <shelarc=
y...@gm...>
* Change Color type function to be more flexible.
Fri Mar 13 03:15:17 =93=8C=8B=9E (=95W=8F=80=8E=9E) 2009 shelarcy <shelarc=
y...@gm...>
* Use filepath package instead of defining same functionality (dirSep and=
pathSep are deprecated now).
--=_
Content-Type: text/x-darcs-patch; name="fix-typo-in-previous-refactor-to-return-wxpoint_wxsize_wxrect-class-directly-patch_.dpatch"
Content-Transfer-Encoding: quoted-printable
Content-Description: A darcs patch for your repository!
New patches:
[Fix typo in previous Refactor to return wxPoint/wxSize/wxRect class direct=
ly patch.
shelarcy <she...@gm...>**20090312171345
Ignore-this: 9788064c548976d584252389fb26191d
] {
hunk ./wxc/include/wxc_glue.h 2212
TBool wxGrid_CanDragGridSize( TSelf(wxGrid) _obj );=0D
TBool wxGrid_CanDragRowSize( TSelf(wxGrid) _obj );=0D
TBool wxGrid_CanEnableCellControl( TSelf(wxGrid) _obj );=0D
-TClass(wxRect) wxGrid_CellToRect( TSelf(wxGrid) _obj, int row, int col )=
=0D
+TClass(wxRect) wxGrid_CellToRect( TSelf(wxGrid) _obj, int row, int col );=
=0D
void wxGrid_ClearGrid( TSelf(wxGrid) _obj );=0D
void wxGrid_ClearSelection( TSelf(wxGrid) _obj );=0D
TClass(wxGrid) wxGrid_Create( TClass(wxWindow) _prt, int _id, TRect(_lft,_=
top,_wdt,_hgt), int _stl );=0D
hunk ./wxc/include/wxc_glue.h 4930
void wxWizard_Chain( TClass(wxWizardPageSimple) f, TClass(wxWizardPa=
geSimple) s );=0D
TClass(wxWizard) wxWizard_Create( TClass(wxWindow) _prt, int _id, TClass(w=
xString) _txt, TClass(wxBitmap) _bmp, TRect(_lft,_top,_wdt,_hgt) );=0D
TClass(wxWizardPage) wxWizard_GetCurrentPage( TSelf(wxWizard) _obj );=0D
-void wxWizard_GetPageSize( TSelf(wxWizard) _obj, TSizeOutVoid(_w,_h)=
);=0D
-int wxWizard_RunWizard( TSelf(wxWizard) _obj, TClass(wxWizardPage) =
firstPage );=0D
TClass(wxSize) wxWizard_GetPageSize( TSelf(wxWizard) _obj );=0D
hunk ./wxc/include/wxc_glue.h 4931
+int wxWizard_RunWizard( TSelf(wxWizard) _obj, TClass(wxWizardPage) =
firstPage );=0D
+void wxWizard_SetPageSize( TSelf(wxWizard) _obj, TSize(w,h) );=0D
=0D
/* wxWizardEvent */=0D
TClassDefExtend(wxWizardEvent,wxNotifyEvent)=0D
}
[Change Color type function to be more flexible.
shelarcy <she...@gm...>**20090312171934
Ignore-this: 5e778e86a6123c8f77ef92cebbac5ca8
] {
hunk ./wxcore/src/Graphics/UI/WXCore/Dialogs.hs 182
colorDialog :: Window a -> Color -> IO (Maybe Color)
colorDialog parent color
=3D do c <- getColourFromUser parent color
- if (colorOk c)
+ if (colorIsOk c)
then return (Just c)
else return Nothing
=
hunk ./wxcore/src/Graphics/UI/WXCore/Image.hs 244
return (convert rgbs)
where
convert :: [Word8] -> [Color]
- convert (r:g:b:xs) =3D colorRGB (intFromWord8 r) (intFromWord8 g) (in=
tFromWord8 b): convert xs
+ convert (r:g:b:xs) =3D colorRGB r g b : convert xs
convert [] =3D []
=
hunk ./wxcore/src/Graphics/UI/WXCore/Image.hs 247
-intFromWord8 :: Word8 -> Int =
-intFromWord8 c =3D fromIntegral c
-
-intToWord8 :: Int -> Word8
-intToWord8 i =3D fromIntegral i
-
-- | Set all the pixels of a pixel buffer.
pixelBufferSetPixels :: PixelBuffer -> [Color] -> IO ()
pixelBufferSetPixels (PixelBuffer owned (Size w h) buffer) colors
hunk ./wxcore/src/Graphics/UI/WXCore/Image.hs 254
pokeArray buffer (convert (take count colors))
where
convert :: [Color] -> [Word8]
- convert (c:cs) =3D intToWord8 (colorRed c) : intToWord8 (colorGreen c)=
: intToWord8 (colorBlue c) : convert cs
+ convert (c:cs) =3D colorRed c : colorGreen c : colorBlue c : convert c=
s
convert [] =3D []
=
-- | Initialize the pixel buffer with a grey color. The second argument
hunk ./wxcore/src/Graphics/UI/WXCore/Image.hs 268
pixelBufferSetPixel (PixelBuffer owned size buffer) point color
=3D {-
do let idx =3D 3*(y*w + x)
- r =3D intToWord8 (colorRed color)
- g =3D intToWord8 (colorGreen color)
- b =3D intToWord8 (colorBlue color)
+ r =3D colorRed color
+ g =3D colorGreen color
+ b =3D colorBlue color
pokeByteOff buffer idx r
pokeByteOff buffer (idx+1) g
pokeByteOff buffer (idx+2) b
hunk ./wxcore/src/Graphics/UI/WXCore/Image.hs 286
r <- peekByteOff buffer idx
g <- peekByteOff buffer (idx+1)
b <- peekByteOff buffer (idx+2)
- return (colorRGB (intFromWord8 r) (intFromWord8 g) (intFromWord8 b)=
)
+ return (colorRGB r g b)
-}
do rgb <- wxcGetPixelRGB buffer (sizeW size) point
return (colorFromInt rgb)
hunk ./wxcore/src/Graphics/UI/WXCore/Types.hs 53
, toCBool, fromCBool
=
-- ** Colors
- , Color, rgb, colorRGB, colorRed, colorGreen, colorBlue, intFr=
omColor, colorFromInt, colorOk
+ , Color, rgb, colorRGB, colorRed, colorGreen, colorBlue, intFr=
omColor, colorFromInt, colorIsOk, colorOk
, black, darkgrey, dimgrey, mediumgrey, grey, lightgrey, white
, red, green, blue
, cyan, magenta, yellow
hunk ./wxcore/src/Graphics/UI/WXCore/WxcTypes.hs 51
=
-- ** Color
, Color(..), rgb, colorRGB, rgba, colorRGBA, colorRed, colorGr=
een, colorBlue, colorAlpha
- , intFromColor, colorFromInt, wordFromColor, colorFromWord, co=
lorOk
+ , intFromColor, colorFromInt, fromColor, toColor, colorOk, col=
orIsOk
=
-- * Marshalling
-- ** Basic types
hunk ./wxcore/src/Graphics/UI/WXCore/WxcTypes.hs 68
=
, colourFromColor, colorFromColour
, colourCreate, colourSafeDelete -- , colourCreateRGB, colourR=
ed, colourGreen, colourBlue colourAlpha
- , toWord8ColorRed, toWord8ColorGreen, toWord8ColorBlue, toWord=
8ColorAlpha
=
=
-- ** Managed object types
hunk ./wxcore/src/Graphics/UI/WXCore/WxcTypes.hs 1261
showChar ')' )
=
-- | Create a color from a red\/green\/blue triple.
-colorRGB :: Int -> Int -> Int -> Color
+colorRGB :: (Integral a) =3D> a -> a -> a -> Color
colorRGB r g b =3D Color (shiftL (fromIntegral r) 24 .|. shiftL (fromInteg=
ral g) 16 .|. shiftL (fromIntegral b) 8 .|. 255)
=
-- | Create a color from a red\/green\/blue triple.
hunk ./wxcore/src/Graphics/UI/WXCore/WxcTypes.hs 1265
-rgb :: Int -> Int -> Int -> Color
+rgb :: (Integral a) =3D> a -> a -> a -> Color
rgb r g b =3D colorRGB r g b
=
-- | Create a color from a red\/green\/blue\/alpha quadruple.
hunk ./wxcore/src/Graphics/UI/WXCore/WxcTypes.hs 1269
-colorRGBA :: Int -> Int -> Int -> Int -> Color
+colorRGBA :: (Integral a) =3D> a -> a -> a -> a -> Color
colorRGBA r g b a =3D Color (shiftL (fromIntegral r) 24 .|. shiftL (fromIn=
tegral g) 16 .|. shiftL (fromIntegral b) 8 .|. (fromIntegral a))
=
-- | Create a color from a red\/green\/blue\/alpha quadruple.
hunk ./wxcore/src/Graphics/UI/WXCore/WxcTypes.hs 1273
-rgba :: Int -> Int -> Int -> Int -> Color
+rgba :: (Integral a) =3D> a -> a -> a -> a -> Color
rgba r g b a =3D colorRGBA r g b a
=
=
hunk ./wxcore/src/Graphics/UI/WXCore/WxcTypes.hs 1294
b =3D rgb .&. 0xFF
in colorRGB r g b
=
--- | Return an 'Int' where the three least significant bytes contain
--- the red, green, and blue component of a color.
-wordFromColor :: Color -> Word
-wordFromColor (Color rgb)
- =3D rgb
+-- | Return an 'Num' class's numeric representation where the three
+-- least significant the red, green, and blue component of a color.
+fromColor :: (Num a) =3D> Color -> a
+fromColor (Color rgb)
+ =3D fromIntegral rgb
=
hunk ./wxcore/src/Graphics/UI/WXCore/WxcTypes.hs 1300
--- | Set the color according to an rgba unsigned integer. (see 'rgbaIntFro=
mColor').
-colorFromWord :: Word -> Color
-colorFromWord rgb
- =3D Color rgb
+-- | Set the color according to 'Integral' class's numeric representation.
+-- (see 'rgbaIntFromColor').
+toColor :: (Integral a) =3D> a -> Color
+toColor
+ =3D Color . fromIntegral
=
hunk ./wxcore/src/Graphics/UI/WXCore/WxcTypes.hs 1306
+-- marshalling 1
-- | Returns a red color component
hunk ./wxcore/src/Graphics/UI/WXCore/WxcTypes.hs 1308
-colorRed :: Color -> Int
+colorRed :: (Num a) =3D> Color -> a
colorRed (Color rgba) =3D fromIntegral ((shiftR rgba 24) .&. 0xFF)
=
-- | Returns a green color component
hunk ./wxcore/src/Graphics/UI/WXCore/WxcTypes.hs 1312
-colorGreen :: Color -> Int
+colorGreen :: (Num a) =3D> Color -> a
colorGreen (Color rgba) =3D fromIntegral ((shiftR rgba 16) .&. 0xFF)
=
-- | Returns a blue color component
hunk ./wxcore/src/Graphics/UI/WXCore/WxcTypes.hs 1316
-colorBlue :: Color -> Int
+colorBlue :: (Num a) =3D> Color -> a
colorBlue (Color rgba) =3D fromIntegral ((shiftR rgba 8) .&. 0xFF)
=
-- | Returns a alpha channel component
hunk ./wxcore/src/Graphics/UI/WXCore/WxcTypes.hs 1320
-colorAlpha :: Color -> Int
+colorAlpha :: (Num a) =3D> Color -> a
colorAlpha (Color rgba) =3D fromIntegral (rgba .&. 0xFF)
=
=
hunk ./wxcore/src/Graphics/UI/WXCore/WxcTypes.hs 1329
colorNull
=3D Color (-1)
=
--- | Check of a color is valid (@Colour::Ok@)
+{-# DEPRECATED colorOk "Use colorIsOk instead" #-}
+-- | deprecated: use 'colorIsOk' instead.
colorOk :: Color -> Bool
hunk ./wxcore/src/Graphics/UI/WXCore/WxcTypes.hs 1332
-colorOk (Color rgb)
- =3D (rgb >=3D 0)
+colorOk =3D colorIsOk
=
hunk ./wxcore/src/Graphics/UI/WXCore/WxcTypes.hs 1334
+-- | Check of a color is valid (@Colour::IsOk@)
+colorIsOk :: Color -> Bool
+colorIsOk (Color rgb)
+ =3D (rgb >=3D 0)
=
hunk ./wxcore/src/Graphics/UI/WXCore/WxcTypes.hs 1339
--- marshalling 1
-toWord8ColorRed, toWord8ColorGreen, toWord8ColorBlue, toWord8ColorAlpha ::=
Color -> Word8
-toWord8ColorRed c =3D fromIntegral (colorRed c)
-toWord8ColorGreen c =3D fromIntegral (colorGreen c)
-toWord8ColorBlue c =3D fromIntegral (colorBlue c)
-toWord8ColorAlpha c =3D fromIntegral (colorAlpha c)
=
-- marshalling 2
{-
hunk ./wxcore/src/Graphics/UI/WXCore/WxcTypes.hs 1359
if (ok=3D=3D0)
then return colorNull
else do rgba <- colourGetUnsignedInt pcolour
- return (colorFromWord rgba)
+ return (toColor rgba)
colourSafeDelete pcolour
return color
=
hunk ./wxcore/src/Graphics/UI/WXCore/WxcTypes.hs 1370
=
withColourPtr :: Color -> (Ptr (TColour a) -> IO b) -> IO b
withColourPtr c f
- =3D do pcolour <- colourCreateFromUnsignedInt (wordFromColor c)
+ =3D do pcolour <- colourCreateFromUnsignedInt (fromColor c)
x <- f pcolour
colourSafeDelete pcolour
return x
hunk ./wxcore/src/Graphics/UI/WXCore/WxcTypes.hs 1378
colourFromColor :: Color -> IO (Colour ())
colourFromColor c
=3D if (colorOk c)
- then do p <- colourCreateFromUnsignedInt (wordFromColor c)
+ then do p <- colourCreateFromUnsignedInt (fromColor c)
if (colourIsStatic p)
then return (objectFromPtr p)
else do mp <- wxManagedPtr_CreateFromColour p
hunk ./wxcore/src/Graphics/UI/WXCore/WxcTypes.hs 1393
if (ok=3D=3D0)
then return colorNull
else do rgba <- colourGetUnsignedInt pcolour
- return (colorFromWord rgba)
+ return (toColor rgba)
=
=
foreign import ccall "wxColour_CreateEmpty" colourCreate :: IO (Ptr (TC=
olour a))
hunk ./wxdirect/src/CompileClasses.hs 468
++ pparens ("toCDoubleRectW " ++ name) ++ " " ++ pparen=
s( "toCDoubleRectH " ++ name)
Rect _ -> pparens ("toCIntRectX " ++ name) ++ " " ++ pparens( "toC=
IntRectY " ++ name)
++ pparens ("toCIntRectW " ++ name) ++ " " ++ pparens( "=
toCIntRectH " ++ name)
- ColorRGB _ -> pparens ("toWord8ColorRed " ++ name) ++ " " =
- ++ pparens ("toWord8ColorGreen " ++ name) ++ " "
- ++ pparens ("toWord8ColorBlue " ++ name) =
+ ColorRGB _ -> pparens ("colorRed " ++ name) ++ " " =
+ ++ pparens ("colorGreen " ++ name) ++ " "
+ ++ pparens ("colorBlue " ++ name) =
=
ArrayString _ -> haskellArrayLenName name ++ " " ++ haskellArray=
Name name
ArrayObject tp _ -> haskellArrayLenName name ++ " " ++ haskellArray=
Name name
}
[Use filepath package instead of defining same functionality (dirSep and pa=
thSep are deprecated now).
shelarcy <she...@gm...>**20090312181517
Ignore-this: d39415c33e3c0f4a4326b4e29a9fe3a1
] {
hunk ./configure 693
basepkgversion=3D`ghc-pkg latest base`
haskell98pkgversion=3D`ghc-pkg latest haskell98`
=
+# Test if we can include the filepath package explicitly
+$hcpkg describe filepath > /dev/null 2> /dev/null
+case $? in
+ 0) filepathpkgversion=3D`ghc-pkg latest filepath`
+ pkgfilepath=3D"-package $filepathpkgversion";;
+ *) pkgfilepath=3D"";;
+esac
+
# Test if we can include the bytestring package explicitly
$hcpkg describe bytestring > /dev/null 2> /dev/null
case $? in
hunk ./configure 974
# Packages
PKG-BYTESTRING=3D$pkgbytestring
PKG-CONTAINERS=3D$pkgcontainers
+PKG-FILEPATH=3D$pkgfilepath
PKG-PARSEC=3D$pkgparsec
PKG-TIME=3D$pkgtime
PKG-STM=3D$pkgstm
hunk ./configure 1083
Graphics.UI.WXCore.WxcClassesMZ
hs-libraries:wxcore,wxcore0,wxcore1,wxcore2
extra-libraries:${wxclibname}-${binversion}
-depends: ${wxcoredepends}, $haskell98pkgversion, $bytestringpkgversion, $s=
tmpkgversion
+depends: ${wxcoredepends}, $haskell98pkgversion, $filepathpkgversion, $byt=
estringpkgversion, $stmpkgversion
extra-ld-opts:$extraldopts
EOF
tr -d \\r < config/wxcore-partial.pkg > config/wxcore.pkg
hunk ./makefile 524
WXCORE-BINS =3D$(WXCORE-HIS) $(WXCORE-LIBS)
WXCORE-PROF-BINS =3D$(WXCORE-PROF-HIS) $(WXCORE-PROF-LIBS)
WXCORE-DOCS =3D$(filter-out $(WXCORE-SRCDIR)/$(WXCORE-HPATH)/IntMap.hs,$(W=
XCORE-HS))
-WXCORE-HCFLAGS =3D$(HCFLAGS) $(PKG-BYTESTRING) $(PKG-CONTAINERS) $(PKG-STM=
) -package-name $(WXCORE)-$(VERSION)
+WXCORE-HCFLAGS =3D$(HCFLAGS) $(PKG-BYTESTRING) $(PKG-CONTAINERS) $(PKG-FIL=
EPATH) $(PKG-STM) -package-name $(WXCORE)-$(VERSION)
=
=
# build main library
hunk ./samples/wx/FileBrowse.hs 15
=
import Directory
import List( zip3 )
+import System.FilePath
import Graphics.UI.WX
import Graphics.UI.WXCore =
=
hunk ./samples/wx/FileBrowse.hs 227
getRootDir :: IO (FilePath,FilePath)
getRootDir
=3D do current <- getCurrentDirectory
- let isDirSep c =3D (c =3D=3D '\\' || c =3D=3D '/')
- rootName =3D takeWhile (not . isDirSep) current
+ let rootName =3D takeWhile (not . isPathSeparator) current
rootPath =3D rootName ++ "/"
exist <- do{ getDirectoryContents rootPath; return True } `catch` \=
err -> return False
if exist
hunk ./samples/wx/FileBrowse.hs 232
then return (rootPath,rootName)
- else return (current ++ "/", reverse (takeWhile (not . isDirSep) (=
reverse current)))
+ else return (current ++ "/", reverse (takeWhile (not . isPathSepar=
ator) (reverse current)))
hunk ./wxcore.cabal 19
Library
if flag(splitBase)
build-depends: base >=3D 3, array, containers, directory,
- bytestring, parsec, old-time, time, stm
+ filepath, bytestring, parsec,
+ old-time, time, stm
else
hunk ./wxcore.cabal 22
- build-depends: base < 3, bytestring, parsec, time, stm
+ build-depends: base < 3, filepath, bytestring, parsec,
+ time, stm
Exposed-Modules:
Graphics.UI.WXCore
Graphics.UI.WXCore.WxcObject
hunk ./wxcore/src/Graphics/UI/WXCore/Defines.hs 22
) where
=
import System.Directory
+import System.FilePath
import Graphics.UI.WXCore.WxcClasses
import System.IO.Unsafe( unsafePerformIO )
=
hunk ./wxcore/src/Graphics/UI/WXCore/Defines.hs 93
if exist
then return fname
else do appdir <- getApplicationDir
- let appdirfname =3D appdir ++ dirSep ++ fname
+ let appdirfname =3D appdir </> fname
exist <- doesFileExist appdirfname
if exist
then return appdirfname
hunk ./wxcore/src/Graphics/UI/WXCore/Defines.hs 98
else do cwd <- getCurrentDirectory =
- let cwdfname =3D cwd ++ dirSep ++ fname
+ let cwdfname =3D cwd </> fname
exist <- doesFileExist cwdfname
if exist
then return cwdfname
hunk ./wxcore/src/Graphics/UI/WXCore/Defines.hs 104
else return fname
=
--- | Native directory separator (@\\@ on windows, @\/@ on unix's)
+{-# DEPRECATED dirSep "Use System.FilePath module and/or its module's path=
Separator instead" #-}
+-- | deprecated: Use System.FilePath module and/or its module\'s 'pathSepa=
rator' instead.
dirSep :: String
dirSep
=3D case wxToolkit of
hunk ./wxcore/src/Graphics/UI/WXCore/Defines.hs 112
WxMSW -> "\\"
other -> "/"
=
--- | Native path separator (@;@ on windows, @:@ on unix's)
+{-# DEPRECATED pathSep "Use System.FilePath module's searchPathSeparator i=
nstead" #-}
+-- | deprecated: Use System.FilePath module\'s 'searchPathSeparator' inste=
ad.
pathSep :: String
pathSep
=3D case wxToolkit of
}
Context:
[Refactor to return wxPoint/wxSize/wxRect class directly in wxc.
shelarcy <she...@gm...>**20090310053838
Ignore-this: e414ff89344e856a3f61a0e6f318c427
We accept to return wxPoint, wxSize and wxRect class directly in wxc, now.
=
We always used passing int* pointer arguments to return Point, Size and Re=
ct
type, previously. But this convention is complex. We sometimes mistook to
return wxPoint, wxSize and wxRect. Its mistake causes problems.
=
So, we accept to return wxPoint, wxSize and wxRect now. And we refactor so=
me
old code to return these types, to show we can return these types now.
] =
[Bump version number to 0.11.1.2.
shelarcy <she...@gm...>**20090305140242
Ignore-this: f13691126a6cf23247b66e55488065dd
] =
[Fix: previous Refactor to use C++ bool directly patch causes build error o=
n Linux.
shelarcy <she...@gm...>**20090305125306
Ignore-this: 7059932f64f20392ceee48d255d31045
] =
[Fix: wxHaskell documents refer to old sourceforge's web page.
shelarcy <she...@gm...>**20090301075411
Ignore-this: e2228b995afcf476bcd3e02195519ba8
] =
[Add to generate Readme.txt file for source distribution.
shelarcy <she...@gm...>**20090301075126
Ignore-this: fc749fdadbd9e49b38682acbab85e6c
] =
[Refactor to use C++ bool directoly, instead of casting to int type and con=
verting to bool type.
shelarcy <she...@gm...>**20090228023601
=
We cast int type where wxWidgets' method returns bool type, and
we convert int to bool where wxWidgets method's argument is bool.
=
But some new wxc code uses bool type directly. This causes
problems.
=
So, we changed to use bool type directly everwhere in wxc code.
We hope this change avoid to occur problem and fixes a few bugs.
] =
[Change version number from 0.11.1 to 0.11.1.0.
shelarcy <she...@gm...>**20090227150124
Ignore-this: c6772c8eac4bd552702e469b76a3101a
] =
[Fix: managed.cpp causes problem on Linux (Debian and Ubuntu) platform.
shelarcy <she...@gm...>**20090115080604
=
MERGED: manage to run managed.cpp on ubuntu
r21 | snmsts | 2009-01-10 05:49:49 +0900 (Sat, 10 1 2009)
from Subversion repository at http://snmsts.dreamhosters.com/wxc
=
This change probably fixes #1924535.
See http://snmsts.dreamhosters.com/diary/index.cgi?routine=3Done&name=3D20=
09-01-08-1756
(Note: This page isn't English page. This page is written in Japanese.) =
] =
[Add int / C++ bool conversion function in wxc.
shelarcy <she...@gm...>**20090113135754
Ignore-this: 83a08a3687437074e79f8c8da12c1626
] =
[Remove unused eljtreectrl.cpp.
shelarcy <she...@gm...>**20090113104755
Ignore-this: a64b576e93152ebe3474c368fcfc03e9
] =
[Refactor to use wxString instead of calling WString (wxChar) directly.
shelarcy <she...@gm...>**20090113094641
=
This change will be easy to add encoding mode. wxWidget 2.9 and 3.0 will
support to build UTF-8 mode. If we use wxChar directly, we must change
many part to support this build mode.
=
http://www.wxwidgets.org/develop/roadmap.htm
=
And we think we get some advantages from this change. utf8-string package
only support UTF-8, so we want to use full unicode support we must write
UTF-8 <-> UTF-16 <-> UTF-32 conversion layer, or we must support new UTF-8
build mode.
=
(C++0x and C1x will support new string charactor set types, char16_t and
char32_t. Haskell and wxWidgets will support these types if compiler
(e.g. gcc, VC) support theirs. If we use abstract layer to use string,
we can extend wxHaskell support soonly when compiler and library change.) =
] =
[Use wxString_Length function instead of getting wxString twice.
shelarcy <she...@gm...>**20090108142643
Ignore-this: 2160aa7a6c9e4b5ed07ea0f17be20332
] =
[Fix typos in previous color's alpha channel support.
shelarcy <she...@gm...>**20090107021037
Ignore-this: 710e1ec9472142465ed050c97e49892d
] =
[Add experimental alpha channel support to Color type.
shelarcy <she...@gm...>**20090106182310
Ignore-this: 6c35ed5d80bed81134a6110cd9cfb60a
] =
[Add Word support.
shelarcy <she...@gm...>**20090106171139
Ignore-this: 81376472899f15f9724f724b656c251d
] =
[Change Color's primitive type from CChar to Word8.
shelarcy <she...@gm...>**20090106151818
Ignore-this: a63da969a83ee42f141db3797b824fc8
] =
[Add Word8 and Word32 support.
shelarcy <she...@gm...>**20090106141358
Ignore-this: 704189efa0ea7576c4752df6d9a39faf
] =
[Bump version number to 0.11.1
shelarcy <she...@gm...>**20090106132911
Ignore-this: d945970996e6812d312a0592c2ff2b6e
] =
[Remove unused wxWidgets 2.4 and 2.6's Visual Studio project files.
shelarcy <she...@gm...>**20090105012854
Ignore-this: 20cc431e49694e048d1d676170200ed6
] =
[TAG 0.11.0
shelarcy <she...@gm...>**20090102223052] =
Patch bundle hash:
d3052b25488a4758ab2211339789277ab95292b8
--=_--
.
|