Object subclass: #CasaFiestas
Instance VariablesNames: ‘ reservas ‘
Class Variable names:’’
-------------------------:’’
--------------------------:’’
MI
Menú
“ ”
|op |
Reservas:=orderedCollection new.
Op:= ‘1’.
[op=’0’] WhileFalse: [ op= Prompter prompt ‘ 1- Carga 2-Reserva 3-lista 0-fin’
        Op=’1’ ifTrue: [self cargaTarifas ]