EJDisk: EJDisk.e EJDiskHeader.m
    FAILAT 10000
    ECHO "[1m[41m[32m$target[0m"
    EC EJDisk.e `GETENV EDEV/ECOPT`
    SET ret $rc
    IF $ret GT 0
        ECHO "Erreur De compilation (fichier) $target (ligne) "$ret
        SetEnv EDEV/ERROR $ret
        SetEnv EDEV/FILEERROR EJDisk.e
        QUIT
    ENDIF


EJDiskHeader.m: EJDiskHeader.e
    FAILAT 10000
    ECHO "[1m[41m[32m$target[0m"
    EC EJDiskHeader.e `GETENV EDEV/ECOPT`
    SET ret $rc
    IF $ret GT 0
        ECHO "Erreur De compilation (fichier) $target (ligne) "$ret
        SetEnv EDEV/ERROR $ret
        SetEnv EDEV/FILEERROR EJDiskHeader.e
        QUIT
    ENDIF

