chore: Small cleanups
This commit is contained in:
parent
e087e5f29f
commit
24bfa426ab
2 changed files with 4 additions and 4 deletions
|
@ -1,13 +1,13 @@
|
|||
login :-
|
||||
getdata(_, _),
|
||||
getdata,
|
||||
writeln('Welcome!').
|
||||
login :-
|
||||
repeat,
|
||||
writeln('Sorry, you are not permitted.'),
|
||||
getdata(_, _),
|
||||
getdata,
|
||||
writeln('Welcome').
|
||||
|
||||
getdata(Name, Password) :-
|
||||
getdata :-
|
||||
write('Username: '),
|
||||
read(Name),
|
||||
write('Password: '),
|
||||
|
|
|
@ -155,7 +155,7 @@ continue :-
|
|||
write('Write anything to continue... '),
|
||||
read(_).
|
||||
|
||||
clear :- clear(30).
|
||||
clear :- clear(50).
|
||||
|
||||
clear(0) :- !.
|
||||
clear(N) :-
|
||||
|
|
Reference in a new issue