diff --git a/make/ghdl.mk b/make/ghdl.mk
index 89ca191..21219d6 100644
--- a/make/ghdl.mk
+++ b/make/ghdl.mk
@@ -16,7 +16,7 @@ BUILD_DIR ?= build/$(TARGET)
 WORK_DIR ?= $(BUILD_DIR)/$(WORK_LIB)
 
 # Can be pre-initialized by user
-RUN_OPTS += --stop-time=$(RUN_TIME)
+RUN_OPTS += --stop-time=$(RUN_TIME) --disp-time
 GHDL_OPTS += --work=$(WORK_LIB) --workdir=$(WORK_DIR) --std=$(LANG_STD) --ieee=$(IEEE_STD)
 
 # -------------------------------------------------
@@ -69,6 +69,9 @@ import:
 
 analyze: $(WORK_DIR) $(SRCS)
 	$(GHDL) -a $(GHDL_OPTS) $(SRCS)
+
+html: $(WORK_DIR) $(SRCS)
+	$(GHDL) --pp-html $(GHDL_OPTS) $(SRCS) >$(BUILD_DIR)/$(TARGET).html
 	
 anaborate: $(WORK_DIR) $(SRCS)
 	$(GHDL) -c $(GHDL_OPTS) -o $(BUILD_DIR)/$(TARGET) $(SRCS) -e $(ENTITY)
@@ -93,6 +96,10 @@ wave: run_wave
 	
 result:
 	exec gtkwave -f $(SIM_FILE-y) -a $(BUILD_DIR)/$(TARGET).gtkw &
+
+tree: analyze
+	$(GHDL) -r $(GHDL_OPTS) $(ENTITY) $(RUN_OPTS) --no-run --disp-tree=inst
+	
 	
 .PHONY: list
 INSTR = $(foreach number,$(SRCS),echo $(number);)