具有限定名称的Import Union类型

Bin*_*xer 6 elm

所以我有两种联合类型:JobStatusTaskStatus.

module Data.Job exposing (..)


type JobStatus
    = Submitted
    | Started
    | Finished
Run Code Online (Sandbox Code Playgroud)

-

module Data.Task exposing (..)


type TaskStatus
    = Created
    | Running
    | Finished
Run Code Online (Sandbox Code Playgroud)

然后我将它们导入第三个模块

module Home exposing (..)


import Data.Job as Job exposing (JobStatus(..))
import Data.Task as Task exposing (TaskStatus(..))


type alias Model =
    { jobStatus : JobStatus
    , taskStatus : TaskStatus
    }


model : Model
model =
    { jobStatus = Finished
    , taskStatus = Finished
    }
Run Code Online (Sandbox Code Playgroud)

但是Finished太混乱了,我想把它写成JobStatus.Finished或者TaskStatus.Finished我该怎么做?

Jos*_*ens 9

如果您从此更改了导入

import Data.Job as Job exposing (JobStatus(..))
import Data.Task as Task exposing (TaskStatus(..))
Run Code Online (Sandbox Code Playgroud)

对此

import Data.Job as Job 
import Data.Task as Task
Run Code Online (Sandbox Code Playgroud)

你可以使用Job.Finished和Task.Finished.