Paste: broken deploy

Author: mrjbq7
Mode: factor
Date: Fri, 13 Aug 2010 20:55:35
Plain Text |
! this die's at "broken" deploy time

IN: broken

USE: command-line
! USE: io     ! uncomment to die at runtime
! USE: kernel ! uncomment to die at runtime
USE: namespaces

: broken ( -- )
    command-line get [ write nl ] when* ;

MAIN: broken

Annotation: deploy file

Author: mrjbq7
Mode: factor
Date: Fri, 13 Aug 2010 20:55:56
Plain Text |
USING: tools.deploy.config ;
H{
    { deploy-unicode? f }
    { deploy-ui? f }
    { deploy-name "broken" }
    { deploy-io 2 }
    { deploy-threads? f }
    { deploy-reflection 1 }
    { deploy-math? f }
    { deploy-word-props? f }
    { deploy-word-defs? f }
    { deploy-c-types? f }
    { "stop-after-last-window?" t }
}

Annotation: this works

Author: mrjbq7
Mode: factor
Date: Fri, 13 Aug 2010 21:03:13
Plain Text |
! this works, since command-line is an array
! although the original die problem still seems like a bug

USING: command-line io kernel namespaces sequences ;

IN: broken

: broken ( -- )
    command-line get [ [ write nl ] each ] when* ;

MAIN: broken

New Annotation

Summary:
Author:
Mode:
Body: