class IN < $IN_DEVICE |
---|
$IN_DEVICE |
shared my_chan : STD_CHANS ; |
---|
const input_possible : BOOL := true ; |
---|
append_line( .. Included as append_line |
---|
clear .. Included as clear |
---|
create : SAME |
---|
error : BOOL .. Included as error |
---|
get_ch : CHAR .. Included as get_ch |
---|
get_code : CHAR_CODE .. Included as get_code |
---|
get_line( .. Included as get_line |
---|
get_line : FSTR .. Included as get_line |
---|
get_str( .. Included as get_str |
---|
get_str : STR .. Included as get_str |
---|
const Def_Buff_Size : CARD := 256 ; .. Included as Def_Buff_Size |
---|
**** | A nominal initial size! |
shared lib : LIBCHARS ; |
---|
shared lib : LIBCHARS ; |
---|
shared my_chan : STD_CHANS ; |
---|
shared my_size : CARD ; |
---|
shared my_size : CARD ; |
---|