Author: jsuijs
Date: Sun Oct 19 10:19:43 2008
New Revision: 433
Modified:
trunk/unvalidated/include/peripheral/usart/serial_hardware.jal
trunk/unvalidated/sample/test/jal/test_serial_format.jal
Log:
minor
Modified: trunk/unvalidated/include/peripheral/usart/serial_hardware.jal
==============================================================================
--- trunk/unvalidated/include/peripheral/usart/serial_hardware.jal
(original)
+++ trunk/unvalidated/include/peripheral/usart/serial_hardware.jal Sun Oct
19 10:19:43 2008
@@ -126,10 +126,6 @@
-- Initializes the RS232 port, calculates baudrate registers.
--- Normally this routine should not be called by the user program,
--- it's called just once at the end of this unit
--- Only after "asynch_disable_hw" it's necessary to call this routine,
--- to enable the RS232 hardware again.
procedure serial_hw_init() is
-- Calculate and Load baudrate generator
_calculate_and_set_baudrate()
Modified: trunk/unvalidated/sample/test/jal/test_serial_format.jal
==============================================================================
--- trunk/unvalidated/sample/test/jal/test_serial_format.jal (original)
+++ trunk/unvalidated/sample/test/jal/test_serial_format.jal Sun Oct 19
10:19:43 2008
@@ -29,7 +29,7 @@
serial_hw_data = "T" serial_hw_data = "e" serial_hw_data = "s"
serial_hw_data = "t" serial_hw_data = ":" serial_hw_data = " "
plingcrlf()
- line()
+ line() --
--------------------------------------------------------------------
-- hex byte output
format_byte_hex(serial_hw_data, 0xEA)
@@ -42,7 +42,7 @@
-- hex word output
format_dword_hex(serial_hw_data, 0x12345678)
plingcrlf()
- line()
+ line() --
--------------------------------------------------------------------
-- decimal output ' 1.2'
format_byte_dec(serial_hw_data, 12, 3, 1)
@@ -59,7 +59,7 @@
-- decimal output '12.0'
format_byte_dec(serial_hw_data, 120, 3, 1)
plingcrlf()
- line()
+ line() --
--------------------------------------------------------------------
-- decimal output '-12'
format_sbyte_dec(serial_hw_data, -12, 4, 0)
@@ -72,7 +72,44 @@
-- decimal output '-0.12'
format_sbyte_dec(serial_hw_data, -12, 4, 2)
plingcrlf()
- line()
+
+ -- decimal output '-12'
+ format_sbyte_dec(serial_hw_data, 12, 4, 0)
+ plingcrlf()
+
+ -- decimal output '-1.2'
+ format_sbyte_dec(serial_hw_data, 12, 4, 1)
+ plingcrlf()
+
+ -- decimal output '-0.12'
+ format_sbyte_dec(serial_hw_data, 12, 4, 2)
+ plingcrlf()
+ line() --
--------------------------------------------------------------------
+
+ -- decimal output '-12'
+ format_sbyte_dec(serial_hw_data, -123, 3, 0)
+ plingcrlf()
+
+ -- decimal output '-1.2'
+ format_sbyte_dec(serial_hw_data, -123, 3, 1)
+ plingcrlf()
+
+ -- decimal output '-0.12'
+ format_sbyte_dec(serial_hw_data, -123, 3, 2)
+ plingcrlf()
+
+ -- decimal output '-12'
+ format_sbyte_dec(serial_hw_data, 113, 3, 0)
+ plingcrlf()
+
+ -- decimal output '-1.2'
+ format_sbyte_dec(serial_hw_data, 113, 3, 1)
+ plingcrlf()
+
+ -- decimal output '-0.12'
+ format_sword_dec(serial_hw_data, 765, 3, 2)
+ plingcrlf()
+ line() --
--------------------------------------------------------------------
-- decimal output ' 0.012'
format_word_dec(serial_hw_data, 12, 6, 3)
--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google Groups
"jallib" group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to [EMAIL PROTECTED]
For more options, visit this group at
http://groups.google.com/group/jallib?hl=en
-~----------~----~----~----~------~----~------~--~---