msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

Fun -> Cat

Browse Source
This commit is contained in:
krangelov
2021-08-12 14:45:49 +02:00
parent 352dedc26f
commit 2a8d4232ce
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/runtime/haskell/PGF2.hsc
View File

@@ -181,7 +181,7 @@ functionProb p fun =
return (realToFrac c_prob) return (realToFrac c_prob)
-- | List of all functions defined in the abstract syntax -- | List of all functions defined in the abstract syntax
categories :: PGF -> [Fun] categories :: PGF -> [Cat]
categories p = categories p =
unsafePerformIO $ do unsafePerformIO $ do
ref <- newIORef [] ref <- newIORef []