scmCloseOutputPort []            = return$ tooFewArgs  "close-output-port"
scmCloseOutputPort []            = return$ tooFewArgs  "close-output-port"
scmCloseOutputPort []            = return$ tooFewArgs  "close-output-port"