1 /*-------------------------------------------------------------------------
3 device.c - Accomodates subtle variations in PIC devices
4 Written By - Scott Dattalo scott@dattalo.com
6 This program is free software; you can redistribute it and/or modify it
7 under the terms of the GNU General Public License as published by the
8 Free Software Foundation; either version 2, or (at your option) any
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
18 Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
19 -------------------------------------------------------------------------*/
25 #include "common.h" // Include everything in the SDCC src directory
34 #if defined(__BORLANDC__) || defined(_MSC_VER)
35 #define STRCASECMP stricmp
36 #define STRNCASECMP strnicmp
38 #define STRCASECMP strcasecmp
39 #define STRNCASECMP strncasecmp
42 extern int Gstack_base_addr;
43 extern int Gstack_size;
45 #define MAX_PICLIST 200
46 static PIC_device *Pics[MAX_PICLIST];
47 static int num_of_supported_PICS = 0;
49 static PIC_device *pic=NULL;
51 int maxRAMaddress = 0;
53 #define CONFIG_WORD_ADDRESS 0x2007
54 #define CONFIG2_WORD_ADDRESS 0x2008
55 #define DEFAULT_CONFIG_WORD 0x3fff
56 #define DEFAULT_CONFIG2_WORD 0x3ffc
58 #define DEVICE_FILE_NAME "pic14devices.txt"
59 #define PIC14_STRING_LEN 256
60 #define SPLIT_WORDS_MAX 16
62 static unsigned int config_word = DEFAULT_CONFIG_WORD;
63 static unsigned int config2_word = DEFAULT_CONFIG2_WORD;
64 static memRange *rangeRAM = NULL;
66 extern void emitSymbolToFile (FILE *of, const char *name, const char *section_type, int size, int addr, int useEQU, int globalize);
69 /* parse a value from the configuration file */
70 static int parse_config_value(char *str)
72 if (str[strlen(str) - 1] == 'K')
73 return atoi(str) * 1024; /* like "1K" */
75 else if (STRNCASECMP(str, "0x", 2) == 0)
76 return strtol(str+2, NULL, 16); /* like "0x400" */
79 return atoi(str); /* like "1024" */
83 /* split a line into words */
84 static int split_words(char result_word[SPLIT_WORDS_MAX][PIC14_STRING_LEN], char *str)
90 while (*pos != '\0' && num_words < SPLIT_WORDS_MAX) {
91 /* remove leading spaces */
92 while (isspace(*pos) || *pos == ',')
95 /* copy everything up until the first space or comma */
96 for (ccount = 0; *pos != '\0' && !isspace(*pos) && *pos != ',' && ccount < PIC14_STRING_LEN-1; ccount++, pos++)
97 result_word[num_words][ccount] = *pos;
98 result_word[num_words][ccount] = '\0';
107 /* remove annoying prefixes from the processor name */
108 static char *sanitise_processor_name(char *name)
110 char *proc_pos = name;
115 if (STRNCASECMP(proc_pos, "pic", 3) == 0)
118 else if (tolower(*proc_pos) == 'p')
125 /* create a structure for a pic processor */
126 static PIC_device *create_pic(char *pic_name, int maxram, int bankmsk, int confsiz, int program, int data, int eeprom, int io)
129 char *simple_pic_name = sanitise_processor_name(pic_name);
131 new_pic = Safe_calloc(1, sizeof(PIC_device));
132 new_pic->name = Safe_calloc(strlen(simple_pic_name)+1, sizeof(char));
133 strcpy(new_pic->name, simple_pic_name);
135 new_pic->defMaxRAMaddrs = maxram;
136 new_pic->bankMask = bankmsk;
137 new_pic->hasSecondConfigReg = confsiz > 1;
139 new_pic->programMemSize = program;
140 new_pic->dataMemSize = data;
141 new_pic->eepromMemSize = eeprom;
142 new_pic->ioPins = io;
144 new_pic->ram = rangeRAM;
146 Pics[num_of_supported_PICS] = new_pic;
147 num_of_supported_PICS++;
153 /* mark some registers as being duplicated across banks */
154 static void register_map(int num_words, char word[SPLIT_WORDS_MAX][PIC14_STRING_LEN])
160 fprintf(stderr, "WARNING: not enough values in %s regmap directive\n", DEVICE_FILE_NAME);
164 for (pcount = 2; pcount < num_words; pcount++) {
165 r = Safe_calloc(1, sizeof(memRange));
167 r->start_address = parse_config_value(word[pcount]);
168 r->end_address = parse_config_value(word[pcount]);
169 r->alias = parse_config_value(word[1]);
170 r->bank = (r->start_address >> 7) & 3;
173 // add memRange to device entry for future lookup (sharebanks)
179 /* define ram areas - may be duplicated across banks */
180 static void ram_map(int num_words, char word[SPLIT_WORDS_MAX][PIC14_STRING_LEN])
185 fprintf(stderr, "WARNING: not enough values in %s memmap directive\n", DEVICE_FILE_NAME);
189 r = Safe_calloc(1, sizeof(memRange));
190 //fprintf (stderr, "%s: %s %s %s\n", __FUNCTION__, word[1], word[2], word[3]);
192 r->start_address = parse_config_value(word[1]);
193 r->end_address = parse_config_value(word[2]);
194 r->alias = parse_config_value(word[3]);
195 r->bank = (r->start_address >> 7) & 3;
197 // add memRange to device entry for future lookup (sharebanks)
202 extern set *includeDirsSet;
203 extern set *userIncDirsSet;
204 extern set *libDirsSet;
205 extern set *libPathsSet;
207 /* read the file with all the pic14 definitions and pick out the definition for a processor
208 * if specified. if pic_name is NULL reads everything */
209 static PIC_device *find_device(char *pic_name)
212 char pic_buf[PIC14_STRING_LEN];
214 int found_processor = FALSE;
216 char processor_name[SPLIT_WORDS_MAX][PIC14_STRING_LEN];
217 int num_processor_names = 0;
225 char *simple_pic_name;
230 /* allow abbreviations of the form "f877" - convert to "16f877" */
231 simple_pic_name = sanitise_processor_name(pic_name);
232 num_of_supported_PICS = 0;
234 /* open the piclist file */
235 /* first scan all include directories */
237 //fprintf( stderr, "%s: searching %s\n", __FUNCTION__, DEVICE_FILE_NAME );
238 for (dir = setFirstItem(includeDirsSet);
240 dir = setNextItem(includeDirsSet))
242 //fprintf( stderr, "searching1 %s\n", dir );
243 SNPRINTF(&filename[0], len, "%s%s%s", dir, DIR_SEPARATOR_STRING, DEVICE_FILE_NAME);
244 pic_file = fopen( filename, "rt" );
247 for (dir = setFirstItem(userIncDirsSet);
249 dir = setNextItem(userIncDirsSet))
251 //fprintf( stderr, "searching2 %s\n", dir );
252 SNPRINTF(&filename[0], len, "%s%s%s", dir, DIR_SEPARATOR_STRING, DEVICE_FILE_NAME);
253 pic_file = fopen( filename, "rt" );
256 for (dir = setFirstItem(libDirsSet);
258 dir = setNextItem(libDirsSet))
260 //fprintf( stderr, "searching3 %s\n", dir );
261 SNPRINTF(&filename[0], len, "%s%s%s", dir, DIR_SEPARATOR_STRING, DEVICE_FILE_NAME);
262 pic_file = fopen( filename, "rt" );
265 for (dir = setFirstItem(libPathsSet);
267 dir = setNextItem(libPathsSet))
269 //fprintf( stderr, "searching4 %s\n", dir );
270 SNPRINTF(&filename[0], len, "%s%s%s", dir, DIR_SEPARATOR_STRING, DEVICE_FILE_NAME);
271 pic_file = fopen( filename, "rt" );
275 pic_file = fopen(DATADIR LIB_DIR_SUFFIX DIR_SEPARATOR_STRING "pic" DIR_SEPARATOR_STRING DEVICE_FILE_NAME, "rt");
277 if (pic_file == NULL) {
278 /* this second attempt is used when initially building the libraries */
279 pic_file = fopen(".." DIR_SEPARATOR_STRING ".." DIR_SEPARATOR_STRING ".." DIR_SEPARATOR_STRING ".."
280 DIR_SEPARATOR_STRING "src" DIR_SEPARATOR_STRING "pic" DIR_SEPARATOR_STRING
281 DEVICE_FILE_NAME, "rt");
282 if (pic_file == NULL) {
283 fprintf(stderr, "can't find %s\n", DATADIR LIB_DIR_SUFFIX DIR_SEPARATOR_STRING "pic"
284 DIR_SEPARATOR_STRING DEVICE_FILE_NAME);
289 /* read line by line */
290 pic_buf[sizeof(pic_buf)-1] = '\0';
291 while (fgets(pic_buf, sizeof(pic_buf)-1, pic_file) != NULL && !done) {
293 /* remove trailing spaces */
294 while (isspace(pic_buf[strlen(pic_buf)-1]))
295 pic_buf[strlen(pic_buf)-1] = '\0';
297 /* remove leading spaces */
298 for (pic_buf_pos = pic_buf; isspace(*pic_buf_pos); pic_buf_pos++)
301 /* ignore comment / empty lines */
302 if (*pic_buf_pos != '\0' && *pic_buf_pos != '#') {
304 /* split into fields */
305 char pic_word[SPLIT_WORDS_MAX][PIC14_STRING_LEN];
309 num_pic_words = split_words(pic_word, pic_buf_pos);
311 if (STRCASECMP(pic_word[0], "processor") == 0) {
313 if (pic_name == NULL) {
314 /* this is the mode where we read all the processors in - store the names for now */
315 if (num_processor_names > 0) {
316 /* store away all the previous processor definitions */
319 for (dcount = 1; dcount < num_processor_names; dcount++)
320 create_pic(processor_name[dcount], pic_maxram, pic_bankmsk,
321 pic_confsiz, pic_program, pic_data, pic_eeprom, pic_io);
324 num_processor_names = split_words(processor_name, pic_buf_pos);
327 /* if we've just completed reading a processor definition stop now */
331 /* check if this processor name is a match */
332 for (wcount = 1; wcount < num_pic_words; wcount++) {
334 /* skip uninteresting prefixes */
335 char *found_name = sanitise_processor_name(pic_word[wcount]);
337 if (STRCASECMP(found_name, simple_pic_name) == 0)
338 found_processor = TRUE;
345 if (found_processor || pic_name == NULL) {
346 /* only parse a processor section if we've found the one we want */
347 if (STRCASECMP(pic_word[0], "maxram") == 0 && num_pic_words > 1) {
348 pic_maxram = parse_config_value(pic_word[1]);
349 setMaxRAM(pic_maxram);
351 else if (STRCASECMP(pic_word[0], "bankmsk") == 0 && num_pic_words > 1)
352 pic_bankmsk = parse_config_value(pic_word[1]);
354 else if (STRCASECMP(pic_word[0], "confsiz") == 0 && num_pic_words > 1)
355 pic_confsiz = parse_config_value(pic_word[1]);
357 else if (STRCASECMP(pic_word[0], "program") == 0 && num_pic_words > 1)
358 pic_program = parse_config_value(pic_word[1]);
360 else if (STRCASECMP(pic_word[0], "data") == 0 && num_pic_words > 1)
361 pic_data = parse_config_value(pic_word[1]);
363 else if (STRCASECMP(pic_word[0], "eeprom") == 0 && num_pic_words > 1)
364 pic_eeprom = parse_config_value(pic_word[1]);
366 else if (STRCASECMP(pic_word[0], "io") == 0 && num_pic_words > 1)
367 pic_io = parse_config_value(pic_word[1]);
369 else if (STRCASECMP(pic_word[0], "regmap") == 0 && num_pic_words > 2) {
371 register_map(num_pic_words, pic_word);
373 else if (STRCASECMP(pic_word[0], "memmap") == 0 && num_pic_words > 2) {
375 ram_map(num_pic_words, pic_word);
378 fprintf(stderr, "WARNING: %s: bad syntax `%s'\n", DEVICE_FILE_NAME, pic_word[0]);
387 /* if we're in read-the-lot mode then create the final processor definition */
388 if (pic_name == NULL) {
390 if (num_processor_names > 0) {
391 /* store away all the previous processor definitions */
394 for (dcount = 1; dcount < num_processor_names; dcount++)
395 create_pic(processor_name[dcount], pic_maxram, pic_bankmsk,
396 pic_confsiz, pic_program, pic_data, pic_eeprom, pic_io);
401 if (found_processor) {
402 /* create a new pic entry */
403 return create_pic(pic_name, pic_maxram, pic_bankmsk,
404 pic_confsiz, pic_program, pic_data, pic_eeprom, pic_io);
411 void setMaxRAM(int size)
413 maxRAMaddress = size;
415 if (maxRAMaddress < 0) {
416 fprintf(stderr, "invalid maxram 0x%x setting in %s\n",
417 maxRAMaddress, DEVICE_FILE_NAME);
422 /*-----------------------------------------------------------------*
423 *-----------------------------------------------------------------*/
425 int isREGinBank(regs *reg, int bank)
431 if((int)((reg->address | reg->alias) & pic->bankMask & bank) == bank)
437 /*-----------------------------------------------------------------*
438 *-----------------------------------------------------------------*/
439 int REGallBanks(regs *reg)
445 return ((reg->address | reg->alias) & pic->bankMask);
449 /*-----------------------------------------------------------------*
450 * void list_valid_pics(int ncols, int list_alias)
452 * Print out a formatted list of valid PIC devices
454 * ncols - number of columns in the list.
456 * list_alias - if non-zero, print all of the supported aliases
457 * for a device (e.g. F84, 16F84, etc...)
458 *-----------------------------------------------------------------*/
459 void list_valid_pics(int ncols)
464 if (num_of_supported_PICS == 0)
465 find_device(NULL); /* load all the definitions */
467 /* decrement the column number if it's greater than zero */
468 ncols = (ncols > 1) ? ncols-1 : 4;
470 /* Find the device with the longest name */
471 for(i=0,longest=0; i<num_of_supported_PICS; i++) {
472 k = strlen(Pics[i]->name);
479 fprintf(stderr, "\nPIC14 processors and their characteristics:\n\n");
480 fprintf(stderr, " processor");
481 for(k=0; k<longest-1; k++)
483 fprintf(stderr, "program RAM EEPROM I/O\n");
484 fprintf(stderr, "-----------------------------------------------------\n");
486 for(i=0; i < num_of_supported_PICS; i++) {
487 fprintf(stderr," %s", Pics[i]->name);
488 l = longest + 2 - strlen(Pics[i]->name);
492 fprintf(stderr, " ");
493 if (Pics[i]->programMemSize % 1024 == 0)
494 fprintf(stderr, "%4dK", Pics[i]->programMemSize / 1024);
496 fprintf(stderr, "%5d", Pics[i]->programMemSize);
498 fprintf(stderr, " %5d %5d %4d\n",
499 Pics[i]->dataMemSize, Pics[i]->eepromMemSize, Pics[i]->ioPins);
504 fprintf(stderr, "\nPIC14 processors supported:\n");
505 for(i=0; i < num_of_supported_PICS; i++) {
507 fprintf(stderr,"%s", Pics[i]->name);
509 l = longest + 2 - strlen(Pics[i]->name);
526 /*-----------------------------------------------------------------*
528 *-----------------------------------------------------------------*/
529 PIC_device *init_pic(char *pic_type)
531 char long_name[PIC14_STRING_LEN];
533 pic = find_device(pic_type);
536 /* check for shortened "16xxx" form */
537 sprintf(long_name, "16%s", pic_type);
538 pic = find_device(long_name);
540 if(pic_type != NULL && pic_type[0] != '\0')
541 fprintf(stderr, "'%s' was not found.\n", pic_type);
543 fprintf(stderr, "No processor has been specified (use -pPROCESSOR_NAME)\n");
552 /*-----------------------------------------------------------------*
554 *-----------------------------------------------------------------*/
555 int picIsInitialized(void)
557 if(pic && maxRAMaddress > 0)
564 /*-----------------------------------------------------------------*
565 * char *processor_base_name(void) - Include file is derived from this.
566 *-----------------------------------------------------------------*/
567 char *processor_base_name(void)
576 /*-----------------------------------------------------------------*
577 *-----------------------------------------------------------------*/
578 int validAddress(int address, int reg_size)
580 if (maxRAMaddress < 0) {
581 fprintf(stderr, "missing maxram setting in %s\n", DEVICE_FILE_NAME);
584 // fprintf(stderr, "validAddress: Checking 0x%04x\n",address);
585 assert (reg_size > 0);
586 if(address + (reg_size - 1) > maxRAMaddress)
593 /* The following code should be (and is) implemented in the linker. */
595 /*-----------------------------------------------------------------*
596 *-----------------------------------------------------------------*/
597 void mapRegister(regs *reg)
603 if(!reg || !reg->size) {
604 fprintf(stderr,"WARNING: %s:%s:%d Bad register\n",__FILE__,__FUNCTION__,__LINE__);
608 if (maxRAMaddress < 0) {
609 fprintf(stderr, "missing maxram setting in %s\n", DEVICE_FILE_NAME);
613 for(i=0; i<reg->size; i++) {
615 assert(reg->address >= 0 && reg->address < maxRAMaddress);
617 alias = finalMapping[reg->address].alias;
622 //fprintf(stdout,"mapping %s to address 0x%02x, reg size = %d\n",reg->name, (reg->address+alias+i),reg->size);
624 finalMapping[reg->address + alias + i].reg = reg;
625 finalMapping[reg->address + alias + i].instance = i;
627 /* Decrement alias */
629 alias -= ((alias & (alias - 1)) ^ alias);
636 //fprintf(stderr,"%s - %s addr = 0x%03x, size %d\n",__FUNCTION__,reg->name, reg->address,reg->size);
642 /*-----------------------------------------------------------------*
643 *-----------------------------------------------------------------*/
644 int assignRegister(regs *reg, int start_address)
648 //fprintf(stderr,"%s - %s start_address = 0x%03x\n",__FUNCTION__,reg->name, start_address);
651 if (validAddress(reg->address,reg->size)) {
652 //fprintf(stderr,"%s - %s address = 0x%03x\n",__FUNCTION__,reg->name, reg->address);
657 if (getenv("SDCCPICDEBUG")) {
658 fprintf(stderr, "WARNING: Ignoring Out of Range register assignment at fixed address %d, %s\n",
659 reg->address, reg->name);
664 /* This register does not have a fixed address requirement
665 * so we'll search through all availble ram address and
666 * assign the first one */
668 for (i=start_address; i<=maxRAMaddress; i++) {
670 if (validAddress(i,reg->size)) {
677 fprintf(stderr, "WARNING: No more RAM available for %s\n",reg->name);
684 /*-----------------------------------------------------------------*
685 *-----------------------------------------------------------------*/
686 void assignFixedRegisters(set *regset)
690 for (reg = setFirstItem(regset) ; reg ;
691 reg = setNextItem(regset)) {
694 assignRegister(reg,0);
699 /*-----------------------------------------------------------------*
700 *-----------------------------------------------------------------*/
701 void assignRelocatableRegisters(set *regset, int used)
707 for (reg = setFirstItem(regset) ; reg ;
708 reg = setNextItem(regset)) {
710 //fprintf(stdout,"assigning %s (%d) isFixed=%d, wasUsed=%d\n",reg->name,reg->size,reg->isFixed,reg->wasUsed);
712 if((!reg->isExtern) && (!reg->isFixed) && ( used || reg->wasUsed)) {
713 /* If register have been reused then shall not print it a second time. */
716 for (s = regset; s; s = s->next) {
721 if((!r->isFixed) && ( used || r->wasUsed)) {
722 if (r->rIdx == reg->rIdx) {
723 reg->address = r->address;
730 address = assignRegister(reg,address);
737 /* Keep track of whether we found an assignment to the __config words. */
738 static int pic14_hasSetConfigWord = 0;
740 /*-----------------------------------------------------------------*
741 * void assignConfigWordValue(int address, int value)
743 * Most midrange PICs have one config word at address 0x2007.
744 * Newer PIC14s have a second config word at address 0x2008.
745 * This routine will assign values to those addresses.
747 *-----------------------------------------------------------------*/
749 void pic14_assignConfigWordValue(int address, int value)
751 if (CONFIG_WORD_ADDRESS == address)
754 else if (CONFIG2_WORD_ADDRESS == address)
755 config2_word = value;
757 //fprintf(stderr,"setting config word 0x%x to 0x%x\n", address, value);
758 pic14_hasSetConfigWord = 1;
761 /*-----------------------------------------------------------------*
762 * int pic14_emitConfigWord (FILE * vFile)
764 * Emit the __config directives iff we found a previous assignment
765 * to the config word.
766 *-----------------------------------------------------------------*/
767 extern char *iComments2;
768 int pic14_emitConfigWord (FILE * vFile)
770 if (pic14_hasSetConfigWord)
772 fprintf (vFile, "%s", iComments2);
773 fprintf (vFile, "; config word \n");
774 fprintf (vFile, "%s", iComments2);
775 if (pic14_getHasSecondConfigReg())
777 fprintf (vFile, "\t__config _CONFIG1, 0x%x\n", pic14_getConfigWord(0x2007));
778 fprintf (vFile, "\t__config _CONFIG2, 0x%x\n", pic14_getConfigWord(0x2008));
781 fprintf (vFile, "\t__config 0x%x\n", pic14_getConfigWord(0x2007));
788 /*-----------------------------------------------------------------*
789 * int pic14_getConfigWord(int address)
791 * Get the current value of a config word.
793 *-----------------------------------------------------------------*/
795 int pic14_getConfigWord(int address)
799 case CONFIG_WORD_ADDRESS:
802 case CONFIG2_WORD_ADDRESS:
810 /*-----------------------------------------------------------------*
812 *-----------------------------------------------------------------*/
813 unsigned pic14_getMaxRam(void)
815 return pic->defMaxRAMaddrs;
819 /*-----------------------------------------------------------------*
820 * int getHasSecondConfigReg(void) - check if the device has a
821 * second config register, rather than just one.
822 *-----------------------------------------------------------------*/
823 int pic14_getHasSecondConfigReg(void)
828 return pic->hasSecondConfigReg;
831 /*-----------------------------------------------------------------*
832 * True iff the device has memory aliased in every bank.
833 * If true, low and high will be set to the low and high address
834 * occupied by the (last) sharebank found.
835 *-----------------------------------------------------------------*/
836 int pic14_hasSharebank(int *low, int *high, int *size)
844 //fprintf (stderr, "%s: region %x..%x, bank %x, alias %x, pic->bankmask %x, min_size %d\n", __FUNCTION__, r->start_address, r->end_address, r->bank, r->alias, pic->bankMask, size ? *size : 0);
845 // find sufficiently large shared region
846 if ((r->alias == pic->bankMask)
847 && (r->end_address != r->start_address) // ignore SFRs
848 && (!size || (*size <= (r->end_address - r->start_address + 1))))
850 if (low) *low = r->start_address;
851 if (high) *high = r->end_address;
852 if (size) *size = r->end_address - r->start_address + 1;
859 if (high) *high = 0x0;
860 if (size) *size = 0x0;
861 //fprintf (stderr, "%s: no shared bank found\n", __FUNCTION__);
866 * True iff the memory region [low, high] is aliased in all banks.
868 int pic14_isShared(int low, int high)
876 //fprintf (stderr, "%s: region %x..%x, bank %x, alias %x, pic->bankmask %x\n", __FUNCTION__, r->start_address, r->end_address, r->bank, r->alias, pic->bankMask);
877 if ((r->alias == pic->bankMask) && (r->start_address <= low) && (r->end_address >= high)) {
887 * True iff all RAM is aliased in all banks (no BANKSELs required except for
890 int pic14_allRAMShared(void)
898 if (r->alias != pic->bankMask) return 0;
906 * True iff the pseudo stack is a sharebank --> let linker place it.
907 * [low, high] denotes a size byte long block of (shared or banked)
910 int pic14_getSharedStack(int *low, int *high, int *size)
915 s = options.stack_size ? options.stack_size : 0x10;
916 haveShared = pic14_hasSharebank(&l, &h, &s);
917 if ((options.stack_loc != 0) || !haveShared)
919 // sharebank not available or not to be used
920 s = options.stack_size ? options.stack_size : 0x10;
921 l = options.stack_loc ? options.stack_loc : 0x20;
926 // return 1 iff [low, high] is present in all banks
927 //fprintf(stderr, "%s: low %x, high %x, size %x, shared %d\n", __FUNCTION__, l, h, s, pic14_isShared(l, h));
928 return (pic14_isShared(l, h));
930 // sharebanks available for use by the stack
931 if (options.stack_size) s = options.stack_size;
932 else if (!s || s > 16) s = 16; // limit stack to 16 bytes in SHAREBANK
934 // provide addresses for sharebank
936 if (high) *high = l + s - 1;
938 //fprintf(stderr, "%s: low %x, high %x, size %x, shared 1\n", __FUNCTION__, l, h, s);
943 PIC_device * pic14_getPIC(void)