Author: jsuijs
Date: Sun Mar 15 08:06:07 2009
New Revision: 849
Modified:
trunk/include/external/lcd/lcd_hd44780_common.jal
trunk/include/peripheral/usart/serial_hw_int_cts.jal
trunk/sample/test/jal/test_serial_print.jal
Log:
used _warn for depricated functions
Modified: trunk/include/external/lcd/lcd_hd44780_common.jal
==============================================================================
--- trunk/include/external/lcd/lcd_hd44780_common.jal (original)
+++ trunk/include/external/lcd/lcd_hd44780_common.jal Sun Mar 15 08:06:07
2009
@@ -311,28 +311,16 @@
end procedure
---
----------------------------------------------------------------------------
--- if you don't want to have depricated functions, set:
--- const bit no_depricated_functions = true
---
----------------------------------------------------------------------------
-if (defined(no_depricated_functions) == false) then
- const bit no_depricated_functions = false
-end if
-if (no_depricated_functions == false) then
+-- depricated procedures
+procedure lcd_clearscreen() is
+ _warn "lcd_clearsceen() is depricated - please use lcd_clear_screen()"
+ _lcd_write_command( lcd_clear_display )
+ delay_10us( 180 )
+end procedure
- -- depricated procedures
-
- --
----------------------------------------------------------------------------
- -- clears the LCD (depricated)
- --
----------------------------------------------------------------------------
- procedure lcd_clearscreen() is
- _lcd_write_command( lcd_clear_display )
- delay_10us( 180 )
- end procedure
-
- procedure lcd_writechar(byte in data) is
- _lcd_write_data(data)
- end procedure
-
-end if
\ No newline at end of file
+procedure lcd_writechar(byte in data) is
+ _warn "lcd_writechar() is depricated - please use lcd_write_char()"
+ _lcd_write_data(data)
+end procedure
+
\ No newline at end of file
Modified: trunk/include/peripheral/usart/serial_hw_int_cts.jal
==============================================================================
--- trunk/include/peripheral/usart/serial_hw_int_cts.jal (original)
+++ trunk/include/peripheral/usart/serial_hw_int_cts.jal Sun Mar 15
08:06:07 2009
@@ -134,7 +134,7 @@
if (defined(serial_hw_baudrate) == false) then
if (defined(SERIAL_BPSRATE) == true) then
- -- depricated; for compatibility only
+ _warn "SERIAL_BPSRATE is depricated - please use serial_hw_baudrate"
const serial_hw_baudrate = SERIAL_BPSRATE
else
pragma error -- no baudrate defined
Modified: trunk/sample/test/jal/test_serial_print.jal
==============================================================================
--- trunk/sample/test/jal/test_serial_print.jal (original)
+++ trunk/sample/test/jal/test_serial_print.jal Sun Mar 15 08:06:07 2009
@@ -101,8 +101,7 @@
print_string(serial_hw_data, str3)
var dword e = 3210987654
- var sdword f = -8388609
-; var sdword f = -2109876543
+ var sdword f = -2109876543
print_dword_dec(serial_hw_data, e) -- output in (unsigned) decimal
format
print_crlf(serial_hw_data) -- output Carriage Return and
Linefeed (0x0D 0x0A), new line
@@ -185,5 +184,4 @@
-- -2109876543
-- Test print.jal - bit
-- 1 high true 0 low false
--- Variable x has decimal value 121 which is hex value 79 and represents
ASCII character y
-
+-- Variable x has decimal value 121 which is hex value 79 and represents
ASCII character y
\ No newline at end of file
--~--~---------~--~----~------------~-------~--~----~
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
-~----------~----~----~----~------~----~------~--~---
