9 lines
142 B
Forth
9 lines
142 B
Forth
|
// Imperative Solution
|
||
|
|
while true do
|
||
|
|
printfn "SPAM"
|
||
|
|
|
||
|
|
// Functional solution
|
||
|
|
let rec forever () : unit =
|
||
|
|
printfn "SPAM"
|
||
|
|
forever ()
|