Memory layout of a data structure: Difference between revisions

m
rs232_main.m: use if then else
(Nimrod -> Nim)
m (rs232_main.m: use if then else)
Line 425:
 
=== rs232_main.m ===
<lang Mercury>:- module rs232_main.
:- module rs232_main.
 
:- interface.
Line 449 ⟶ 448:
 
write_string("Com1 DTR is ", !IO),
( if rs232_is_set(Com1, data_terminal_ready) ->then
write_string("set.", !IO), nl(!IO)
else
; write_string("clear.", !IO), nl(!IO) ),
),
 
write_string("Com2 DSR is ", !IO),
( if rs232_is_clear(Com2, data_set_ready) ->then
write_string("clear.", !IO), nl(!IO)
else
; write_string("set.", !IO), nl(!IO) ).
).
 
:- end_module rs232_main.
Anonymous user