View Issue Details

IDProjectCategoryView StatusLast Update
0014392LazarusPatchpublic2009-08-20 19:26
ReporterDmitry Boyarintsev Assigned ToMartin Friebe  
PrioritynormalSeverityfeatureReproducibilityalways
Status closedResolutionfixed 
Target Version0.9.30Fixed in Version0.9.29 (SVN) 
Summary0014392: SynEdit's Pascal highligher: added keyword "mwpascal".
Descriptionmwpascal is metroworks pascal compatible calling convertion.
It's used mainly in OSX/Carbon units.

Index: synhighlighterpas.pp
===================================================================
--- synhighlighterpas.pp (revision 21307)
+++ synhighlighterpas.pp (working copy)
@@ -1371,7 +1371,8 @@
     fRange := fRange - [rsInterface] + [rsImplementation];
     if TopPascalCodeFoldBlockType=cfbtNone then StartPascalCodeFoldBlock(cfbtProgram);
     Result := tkKey;
- end
+ end else if KeyComp('Mwpascal') then
+ Result := tkKey
   else Result := tkIdentifier;
 end;
TagsNo tags attached.
Fixed in Revision21350
LazTarget0.9.30
Widgetset
Attached Files

Activities

2009-08-20 17:13

 

synhighlighterpas.pp.patch (478 bytes)   
Index: synhighlighterpas.pp
===================================================================
--- synhighlighterpas.pp	(revision 21307)
+++ synhighlighterpas.pp	(working copy)
@@ -1371,7 +1371,8 @@
     fRange := fRange - [rsInterface] + [rsImplementation];
     if TopPascalCodeFoldBlockType=cfbtNone then StartPascalCodeFoldBlock(cfbtProgram);
     Result := tkKey;
-  end
+  end else if KeyComp('Mwpascal') then
+    Result := tkKey
   else Result := tkIdentifier;
 end;
 
synhighlighterpas.pp.patch (478 bytes)   

Martin Friebe

2009-08-20 18:12

manager   ~0030031

please test and close if ok.

Dmitry Boyarintsev

2009-08-20 19:26

developer   ~0030035

thank you

Issue History

Date Modified Username Field Change
2009-08-20 17:13 Dmitry Boyarintsev New Issue
2009-08-20 17:13 Dmitry Boyarintsev File Added: synhighlighterpas.pp.patch
2009-08-20 17:13 Dmitry Boyarintsev LazTarget => -
2009-08-20 17:54 Martin Friebe Status new => assigned
2009-08-20 17:54 Martin Friebe Assigned To => Martin Friebe
2009-08-20 18:12 Martin Friebe Fixed in Revision => 21350
2009-08-20 18:12 Martin Friebe LazTarget - => 0.9.30
2009-08-20 18:12 Martin Friebe Status assigned => resolved
2009-08-20 18:12 Martin Friebe Fixed in Version => 0.9.29 (SVN)
2009-08-20 18:12 Martin Friebe Resolution open => fixed
2009-08-20 18:12 Martin Friebe Note Added: 0030031
2009-08-20 18:12 Martin Friebe Target Version => 0.9.30
2009-08-20 19:26 Dmitry Boyarintsev Status resolved => closed
2009-08-20 19:26 Dmitry Boyarintsev Note Added: 0030035