diff options
| author | Araq <rumpf_a@web.de> | 2012-07-17 08:44:04 +0200 |
|---|---|---|
| committer | Araq <rumpf_a@web.de> | 2012-07-17 08:44:04 +0200 |
| commit | 19e57bf70dddecdd0834b06099c2fd5f8ee0ad9e (patch) | |
| tree | 1236385442dc79b0fad9c915a5c5dc730aeea9da /tests/compile | |
| parent | 526be8a4cfe7bddb16d3dcf4354e6695d7030a62 (diff) | |
| download | Nim-19e57bf70dddecdd0834b06099c2fd5f8ee0ad9e.tar.gz | |
made some tests green
Diffstat (limited to 'tests/compile')
| -rw-r--r-- | tests/compile/tdatabind.nim | 4 | ||||
| -rwxr-xr-x | tests/compile/tdictdestruct.nim | 2 | ||||
| -rwxr-xr-x | tests/compile/tgenericprocvar.nim | 2 | ||||
| -rw-r--r-- | tests/compile/tgenericprop.nim | 4 |
4 files changed, 6 insertions, 6 deletions
diff --git a/tests/compile/tdatabind.nim b/tests/compile/tdatabind.nim index b2e870d93..afa8aa47b 100644 --- a/tests/compile/tdatabind.nim +++ b/tests/compile/tdatabind.nim @@ -5,8 +5,8 @@ discard """ import events type TProperty*[T] = object of TObject - getProc: proc(property: TProperty[T]): T - setProc: proc(property: var TProperty[T], value: T) + getProc: proc(property: TProperty[T]): T {.nimcall.} + setProc: proc(property: var TProperty[T], value: T) {.nimcall.} value: T ValueChanged*: TEventHandler Binders: seq[TProperty[T]] diff --git a/tests/compile/tdictdestruct.nim b/tests/compile/tdictdestruct.nim index 09e173b7c..ec1084105 100755 --- a/tests/compile/tdictdestruct.nim +++ b/tests/compile/tdictdestruct.nim @@ -5,7 +5,7 @@ type v: TV PDict[TK, TV] = ref TDict[TK, TV] -proc fakeNew[T](x: var ref T, destroy: proc (a: ref T)) = +proc fakeNew[T](x: var ref T, destroy: proc (a: ref T) {.nimcall.}) = nil proc destroyDict[TK, TV](a: PDict[TK, TV]) = diff --git a/tests/compile/tgenericprocvar.nim b/tests/compile/tgenericprocvar.nim index 7825db4c3..e642e3577 100755 --- a/tests/compile/tgenericprocvar.nim +++ b/tests/compile/tgenericprocvar.nim @@ -1,5 +1,5 @@ proc foo[T](thing: T) = discard thing -var a: proc (thing: int) = foo[int] +var a: proc (thing: int) {.nimcall.} = foo[int] diff --git a/tests/compile/tgenericprop.nim b/tests/compile/tgenericprop.nim index 211fddecf..7cddf5617 100644 --- a/tests/compile/tgenericprop.nim +++ b/tests/compile/tgenericprop.nim @@ -1,8 +1,8 @@ type TProperty[T] = object of TObject - getProc: proc(property: TProperty[T]): T - setProc: proc(property: TProperty[T], value: T) + getProc: proc(property: TProperty[T]): T {.nimcall.} + setProc: proc(property: TProperty[T], value: T) {.nimcall.} value: T proc newProperty[T](value: TObject): TProperty[T] = |