Rosetta Code

Program name: Difference between revisions

Page Discussion

Program name (view source)

Revision as of 16:47, 6 March 2012

70 bytes removed ,  12 years ago
→‎{{header|Haskell}}
(→‎PowerBASIC: fixed search-replace error (from my original contribution))
Line 406:
Haskell has an impure function for this.
 
<lang haskell>#!/usr/bin/envimport runhaskellSystem (getProgName)
 
module ScriptName where
 
import System (getProgName)
 
main :: IO ()
main = getProgName >>= ("Program: " ++) . putStrLn</lang>
main = do
program <- getProgName
putStrLn $ "Program: " ++ program</lang>
 
=={{header|Icon}} and {{header|Unicon}}==
Anonymous user
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/196822"