BUGFIX: mEqRef for evalOp

This commit is contained in:
Andreas Rumpf 2010-03-17 23:00:27 +01:00
commit 33fbf7fd03
2 changed files with 3 additions and 1 deletions

View file

@ -79,6 +79,7 @@ proc ChooseFileToOpen*(window: PWindow, root: string = ""): string =
else: else:
result = "" result = ""
else: else:
assert file_chooser_dialog_new != nil
var chooser = file_chooser_dialog_new("Open File", window, var chooser = file_chooser_dialog_new("Open File", window,
FILE_CHOOSER_ACTION_OPEN, FILE_CHOOSER_ACTION_OPEN,
STOCK_CANCEL, RESPONSE_CANCEL, STOCK_CANCEL, RESPONSE_CANCEL,

View file

@ -195,7 +195,8 @@ proc evalOp(m: TMagic, n, a, b, c: PNode): PNode =
result = copyTree(a) result = copyTree(a)
result.typ = n.typ result.typ = n.typ
of mNewString, mExit, mInc, ast.mDec, mEcho, mAssert, mSwap, mAppendStrCh, of mNewString, mExit, mInc, ast.mDec, mEcho, mAssert, mSwap, mAppendStrCh,
mAppendStrStr, mAppendSeqElem, mSetLengthStr, mSetLengthSeq, mNLen..mNError: mAppendStrStr, mAppendSeqElem, mSetLengthStr, mSetLengthSeq,
mNLen..mNError, mEqRef:
nil nil
else: InternalError(a.info, "evalOp(" & $m & ')') else: InternalError(a.info, "evalOp(" & $m & ')')