stx_goodies_petitparser.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Tue, 16 Jun 2015 06:45:26 +0100
changeset 489 0ca7a70db0f5
parent 483 3fe67c1fc040
child 493 0aed9c69ed48
permissions -rw-r--r--
Fix in codegen for inlined sequence nodes. For inlined sequence nodes, generate nested ifs rather than sequential code which does not work when inlined. The reason is that #codeReturn: in inline generates instvar assignment, not method return, so in sequential code the next child of a sequence will be probed even if previous failed. If that happends, the whole sequence fail and therefore we must generate nested ifs to correctly handle this w.r.t. inlining.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
5
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     1
"{ Package: 'stx:goodies/petitparser' }"
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     2
427
a7f5e6de19d2 Merged JK's version from Monticello
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 423
diff changeset
     3
"{ NameSpace: Smalltalk }"
a7f5e6de19d2 Merged JK's version from Monticello
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 423
diff changeset
     4
5
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     5
LibraryDefinition subclass:#stx_goodies_petitparser
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     6
	instanceVariableNames:''
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     7
	classVariableNames:''
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     8
	poolDictionaries:''
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
     9
	category:'* Projects & Packages *'
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    10
!
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    11
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    12
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    13
!stx_goodies_petitparser class methodsFor:'accessing'!
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    14
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    15
monticelloPackageName
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    16
    "hook for packages which have been loaded from monticello"
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    17
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    18
    ^ 'PetitParser'
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    19
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    20
    "Created: / 17-12-2010 / 19:44:58 / Jan Vrany <jan.vrany@fit.cvut.cz>"
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    21
! !
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    22
376
a2656b27cace Added monticelloName to package definition to ease export to .mcz
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 375
diff changeset
    23
!stx_goodies_petitparser class methodsFor:'accessing - monticello'!
a2656b27cace Added monticelloName to package definition to ease export to .mcz
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 375
diff changeset
    24
377
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
    25
monticelloLastMergedVersionInfo
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
    26
    "The last merged version is: "
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
    27
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
    28
    ^ '
405
0470a5e6e712 Merged PetitParser and PetitTests
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 387
diff changeset
    29
    Name: PetitParser-JanKurs.253
377
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
    30
    Author: JanKurs
405
0470a5e6e712 Merged PetitParser and PetitTests
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 387
diff changeset
    31
    Time: 30-10-2014, 03:55:46 AM
412
5f1ebef11a64 Fixed mcz make target.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 408
diff changeset
    32
    UUID: c7100f9c-e875-4453-8f26-e0c91dd49b91
377
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
    33
    Repository: http://smalltalkhub.com/mc/Moose/PetitParser/main
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
    34
    '
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
    35
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
    36
    "Created: / 03-10-2014 / 02:27:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
405
0470a5e6e712 Merged PetitParser and PetitTests
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 387
diff changeset
    37
    "Modified: / 03-11-2014 / 08:27:00 / Jan Vrany <jan.vrany@fit.cvut.cz>"
377
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
    38
!
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
    39
376
a2656b27cace Added monticelloName to package definition to ease export to .mcz
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 375
diff changeset
    40
monticelloName
a2656b27cace Added monticelloName to package definition to ease export to .mcz
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 375
diff changeset
    41
    "Return name of the package for Monticello. This is used when package is exported"
a2656b27cace Added monticelloName to package definition to ease export to .mcz
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 375
diff changeset
    42
a2656b27cace Added monticelloName to package definition to ease export to .mcz
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 375
diff changeset
    43
    ^ 'PetitParser'
a2656b27cace Added monticelloName to package definition to ease export to .mcz
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 375
diff changeset
    44
a2656b27cace Added monticelloName to package definition to ease export to .mcz
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 375
diff changeset
    45
    "Created: / 03-10-2014 / 01:47:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
a2656b27cace Added monticelloName to package definition to ease export to .mcz
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 375
diff changeset
    46
! !
a2656b27cace Added monticelloName to package definition to ease export to .mcz
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 375
diff changeset
    47
375
e2b2f08d054e All tests moved from stx:goodies/petitparser to stx:goodies/petitparser/tests
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 315
diff changeset
    48
!stx_goodies_petitparser class methodsFor:'accessing - tests'!
e2b2f08d054e All tests moved from stx:goodies/petitparser to stx:goodies/petitparser/tests
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 315
diff changeset
    49
e2b2f08d054e All tests moved from stx:goodies/petitparser to stx:goodies/petitparser/tests
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 315
diff changeset
    50
testSuite
e2b2f08d054e All tests moved from stx:goodies/petitparser to stx:goodies/petitparser/tests
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 315
diff changeset
    51
    "generate and return a testSuite containing all of my test-classes"
e2b2f08d054e All tests moved from stx:goodies/petitparser to stx:goodies/petitparser/tests
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 315
diff changeset
    52
e2b2f08d054e All tests moved from stx:goodies/petitparser to stx:goodies/petitparser/tests
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 315
diff changeset
    53
    Smalltalk loadPackage: 'stx:goodies/petitparser/tests'.
e2b2f08d054e All tests moved from stx:goodies/petitparser to stx:goodies/petitparser/tests
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 315
diff changeset
    54
    ^ 'stx:goodies/petitparser/tests' asPackageId projectDefinitionClass testSuite
e2b2f08d054e All tests moved from stx:goodies/petitparser to stx:goodies/petitparser/tests
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 315
diff changeset
    55
e2b2f08d054e All tests moved from stx:goodies/petitparser to stx:goodies/petitparser/tests
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 315
diff changeset
    56
! !
e2b2f08d054e All tests moved from stx:goodies/petitparser to stx:goodies/petitparser/tests
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 315
diff changeset
    57
5
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    58
!stx_goodies_petitparser class methodsFor:'description'!
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    59
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    60
excludedFromPreRequisites
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    61
    "list all packages which should be ignored in the automatic
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    62
     preRequisites scan. See #preRequisites for more."
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    63
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    64
    ^ #(
482
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
    65
        #'stx:goodies/monticello'    "MCDirectoryRepository - referenced by stx_goodies_petitparser class>>monticelloExportTo:"
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
    66
        #'stx:libscm/mercurial'    "HGPackageWorkingCopy - referenced by stx_goodies_petitparser class>>monticelloExportTo:"
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
    67
        #'stx:libscm/mercurial/monticello'    "HGMCVersionInfo - referenced by stx_goodies_petitparser class>>monticelloExportTo:"
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
    68
        #'stx:libwidg'    "ScrollableView - referenced by PPParser>>inspector2TabTree"
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
    69
        #'stx:libwidg2'    "HierarchicalListView - referenced by PPParser>>inspector2TabTree"            
5
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    70
    )
482
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
    71
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
    72
    "Modified: / 03-06-2015 / 08:47:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
5
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    73
!
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    74
134
03907685ddff Now preRequiites are separated in mandatoryPreRequisites and referencedPreRequisites
Stefan Vogel <sv@exept.de>
parents: 90
diff changeset
    75
mandatoryPreRequisites
377
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
    76
    "list packages which are mandatory as a prerequisite.
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
    77
     This are packages containing superclasses of my classes and classes which
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
    78
     are extended by myself.
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
    79
     They are mandatory, because we need these packages as a prerequisite for loading and compiling.
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
    80
     This method is generated automatically,
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
    81
     by searching along the inheritance chain of all of my classes."
5
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    82
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
    83
    ^ #(
377
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
    84
        #'stx:libbasic'    "ArrayedCollection - extended"
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
    85
        #'stx:libbasic2'    "Text - extended"
134
03907685ddff Now preRequiites are separated in mandatoryPreRequisites and referencedPreRequisites
Stefan Vogel <sv@exept.de>
parents: 90
diff changeset
    86
    )
03907685ddff Now preRequiites are separated in mandatoryPreRequisites and referencedPreRequisites
Stefan Vogel <sv@exept.de>
parents: 90
diff changeset
    87
!
03907685ddff Now preRequiites are separated in mandatoryPreRequisites and referencedPreRequisites
Stefan Vogel <sv@exept.de>
parents: 90
diff changeset
    88
03907685ddff Now preRequiites are separated in mandatoryPreRequisites and referencedPreRequisites
Stefan Vogel <sv@exept.de>
parents: 90
diff changeset
    89
referencedPreRequisites
377
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
    90
    "list packages which are a prerequisite, because they contain
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
    91
     classes which are referenced by my classes.
427
a7f5e6de19d2 Merged JK's version from Monticello
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 423
diff changeset
    92
     We do not need these packages as a prerequisite for compiling or loading,
a7f5e6de19d2 Merged JK's version from Monticello
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 423
diff changeset
    93
     however, a class from it may be referenced during execution and having it
a7f5e6de19d2 Merged JK's version from Monticello
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 423
diff changeset
    94
     unloaded then may lead to a runtime doesNotUnderstand error, unless the caller
a7f5e6de19d2 Merged JK's version from Monticello
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 423
diff changeset
    95
     includes explicit checks for the package being present.
377
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
    96
     This method is generated automatically,
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
    97
     by searching all classes (and their packages) which are referenced by my classes."
134
03907685ddff Now preRequiites are separated in mandatoryPreRequisites and referencedPreRequisites
Stefan Vogel <sv@exept.de>
parents: 90
diff changeset
    98
03907685ddff Now preRequiites are separated in mandatoryPreRequisites and referencedPreRequisites
Stefan Vogel <sv@exept.de>
parents: 90
diff changeset
    99
    ^ #(
5
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   100
    )
90
ac3a0d07b1e4 -inlinenot
Claus Gittinger <cg@exept.de>
parents: 67
diff changeset
   101
!
ac3a0d07b1e4 -inlinenot
Claus Gittinger <cg@exept.de>
parents: 67
diff changeset
   102
ac3a0d07b1e4 -inlinenot
Claus Gittinger <cg@exept.de>
parents: 67
diff changeset
   103
stcOptimizationOptions
ac3a0d07b1e4 -inlinenot
Claus Gittinger <cg@exept.de>
parents: 67
diff changeset
   104
    "do not inline the not operation here - it is overwritten"
ac3a0d07b1e4 -inlinenot
Claus Gittinger <cg@exept.de>
parents: 67
diff changeset
   105
ac3a0d07b1e4 -inlinenot
Claus Gittinger <cg@exept.de>
parents: 67
diff changeset
   106
    ^ '+optspace3 -inlinenot'
ac3a0d07b1e4 -inlinenot
Claus Gittinger <cg@exept.de>
parents: 67
diff changeset
   107
ac3a0d07b1e4 -inlinenot
Claus Gittinger <cg@exept.de>
parents: 67
diff changeset
   108
    "Created: / 23-08-2006 / 01:27:22 / cg"
244
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   109
!
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   110
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   111
subProjects
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   112
    "list packages which are known as subprojects.
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   113
     The generated makefile will enter those and make there as well.
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   114
     However: they are not forced to be loaded when a package is loaded;
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   115
     for those, redefine requiredPrerequisites"
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   116
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   117
    ^ #(
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   118
        #'stx:goodies/petitparser/analyzer'
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   119
        #'stx:goodies/petitparser/tests'
483
3fe67c1fc040 Oops, fixed subproject definition (wrong package names)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 482
diff changeset
   120
        #'stx:goodies/petitparser/parsers/smalltalk'
3fe67c1fc040 Oops, fixed subproject definition (wrong package names)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 482
diff changeset
   121
        #'stx:goodies/petitparser/parsers/java'
3fe67c1fc040 Oops, fixed subproject definition (wrong package names)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 482
diff changeset
   122
        #'stx:goodies/petitparser/compiler'
447
cfbc9055c83b Removed tests from compiled packages to workaround bug in stc.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 427
diff changeset
   123
)
5
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   124
! !
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   125
382
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   126
!stx_goodies_petitparser class methodsFor:'description - compilation'!
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   127
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   128
additionalRules_make_dot_proto
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   129
    "allows for additional rules to be added to the make.proto file."
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   130
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   131
    ^ '
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   132
mc:
385
44a36ed4e484 Commited a Smalltalk parser (MC package PetitSmalltalk)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 383
diff changeset
   133
	mkdir mc
382
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   134
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   135
mcz: mc
387
e2b2ccaa4de6 Commited a island parser support (MC package PetitIslands)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 385
diff changeset
   136
	$(TOP)/projects/smalltalk/smalltalk --eval "                            \
412
5f1ebef11a64 Fixed mcz make target.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 408
diff changeset
   137
		Class tryLocalSourceFirst: true.				\
405
0470a5e6e712 Merged PetitParser and PetitTests
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 387
diff changeset
   138
		Smalltalk packagePath add:''$(TOP)/..'' .                       \
387
e2b2ccaa4de6 Commited a island parser support (MC package PetitIslands)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 385
diff changeset
   139
		Smalltalk loadPackage:''stx:goodies/petitparser''.              \
455
44208dab727c Added .../parsers/java and .../compiler/tests/extras to exported .mczs
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 447
diff changeset
   140
		(Smalltalk at: #''stx_goodies_petitparser'') monticelloExportTo: ''mc''."
382
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   141
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   142
'
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   143
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   144
    "Created: / 04-10-2014 / 21:45:55 / Jan Vrany <jan.vrany@fit.cvut.cz>"
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   145
! !
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   146
5
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   147
!stx_goodies_petitparser class methodsFor:'description - contents'!
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   148
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   149
classNamesAndAttributes
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   150
    "lists the classes which are to be included in the project.
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   151
     Each entry in the list may be: a single class-name (symbol),
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   152
     or an array-literal consisting of class name and attributes.
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   153
     Attributes are: #autoload or #<os> where os is one of win32, unix,..."
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   154
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   155
    ^ #(
244
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   156
        "<className> or (<className> attributes...) in load order"
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   157
        PPCharSetPredicate
377
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
   158
        PPContext
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
   159
        PPContextMemento
244
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   160
        PPFailure
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   161
        PPMemento
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   162
        PPParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   163
        PPStream
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   164
        PPToken
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   165
        #'stx_goodies_petitparser'
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   166
        PPDelegateParser
427
a7f5e6de19d2 Merged JK's version from Monticello
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 423
diff changeset
   167
        PPEndOfFileParser
421
7e08b31e0dae Merged JK's version from Monticello
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 412
diff changeset
   168
        PPEndOfLineParser
244
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   169
        PPEpsilonParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   170
        PPFailingParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   171
        PPListParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   172
        PPLiteralParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   173
        PPPluggableParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   174
        PPPredicateParser
377
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
   175
        PPStartOfLine
421
7e08b31e0dae Merged JK's version from Monticello
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 412
diff changeset
   176
        PPStartOfLineParser
427
a7f5e6de19d2 Merged JK's version from Monticello
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 423
diff changeset
   177
        PPStartOfLogicalLineParser
a7f5e6de19d2 Merged JK's version from Monticello
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 423
diff changeset
   178
        PPStartOfWordParser
244
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   179
        PPUnresolvedParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   180
        PPActionParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   181
        PPAndParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   182
        PPChoiceParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   183
        PPCompositeParser
427
a7f5e6de19d2 Merged JK's version from Monticello
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 423
diff changeset
   184
        PPConditionalParser
244
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   185
        PPEndOfInputParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   186
        PPExpressionParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   187
        PPFlattenParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   188
        PPLiteralObjectParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   189
        PPLiteralSequenceParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   190
        PPMemoizedParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   191
        PPNotParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   192
        PPOptionalParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   193
        PPPredicateObjectParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   194
        PPPredicateSequenceParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   195
        PPRepeatingParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   196
        PPSequenceParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   197
        PPTrimmingParser
421
7e08b31e0dae Merged JK's version from Monticello
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 412
diff changeset
   198
        PPLimitedChoiceParser
244
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   199
        PPLimitedRepeatingParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   200
        PPPossessiveRepeatingParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   201
        PPTokenParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   202
        PPWrappingParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   203
        PPGreedyRepeatingParser
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   204
        PPLazyRepeatingParser
5
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   205
    )
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   206
!
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   207
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   208
extensionMethodNames
377
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
   209
    "list class/selector pairs of extensions.
6112a403a52d Updated to latest version from Moose repository.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 376
diff changeset
   210
     A correponding method with real names must be present in my concrete subclasses"
5
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   211
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   212
    ^ #(
233
896c872b5da9 initial
Claus Gittinger <cg@exept.de>
parents: 212
diff changeset
   213
        Block asParser
896c872b5da9 initial
Claus Gittinger <cg@exept.de>
parents: 212
diff changeset
   214
        BlockContext asParser
896c872b5da9 initial
Claus Gittinger <cg@exept.de>
parents: 212
diff changeset
   215
        Character asParser
315
Claus Gittinger <cg@exept.de>
parents: 244
diff changeset
   216
        Collection asChoiceParser
Claus Gittinger <cg@exept.de>
parents: 244
diff changeset
   217
        Collection asSequenceParser
Claus Gittinger <cg@exept.de>
parents: 244
diff changeset
   218
        Interval asParser
233
896c872b5da9 initial
Claus Gittinger <cg@exept.de>
parents: 212
diff changeset
   219
        Object asParser
896c872b5da9 initial
Claus Gittinger <cg@exept.de>
parents: 212
diff changeset
   220
        Object isPetitFailure
896c872b5da9 initial
Claus Gittinger <cg@exept.de>
parents: 212
diff changeset
   221
        Object isPetitParser
896c872b5da9 initial
Claus Gittinger <cg@exept.de>
parents: 212
diff changeset
   222
        PositionableStream asPetitStream
896c872b5da9 initial
Claus Gittinger <cg@exept.de>
parents: 212
diff changeset
   223
        SequenceableCollection asPetitStream
896c872b5da9 initial
Claus Gittinger <cg@exept.de>
parents: 212
diff changeset
   224
        Set asParser
896c872b5da9 initial
Claus Gittinger <cg@exept.de>
parents: 212
diff changeset
   225
        Stream asPetitStream
896c872b5da9 initial
Claus Gittinger <cg@exept.de>
parents: 212
diff changeset
   226
        String asParser
896c872b5da9 initial
Claus Gittinger <cg@exept.de>
parents: 212
diff changeset
   227
        Symbol asParser
896c872b5da9 initial
Claus Gittinger <cg@exept.de>
parents: 212
diff changeset
   228
        Symbol value:
896c872b5da9 initial
Claus Gittinger <cg@exept.de>
parents: 212
diff changeset
   229
        Text asPetitStream
896c872b5da9 initial
Claus Gittinger <cg@exept.de>
parents: 212
diff changeset
   230
        UndefinedObject asParser
379
451b5ae38b72 Some tests fixed.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 377
diff changeset
   231
        PositionableStream peekTwice
408
ead04d661728 Removed obsolete Character>>ppMinus:
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 405
diff changeset
   232
        Collection asParser
5
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   233
    )
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   234
! !
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   235
244
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   236
!stx_goodies_petitparser class methodsFor:'description - monticello'!
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   237
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   238
monticelloTimestamps
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   239
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   240
    ^#(
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   241
    )
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   242
! !
c9c5df552e30 initial
Claus Gittinger <cg@exept.de>
parents: 233
diff changeset
   243
5
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   244
!stx_goodies_petitparser class methodsFor:'description - project information'!
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   245
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   246
companyName
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   247
    "Return a companyname which will appear in <lib>.rc"
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   248
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   249
    ^ 'Lukas Renggli & SWING Research Group'
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   250
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   251
    "Modified: / 17-12-2010 / 19:43:50 / Jan Vrany <jan.vrany@fit.cvut.cz>"
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   252
!
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   253
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   254
description
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   255
    "Return a description string which will appear in vc.def / bc.def"
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   256
148
b44426fa6b0f class: stx_goodies_petitparser
Claus Gittinger <cg@exept.de>
parents: 147
diff changeset
   257
    ^ 'Smalltalk/X Scannerless Parser & Parser Combinator Library'
5
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   258
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   259
    "Modified: / 17-12-2010 / 19:43:00 / Jan Vrany <jan.vrany@fit.cvut.cz>"
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   260
!
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   261
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   262
legalCopyright
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   263
    "Return a copyright string which will appear in <lib>.rc"
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   264
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   265
    ^ '(C) Lukas Renggli'
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   266
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   267
    "Modified: / 17-12-2010 / 19:43:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   268
!
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   269
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   270
productName
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   271
    "Return a product name which will appear in <lib>.rc"
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   272
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   273
    ^ 'Petit Parser'
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   274
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   275
    "Modified: / 17-12-2010 / 19:43:26 / Jan Vrany <jan.vrany@fit.cvut.cz>"
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   276
! !
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   277
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   278
!stx_goodies_petitparser class methodsFor:'description - svn'!
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   279
8
9bb6c46efe0f Checkin from browser
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 5
diff changeset
   280
svnRepositoryUrlString
9bb6c46efe0f Checkin from browser
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 5
diff changeset
   281
    "Return a SVN repository URL of myself.
9bb6c46efe0f Checkin from browser
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 5
diff changeset
   282
     (Generated since 2011-04-08)
90
ac3a0d07b1e4 -inlinenot
Claus Gittinger <cg@exept.de>
parents: 67
diff changeset
   283
    "
8
9bb6c46efe0f Checkin from browser
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 5
diff changeset
   284
9bb6c46efe0f Checkin from browser
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 5
diff changeset
   285
    ^ '$URL: https://vranyj1@swing.fit.cvut.cz/svn/squeak/petitparser/trunk/squeak_petitparser.st $'
9bb6c46efe0f Checkin from browser
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 5
diff changeset
   286
!
9bb6c46efe0f Checkin from browser
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 5
diff changeset
   287
5
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   288
svnRevisionNr
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   289
    "Return a SVN revision number of myself.
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   290
     This number is updated after a commit"
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   291
8
9bb6c46efe0f Checkin from browser
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 5
diff changeset
   292
    ^ "$SVN-Revision:"'11              '"$"
5
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   293
! !
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   294
382
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   295
!stx_goodies_petitparser class methodsFor:'utilities - monticello'!
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   296
455
44208dab727c Added .../parsers/java and .../compiler/tests/extras to exported .mczs
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 447
diff changeset
   297
monticelloExportTo: directory
382
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   298
    "Export .mcz packages to given directory"
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   299
482
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   300
    | packages message exporter mcrepo hgrev hgrepo |
382
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   301
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   302
    Smalltalk loadPackage: 'stx:goodies/monticello'.
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   303
    Smalltalk loadPackage: 'stx:libscm/mercurial/monticello'.
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   304
    Class tryLocalSourceFirst: true.
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   305
482
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   306
    packages := #(
382
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   307
        'stx:goodies/petitparser'
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   308
        'stx:goodies/petitparser/tests'
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   309
        'stx:goodies/petitparser/analyzer'
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   310
        'stx:goodies/petitparser/analyzer/tests'
455
44208dab727c Added .../parsers/java and .../compiler/tests/extras to exported .mczs
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 447
diff changeset
   311
405
0470a5e6e712 Merged PetitParser and PetitTests
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 387
diff changeset
   312
        'stx:goodies/petitparser/parsers/smalltalk'
0470a5e6e712 Merged PetitParser and PetitTests
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 387
diff changeset
   313
        'stx:goodies/petitparser/parsers/smalltalk/tests'
455
44208dab727c Added .../parsers/java and .../compiler/tests/extras to exported .mczs
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 447
diff changeset
   314
        'stx:goodies/petitparser/parsers/java'
44208dab727c Added .../parsers/java and .../compiler/tests/extras to exported .mczs
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 447
diff changeset
   315
405
0470a5e6e712 Merged PetitParser and PetitTests
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 387
diff changeset
   316
        'stx:goodies/petitparser/compiler'
0470a5e6e712 Merged PetitParser and PetitTests
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 387
diff changeset
   317
        'stx:goodies/petitparser/compiler/tests'
455
44208dab727c Added .../parsers/java and .../compiler/tests/extras to exported .mczs
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 447
diff changeset
   318
        'stx:goodies/petitparser/compiler/tests/extras'
423
f3b99c7c1b20 Added benchmark package to set of exported .mcz
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 421
diff changeset
   319
        'stx:goodies/petitparser/compiler/benchmarks'
382
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   320
    ).
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   321
482
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   322
    packages do:[:pkgnm |
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   323
        Smalltalk loadPackage: pkgnm. 
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   324
    ].
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   325
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   326
    packages do:[:pkgnm | 
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   327
        | pm cs |
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   328
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   329
        pm := HGPackageWorkingCopy named: pkgnm.
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   330
        hgrepo isNil ifTrue:[
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   331
            hgrepo := pm repository.
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   332
        ].
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   333
        hgrev isNil ifTrue:[ 
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   334
            hgrev := pm revision.
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   335
        ] ifFalse:[ 
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   336
            hgrev = pm revision ifFalse:[ 
483
3fe67c1fc040 Oops, fixed subproject definition (wrong package names)
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 482
diff changeset
   337
                self error: 'Package revisions differ!!'
482
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   338
            ].
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   339
        ].
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   340
    ].
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   341
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   342
    message := (hgrepo @ hgrev) messageDigest.
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   343
382
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   344
    exporter := [:pkgnm|
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   345
        | mcpkg mcwc mcvi mcversion |
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   346
405
0470a5e6e712 Merged PetitParser and PetitTests
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 387
diff changeset
   347
        Stdout nextPutAll: 'Exporting '; nextPutLine: pkgnm.
382
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   348
        mcpkg := MCPackage named: pkgnm.
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   349
        mcwc := mcpkg workingCopy.
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   350
        mcvi := HGMCVersionInfo forPackage: pkgnm.
482
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   351
        mcvi message: message.
382
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   352
        [
455
44208dab727c Added .../parsers/java and .../compiler/tests/extras to exported .mczs
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 447
diff changeset
   353
           mcversion := mcwc newVersion.
44208dab727c Added .../parsers/java and .../compiler/tests/extras to exported .mczs
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 447
diff changeset
   354
           mcversion snapshot includeExtrasForSTX: false.
382
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   355
        ] on: MCVersionNameAndMessageRequest do:[:ex |
482
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   356
            ex resume: (Array with: mcvi name with: message)
382
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   357
        ].
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   358
        mcversion info: mcvi.
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   359
        mcrepo storeVersion: mcversion.
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   360
    ].
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   361
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   362
    mcrepo := MCDirectoryRepository new directory: directory.
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   363
    packages do: exporter.
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   364
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   365
    "
455
44208dab727c Added .../parsers/java and .../compiler/tests/extras to exported .mczs
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 447
diff changeset
   366
    stx_goodies_petitparser monticelloExportTo: '/tmp'
382
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   367
    "
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   368
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   369
    "Created: / 04-10-2014 / 21:30:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
482
9a7e7a05233f Updated .mcz exporting code to include a commit message digest
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 455
diff changeset
   370
    "Modified: / 03-06-2015 / 08:06:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
382
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   371
! !
1825151d6455 Added target `mcz` to export .mcz package out of Smalltalk/X package.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 379
diff changeset
   372
5
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   373
!stx_goodies_petitparser class methodsFor:'documentation'!
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   374
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   375
version
315
Claus Gittinger <cg@exept.de>
parents: 244
diff changeset
   376
    ^ '$Header: /cvs/stx/stx/goodies/petitparser/stx_goodies_petitparser.st,v 1.15 2014-03-04 20:30:48 cg Exp $'
5
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   377
!
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   378
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   379
version_CVS
315
Claus Gittinger <cg@exept.de>
parents: 244
diff changeset
   380
    ^ '$Header: /cvs/stx/stx/goodies/petitparser/stx_goodies_petitparser.st,v 1.15 2014-03-04 20:30:48 cg Exp $'
211
c156f64d8eb9 class: stx_goodies_petitparser
Claus Gittinger <cg@exept.de>
parents: 151
diff changeset
   381
!
c156f64d8eb9 class: stx_goodies_petitparser
Claus Gittinger <cg@exept.de>
parents: 151
diff changeset
   382
376
a2656b27cace Added monticelloName to package definition to ease export to .mcz
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 375
diff changeset
   383
version_HG
a2656b27cace Added monticelloName to package definition to ease export to .mcz
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 375
diff changeset
   384
    ^ '$Changeset: <not expanded> $'
a2656b27cace Added monticelloName to package definition to ease export to .mcz
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 375
diff changeset
   385
!
a2656b27cace Added monticelloName to package definition to ease export to .mcz
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 375
diff changeset
   386
211
c156f64d8eb9 class: stx_goodies_petitparser
Claus Gittinger <cg@exept.de>
parents: 151
diff changeset
   387
version_MC
212
4717e419eabc class: stx_goodies_petitparser
Claus Gittinger <cg@exept.de>
parents: 211
diff changeset
   388
    ^ '$PetitParser-lr.231 a18ceb3c-e6d2-4b74-91c9-33f05d2e0514 2013-03-16T21:51:30 lr$'
5
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   389
!
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   390
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   391
version_SVN
315
Claus Gittinger <cg@exept.de>
parents: 244
diff changeset
   392
    ^ '$Id: stx_goodies_petitparser.st,v 1.15 2014-03-04 20:30:48 cg Exp $'
5
804a351a9415 *** empty log message ***
Claus Gittinger <cg@exept.de>
parents:
diff changeset
   393
! !
134
03907685ddff Now preRequiites are separated in mandatoryPreRequisites and referencedPreRequisites
Stefan Vogel <sv@exept.de>
parents: 90
diff changeset
   394