Преглед изворни кода

fix parsefrom

develop-theo
Theo Souchon пре 2 година
родитељ
комит
80a0bd9ea1
3 измењених фајлова са 11 додато и 4 уклоњено
  1. +0
    -1
      src/ccmeta.leg
  2. +4
    -0
      src/tests/tests-parsimony/realObjectPF.c
  3. +7
    -3
      src/tests/tests-parsimony/realObjectPF.out

+ 0
- 1
src/ccmeta.leg Прегледај датотеку

@ -2326,7 +2326,6 @@ mvalue = ( i:META_IDENT { i= newGetVariable(i) } ( a:meta_argumentList {
)
| META_LPAREN ( i:meta_exp ) META_RPAREN
) { $$= eval(globals, i) }
#) { i = eval(globals, i); puts("mvalue-yylval");println(i);$$= i }
mstmts = ( s:eval_stmt )* META_RCB { $$= s } # return the last stmt

src/tests/tests-parsimony/toFix/realObjectPF.c → src/tests/tests-parsimony/realObjectPF.c Прегледај датотеку

@ -26,5 +26,9 @@ int main()
{
oop p = newPoint(3, 4);
// @send p magnitude();
// @send p getX();
return 0;
}

src/tests/tests-parsimony/toFix/realObjectPF.out → src/tests/tests-parsimony/realObjectPF.out Прегледај датотеку

@ -1,3 +1,7 @@
// This example serves to illustrate the possibility
// of adding the object aspect to C
// using the parseFrom primitive.
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
@ -137,9 +141,9 @@ int main()
addMethod(_class_Point, _selector_getX, (method_t) Point_getX);
oop p = newPoint(3, 4);
send(p, magnitude);
send(p, getX);
// @send p magnitude();
// @send p getX();
return 0;
}

Loading…
Откажи
Сачувај