ply-loader 0.4 → 0.4.1

raw patch · 4 files changed

+23/−9 lines, 4 files

Files

CHANGELOG.md +13/−0
ply-loader.cabal +2/−1
src/PLY/Internal/Parsers.hs +8/−8
src/PLY/Types.hs +0/−0

+ CHANGELOG.md view

@@ -0,0 +1,13 @@+0.4.1+---++* Support parsing of alternate scalar type names: `int8`, `uint8`,+`int16`, etc.++0.4+---++* Fix ASCII parsing of list properties.++This addresses problems parsing `face` elements, wherein each face is+defined by a list of vertex indices.

ply-loader.cabal view

@@ -1,5 +1,5 @@ name:                ply-loader-version:             0.4+version:             0.4.1 synopsis:            PLY file loader.  description:         PLY is a lightweight file format for representing 3D@@ -25,6 +25,7 @@ category:            Graphics build-type:          Simple cabal-version:       >=1.10+extra-source-files:  CHANGELOG.md  source-repository head   type: git

src/PLY/Internal/Parsers.hs view

@@ -50,14 +50,14 @@  scalarType :: Parser ScalarT scalarType = choice $-             [ "char "   *> pure Tchar-             , "uchar "  *> pure Tuchar-             , "short "  *> pure Tshort-             , "ushort " *> pure Tushort-             , "int "    *> pure Tint-             , "uint "   *> pure Tuint-             , "float "  *> pure Tfloat-             , "double " *> pure Tdouble ]+             [ ("char "   <|> "int8 ")    *> pure Tchar+             , ("uchar "  <|> "uint8 ")   *> pure Tuchar+             , ("short "  <|> "int16 ")   *> pure Tshort+             , ("ushort " <|> "uint16 ")  *> pure Tushort+             , ("int "    <|> "int32 ")   *> pure Tint+             , ("uint "   <|> "uint32 ")  *> pure Tuint+             , ("float "  <|> "float32 ") *> pure Tfloat+             , ("double " <|> "float64 ") *> pure Tdouble ]  -- |Take the next white space-delimited word. word :: Parser ByteString

src/PLY/Types.hs view