Skip to content

Commit

Permalink
Update to Libsass 3.6.3
Browse files Browse the repository at this point in the history
  • Loading branch information
jakubfijalkowski committed Mar 26, 2020
1 parent 605da64 commit b0e20d9
Show file tree
Hide file tree
Showing 4 changed files with 9 additions and 2 deletions.
4 changes: 4 additions & 0 deletions Bindings/Libsass/Context.hs
Original file line number Diff line number Diff line change
Expand Up @@ -327,6 +327,10 @@ foreign import ccall unsafe "sass/context.h" sass_context_take_error_file
:: Ptr SassContext
-> IO CString

foreign import ccall unsafe "sass/context.h" sass_context_take_error_src
:: Ptr SassContext
-> IO CString

foreign import ccall unsafe "sass/context.h" sass_context_take_output_string
:: Ptr SassContext
-> IO CString
Expand Down
3 changes: 3 additions & 0 deletions Bindings/Libsass/Types.hs
Original file line number Diff line number Diff line change
Expand Up @@ -13,6 +13,7 @@ data SassOutputStyle = SassStyleNested
| SassStyleCompressed
| SassStyleInspect -- ^ Marked as internal
| SassStyleToSass -- ^ Marked as internal
| SassStyleToCss -- ^ Marked as internal
deriving (Eq, Show)

instance Enum SassOutputStyle where
Expand All @@ -22,13 +23,15 @@ instance Enum SassOutputStyle where
fromEnum SassStyleCompressed = 3
fromEnum SassStyleInspect = 4
fromEnum SassStyleToSass = 5
fromEnum SassStyleToCss = 6

toEnum 0 = SassStyleNested
toEnum 1 = SassStyleExpanded
toEnum 2 = SassStyleCompact
toEnum 3 = SassStyleCompressed
toEnum 4 = SassStyleInspect
toEnum 5 = SassStyleToSass
toEnum 6 = SassStyleToCss
toEnum u = error ("SassOutputStyle.toEnum: Cannot match " ++ show u)

-- From sass/context.h
Expand Down
2 changes: 1 addition & 1 deletion libsass
Submodule libsass updated 182 files
2 changes: 1 addition & 1 deletion tests/Main.hs
Original file line number Diff line number Diff line change
Expand Up @@ -35,7 +35,7 @@ main = hspec $
#ifndef EXTERNAL_LIBSASS
it "should report correct version" $ do
str <- peekCString libsass_version
str `shouldBe` "3.5.5"
str `shouldBe` "3.6.3"
#endif

it "should support quoted strings" $ withCString "sample" $ \cstr -> do
Expand Down

0 comments on commit b0e20d9

Please sign in to comment.