33 lines
951 B
Haskell
33 lines
951 B
Haskell
{--
|
|
HSFM, a filemanager written in Haskell.
|
|
Copyright (C) 2016 Julian Ospald
|
|
|
|
This program is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU General Public License
|
|
version 2 as published by the Free Software Foundation.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program; if not, write to the Free Software
|
|
Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
|
|
--}
|
|
|
|
module HSFM.Utils.MyPrelude where
|
|
|
|
|
|
import Data.List
|
|
|
|
|
|
|
|
-- |Turns any list into a list of the same length with the values
|
|
-- being the indices.
|
|
-- E.g.: "abdasd" -> [0,1,2,3,4,5]
|
|
listIndices :: [a] -> [Int]
|
|
listIndices = findIndices (const True)
|
|
|
|
|