The Code-Bin
Links
Home
Add your code!
All Listings
About
Latest Entry
Featured Scripts
Author's Website
Latest Entries
FFMPEG Thumbnail Scr...
PHP, 0.8KB
Jul. 29, 10:24pm
John
Z80 Assembler, 190 bytes
Feb. 17, 3:36am
John
Z80 Assembler, 176 bytes
Sep. 13, 2:19am
John
Z80 Assembler, 77 bytes
Sep. 13, 2:18am
John
Z80 Assembler, 209 bytes
Sep. 13, 2:17am
untitled OCaml Code
Posted by: cylentwolf | March 11, 2010 @ 12:32pm
OCaml Code
[
Download
]
let rec DollarToCents line expand= match line with |[]->[] |[char] -> char |h::tail when h='$'-> h::DollarToCents tail true |h::tail when h=' ' && expand ->'0'::'0'::' '::DollarToCents tail false |h::tail when h='.' ->DollarToCents tail false log2|>List.map (fun zeile->DollarToCents zeile false)
Syntax Highlighting
[
Open in new window
]
Author Comments
none
Rating
4.73 / 8
63 Votes
http://codebin.yi.org/543
page generated in 0.00 seconds