Commit e0a4335a authored by Diederik van Arkel's avatar Diederik van Arkel

remove unused strictness annotation

parent e559503b
......@@ -1402,7 +1402,7 @@ set_page_number :: !String !Int -> !String;
set_page_number file_name new_page_number
= file_name := (size file_name-PageNumberOffsetFromEndInFileName,toChar (new_page_number + toInt '0'));
get_page_number :: !String -> !Int;
get_page_number :: !String -> Int;
get_page_number file_name
= digitToInt file_name.[size file_name - PageNumberOffsetFromEndInFileName];
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment