~ubuntu-branches/ubuntu/trusty/monodevelop/trusty-proposed

if (checkpoints.Length <= CheckpointIndex) throw new Exception (String.Format ("Should not happen. Token is {0:X04}, checkpoints are {1}, index is {2}", token, checkpoints.Length, CheckpointIndex));

363

return checkpoints [CheckpointIndex].File;

364

}

365

}

366

367

// The ISymbolDocumentWriter interface is used by the symbol writer to

368

// describe a single source file - for each source file there's exactly

369

// one corresponding ISymbolDocumentWriter instance.

370

371

// This class has an internal hash table mapping source document names

372

// to such ISymbolDocumentWriter instances - so there's exactly one

373

// instance per document.

374

375

// This property returns the ISymbolDocumentWriter instance which belongs

376

// to the location's source file.

377

378

// If we don't have a symbol writer, this property is always null.

379

public SourceFile SourceFile {

380

get {

381

int index = File;

382

if (index == 0)

383

return null;

384

return source_list [index - 1];

385

}

386

}

387

388

#region IEquatable<Location> Members

389

390

public bool Equals (Location other)

391

{

392

return this.token == other.token;

393

}

394

395

#endregion

396

}

397

398

public class SpecialsBag

399

{

400

public enum CommentType

401

{

402

Single,

403

Multi,

404

Documentation,

405

InactiveCode

406

}

407

408

public class Comment

409

{

410

public readonly CommentType CommentType;

411

public readonly bool StartsLine;

412

public readonly int Line;

413

public readonly int Col;

414

public readonly int EndLine;

415

public readonly int EndCol;

416

public readonly string Content;

417

418

public Comment (CommentType commentType, bool startsLine, int line, int col, int endLine, int endCol, string content)

419

{

420

this.CommentType = commentType;

421

this.StartsLine = startsLine;

422

this.Line = line;

423

this.Col = col;

424

this.EndLine = endLine;

425

this.EndCol = endCol;

426

this.Content = content;

427

}

428

429

public override string ToString ()

430

{

431

return string.Format ("[Comment: CommentType={0}, Line={1}, Col={2}, EndLine={3}, EndCol={4}, Content={5}]", CommentType, Line, Col, EndLine, EndCol, Content);

432

}

433

}

434

435

public class PreProcessorDirective

436

{

437

public readonly int Line;

438

public readonly int Col;

439

public readonly int EndLine;

440

public readonly int EndCol;

441

442

public readonly Tokenizer.PreprocessorDirective Cmd;

443

public readonly string Arg;

444

445

public bool Take = true;

446

447

public PreProcessorDirective (int line, int col, int endLine, int endCol, Tokenizer.PreprocessorDirective cmd, string arg)

448

{

449

this.Line = line;

450

this.Col = col;

451

this.EndLine = endLine;

452

this.EndCol = endCol;

453

this.Cmd = cmd;

454

this.Arg = arg;

455

}

456

457

public override string ToString ()

458

{

459

return string.Format ("[PreProcessorDirective: Line={0}, Col={1}, EndLine={2}, EndCol={3}, Cmd={4}, Arg={5}]", Line, Col, EndLine, EndCol, Cmd, Arg);

460

}

461

}

462

463

public readonly List<object> Specials = new List<object> ();

464

465

CommentType curComment;

466

bool startsLine;

467

int startLine, startCol;

468

System.Text.StringBuilder contentBuilder = new System.Text.StringBuilder ();

469

470

[Conditional ("FULL_AST")]

471

public void StartComment (CommentType type, bool startsLine, int startLine, int startCol)

472

{

473

inComment = true;

474

curComment = type;

475

this.startsLine = startsLine;

476

this.startLine = startLine;

477

this.startCol = startCol;

478

contentBuilder.Length = 0;

479

}

480

481

[Conditional ("FULL_AST")]

482

public void PushCommentChar (int ch)

483

{

484

if (ch < 0)

485

return;

486

contentBuilder.Append ((char)ch);

487

}

488

[Conditional ("FULL_AST")]

489

public void PushCommentString (string str)

490

{

491

contentBuilder.Append (str);

492

}

493

494

bool inComment;

495

[Conditional ("FULL_AST")]

496

public void EndComment (int endLine, int endColumn)

497

{

498

if (!inComment)

499

return;

500

inComment = false;

501

Specials.Add (new Comment (curComment, startsLine, startLine, startCol, endLine, endColumn, contentBuilder.ToString ()));

502

}

503

504

[Conditional ("FULL_AST")]

505

public void AddPreProcessorDirective (int startLine, int startCol, int endLine, int endColumn, Tokenizer.PreprocessorDirective cmd, string arg)

506

{

507

if (inComment)

508

EndComment (startLine, startCol);

509

Specials.Add (new PreProcessorDirective (startLine, startCol, endLine, endColumn, cmd, arg));

510

}

511

512

public void SkipIf ()

513

{

514

if (Specials.Count > 0) {

515

var directive = Specials[Specials.Count - 1] as PreProcessorDirective;

516

if (directive != null)

517

directive.Take = false;

518

}

519

}

520

}

521

522

523

// A bag of additional locations to support full ast tree

524

525

public class LocationsBag

526

{

527

public class MemberLocations

528

{

529

public IList<Tuple<Modifiers, Location>> Modifiers { get; internal set; }

530

List<Location> locations;

531

532

public MemberLocations (IList<Tuple<Modifiers, Location>> mods, IEnumerable<Location> locs)

533

{

534

Modifiers = mods;

535

locations = locs != null ? new List<Location> (locs) : null;

536

}

537

538

#region Properties

539

540

public Location this [int index] {

541

get {

542

return locations [index];

543

}

544

}

545

546

public int Count {

547

get {

548

return locations != null ? locations.Count : 0;

549

}

550

}

551

552

#endregion

553

554

public void AddLocations (params Location[] additional)

555

556

{

557

558

AddLocations ((IEnumerable<Location>)additional);

559

560

}

561

public void AddLocations (IEnumerable<Location> additional)

562

{

563

if (additional == null)

564

return;

565

if (locations == null) {

566

locations = new List<Location>(additional);

567

} else {

568

locations.AddRange (additional);

569

}

570

}

571

}

572

573

public MemberCore LastMember {

574

get;

575

private set;

576

}

577

578

Dictionary<object, List<Location>> simple_locs = new Dictionary<object, List<Location>> (ReferenceEquality<object>.Default);

579

Dictionary<MemberCore, MemberLocations> member_locs = new Dictionary<MemberCore, MemberLocations> (ReferenceEquality<MemberCore>.Default);

580

581

[Conditional ("FULL_AST")]

582

public void AddLocation (object element, params Location[] locations)

583

{

584

AddLocation (element, (IEnumerable<Location>)locations);

585

}

586

587

[Conditional ("FULL_AST")]

588

public void AddLocation (object element, IEnumerable<Location> locations)

589

{

590

if (element == null || locations == null)

591

return;

592

simple_locs.Add (element, new List<Location> (locations));

593

}

594

595

[Conditional ("FULL_AST")]

596

public void AddStatement (object element, params Location[] locations)

597

{

598

if (element == null)

599

return;

600

if (locations.Length == 0)

601

throw new ArgumentException ("Statement is missing semicolon location");

602

simple_locs.Add (element, new List<Location>(locations));

603

}

604

605

[Conditional ("FULL_AST")]

606

public void AddMember (MemberCore member, IList<Tuple<Modifiers, Location>> modLocations, params Location[] locations)

607

{

608

LastMember = member;

609

if (member == null)

610

return;

611

612

MemberLocations existing;

613

if (member_locs.TryGetValue (member, out existing)) {

614

existing.Modifiers = modLocations;

615

existing.AddLocations (locations);

616

return;

617

}

618

member_locs.Add (member, new MemberLocations (modLocations, locations));

619

}

620

[Conditional ("FULL_AST")]

621

public void AddMember (MemberCore member, IList<Tuple<Modifiers, Location>> modLocations, IEnumerable<Location> locations)

622

{

623

LastMember = member;

624

if (member == null)

625

return;

626

627

MemberLocations existing;

628

if (member_locs.TryGetValue (member, out existing)) {

629

existing.Modifiers = modLocations;

630

existing.AddLocations (locations);

631

return;

632

}

633

member_locs.Add (member, new MemberLocations (modLocations, locations));

634

}

635

636

[Conditional ("FULL_AST")]

637

public void AppendTo (object existing, params Location[] locations)

638

{

639

AppendTo (existing, (IEnumerable<Location>)locations);

640

641

}

642

643

[Conditional ("FULL_AST")]

644

public void AppendTo (object existing, IEnumerable<Location> locations)

645

{

646

if (existing == null)

647

return;

648

List<Location> locs;

649

if (simple_locs.TryGetValue (existing, out locs)) {

650

simple_locs [existing].AddRange (locations);

651

return;

652

}

653

AddLocation (existing, locations);

654

}

655

656

[Conditional ("FULL_AST")]

657

public void AppendToMember (MemberCore existing, params Location[] locations)

658

{

659

AppendToMember (existing, (IEnumerable<Location>)locations);

660

661

}

662

663

[Conditional ("FULL_AST")]

664

public void AppendToMember (MemberCore existing, IEnumerable<Location> locations)

665

{

666

if (existing == null)

667

return;

668

MemberLocations member;

669

if (member_locs.TryGetValue (existing, out member)) {

670

member.AddLocations (locations);

671

return;

672

}

673

member_locs.Add (existing, new MemberLocations (null, locations));

674

}

675

676

public List<Location> GetLocations (object element)

677

{

678

if (element == null)

679

return null;

680

List<Location > found;

681

simple_locs.TryGetValue (element, out found);

682

return found;

683

}

684

685

public MemberLocations GetMemberLocation (MemberCore element)

686

{

687

MemberLocations found;

688

member_locs.TryGetValue (element, out found);

689

return found;

690

}

691

}

692

}

Older »