X-Git-Url: https://git.stderr.nl/gitweb?a=blobdiff_plain;f=c%CE%BBash%2FCLasH%2FVHDL%2FConstants.hs;h=6051d9b3168e8cb132b3b66ed04fa33bc8676b78;hb=0e45b79dac5dd4bf4b340a515b61a03953f673a2;hp=e6381fd7411037d5d6051143db3a44b6552d956f;hpb=6a943c79c8f7d6247e0b3336046b8a41c88e72f1;p=matthijs%2Fmaster-project%2Fc%CE%BBash.git

diff --git "a/c\316\273ash/CLasH/VHDL/Constants.hs" "b/c\316\273ash/CLasH/VHDL/Constants.hs"
index e6381fd..6051d9b 100644
--- "a/c\316\273ash/CLasH/VHDL/Constants.hs"
+++ "b/c\316\273ash/CLasH/VHDL/Constants.hs"
@@ -15,7 +15,7 @@ builtinIds = [ exId, replaceId, headId, lastId, tailId, initId, takeId, dropId
              , lteqId, gtId, gteqId, boolOrId, boolAndId, plusId, timesId
              , negateId, minusId, fromSizedWordId, fromIntegerId, resizeWordId
              , resizeIntId, sizedIntId, smallIntegerId, fstId, sndId, blockRAMId
-             , splitId, minimumId 
+             , splitId, minimumId, fromRangedWordId 
              ]
 --------------
 -- Identifiers
@@ -303,6 +303,9 @@ minusId = "-"
 fromSizedWordId :: String
 fromSizedWordId = "fromSizedWord"
 
+fromRangedWordId :: String
+fromRangedWordId = "fromRangedWord"
+
 toIntegerId :: String
 toIntegerId = "to_integer"