(find_tag): find external references, we can't handle those, so tell
user that instead of crashing git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@15659 ec53bebd-3082-4978-b11e-865c3cabbd6b
This commit is contained in:
		@@ -32,6 +32,7 @@
 | 
				
			|||||||
 */
 | 
					 */
 | 
				
			||||||
 | 
					
 | 
				
			||||||
#include "gen_locl.h"
 | 
					#include "gen_locl.h"
 | 
				
			||||||
 | 
					#include "lex.h"
 | 
				
			||||||
 | 
					
 | 
				
			||||||
RCSID("$Id$");
 | 
					RCSID("$Id$");
 | 
				
			||||||
 | 
					
 | 
				
			||||||
@@ -160,6 +161,14 @@ find_tag (const Type *t,
 | 
				
			|||||||
	*tag = t->tag.tagvalue;
 | 
						*tag = t->tag.tagvalue;
 | 
				
			||||||
	break;
 | 
						break;
 | 
				
			||||||
    case TType: 
 | 
					    case TType: 
 | 
				
			||||||
 | 
						if ((t->symbol->stype == Stype && t->symbol->type == NULL)
 | 
				
			||||||
 | 
						    || t->symbol->stype == SUndefined) {
 | 
				
			||||||
 | 
						    error_message("%s is imported or still undefined, "
 | 
				
			||||||
 | 
								  " can't generate tag checking data in CHOICE "
 | 
				
			||||||
 | 
								  "without this information",
 | 
				
			||||||
 | 
								  t->symbol->name);
 | 
				
			||||||
 | 
						    exit(1);
 | 
				
			||||||
 | 
						}
 | 
				
			||||||
	find_tag(t->symbol->type, cl, ty, tag);
 | 
						find_tag(t->symbol->type, cl, ty, tag);
 | 
				
			||||||
	return;
 | 
						return;
 | 
				
			||||||
    case TUTCTime: 
 | 
					    case TUTCTime: 
 | 
				
			||||||
 
 | 
				
			|||||||
		Reference in New Issue
	
	Block a user