1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
package Deck_Convert_GUI is procedure Show; procedure Hide; private task Worker is entry Start_Process; end Worker; end Deck_Convert_GUI;