Revision as of 23:13, 19 November 2021 (view source) Hout (talk \| contribs) m (→‎{{header\|Haskell}}) ← Older edit		Revision as of 23:27, 19 November 2021 (view source) Hout (talk \| contribs) m (→‎{{header\|Haskell}}) Newer edit →
Line 3,083: atom s@('"' : _) = fromMaybe (List []) (maybeRead ("String " <> s)) atom s = ~~firstParse parses~~ headDef (List []) $ ~~where~~ catMaybes $▼ ~~firstParse (x : _) = x~~ ~~parses~~ = maybeRead <$> ( fmap (<> (' ' : s)) ["Int", "Float"]▼ ▲ catMaybes $ <> ["Symbol \"" <> s <> "\""]▼ ~~maybeRead~~ ~~<$>~~ ( ~~fmap~~) ~~(<> (' ' : s))~~ headDef :: a -> [a] -> a ▲ ["Int", "Float"] headDef d [] = d ▲ <> ["Symbol \"" <> s <> "\""] headDef _ (x : _) = )x maybeRead :: String -> Maybe Val

S-expressions: Difference between revisions

S-expressions (view source)