diff --git a/src/Renderer/Common/CommonTypes.fs b/src/Renderer/Common/CommonTypes.fs index 203371c..255b710 100644 --- a/src/Renderer/Common/CommonTypes.fs +++ b/src/Renderer/Common/CommonTypes.fs @@ -319,6 +319,7 @@ module CommonTypes Y : int H : int W : int + D : int list } /// JSConnection mapped to F# record. diff --git a/src/Renderer/DrawBlock/Symbol.fs b/src/Renderer/DrawBlock/Symbol.fs index 11b2be9..edef3d0 100644 --- a/src/Renderer/DrawBlock/Symbol.fs +++ b/src/Renderer/DrawBlock/Symbol.fs @@ -285,6 +285,7 @@ let createComponent (pos: XYPos) (comptype: ComponentType) (id:string) (label:st Y = int (pos.Y - float h / 2.0) H = h W = w + D = [0] } createComponent' characteristics label diff --git a/src/Renderer/UI/SelectedComponentView.fs b/src/Renderer/UI/SelectedComponentView.fs index fcd4dbb..9f2f502 100644 --- a/src/Renderer/UI/SelectedComponentView.fs +++ b/src/Renderer/UI/SelectedComponentView.fs @@ -423,7 +423,7 @@ let viewSelectedComponent (model: ModelType.Model) dispatch : ReactElement = dispatch (ReloadSelectedComponent model.LastUsedDialogWidth) // reload the new component ) // Control when the namesPortRaw map can be accessed else return normal name of port - let allowedDescription = match comp.Type with | NbitsAdder _ | Decode4 | Register _ |DFF| RegisterE _ |DFFE| ROM1 _ |AsyncROM1 _ | RAM1 _ | AsyncRAM1 _ | Mux2 | Demux2 | NbitsXor _ | Custom _ -> true | _ -> false + let allowedDescription = match comp.Type with | Custom _ -> true | _ -> false let ports = sym.APortOffsetsMap |> Map.toList