Last change
on this file since 270 was 270, checked in by coas-nagasima, 7 years ago |
mruby版ECNLプロトタイピング・ツールを追加
|
-
Property svn:eol-style
set to
native
-
Property svn:mime-type
set to
text/x-ruby
|
File size:
1.1 KB
|
Line | |
---|
1 | # -*- coding: utf-8 -*-
|
---|
2 | #
|
---|
3 | # ãã¹2ã®çæã¹ã¯ãªããã®ãããä¾åé¨ï¼RZ/A1ç¨ï¼
|
---|
4 | #
|
---|
5 |
|
---|
6 | #
|
---|
7 | # 使ç¨ã§ããå²è¾¼ã¿çªå·ã¨ããã«å¯¾å¿ããå²è¾¼ã¿ãã³ãã©çªå·
|
---|
8 | #
|
---|
9 | if $TOPPERS_RZA1H
|
---|
10 | $INTNO_VALID = [ *(0..586) ]
|
---|
11 | else
|
---|
12 | $INTNO_VALID = [ *(0..537) ]
|
---|
13 | end
|
---|
14 | $INHNO_VALID = $INTNO_VALID
|
---|
15 |
|
---|
16 | #
|
---|
17 | # ã¿ã¼ã²ããå®ç¾©ã®å²è¾¼ã¿è¦æ±ã©ã¤ã³å±æ§
|
---|
18 | #
|
---|
19 | $TARGET_INTATR = $TA_NEGEDGE|$TA_POSEDGE|$TA_BOTHEDGE
|
---|
20 |
|
---|
21 | #
|
---|
22 | # çæã¹ã¯ãªããã®ã³ã¢ä¾åé¨
|
---|
23 | #
|
---|
24 | IncludeTrb("core_kernel.trb")
|
---|
25 |
|
---|
26 | #
|
---|
27 | # å²è¾¼ã¿è¦æ±ã©ã¤ã³å±æ§ã«é¢ããã¿ã¼ã²ããä¾åã®ã¨ã©ã¼ãã§ãã¯
|
---|
28 | #
|
---|
29 | $cfgData[:CFG_INT].each do |key, params|
|
---|
30 | if $INTNO_IRQ0 <= key && key <= $INTNO_IRQ7
|
---|
31 | # IRQå²è¾¼ã¿ã®å ´å
|
---|
32 | #ï¼TA_EDGEãã»ããããã¦ããå ´åï¼
|
---|
33 | if (params[:intatr] & $TA_EDGE) != 0
|
---|
34 | error_illegal_sym("E_RSATR", params, :intatr, :intno)
|
---|
35 | end
|
---|
36 | else
|
---|
37 | # ãã®ä»ã®å²è¾¼ã¿ã®å ´å
|
---|
38 | #ï¼TA_NEGEDGEï¼TA_POSEDGEï¼TARGET_BOTHEDGEãã»ããããã¦ããå ´åï¼
|
---|
39 | if (params[:intatr] & $TARGET_INTATR) != 0
|
---|
40 | error_illegal_sym("E_RSATR", params, :intatr, :intno)
|
---|
41 | end
|
---|
42 | end
|
---|
43 | end
|
---|
Note:
See
TracBrowser
for help on using the repository browser.