equal
deleted
inserted
replaced
36 unit := aTCompilationUnit. |
36 unit := aTCompilationUnit. |
37 ! ! |
37 ! ! |
38 |
38 |
39 !TCompilerContext methodsFor:'error reporting'! |
39 !TCompilerContext methodsFor:'error reporting'! |
40 |
40 |
|
41 reportSemanticError: message |
|
42 |
|
43 TCompilerError raiseErrorString: message |
|
44 |
|
45 "Created: / 20-09-2015 / 06:13:42 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
46 ! |
|
47 |
41 reportTypeError: message |
48 reportTypeError: message |
42 |
49 |
43 TCompilerError raiseErrorString: message |
50 TCompilerError raiseErrorString: message |
44 |
51 |
45 "Created: / 14-09-2015 / 14:20:03 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
52 "Created: / 14-09-2015 / 14:20:03 / Jan Vrany <jan.vrany@fit.cvut.cz>" |